Office: (Office 2016) SUMME per Doppelklick

Hi, ich habe eine Frage:

Ich möchte in einer Zelle eine SUMME per doppelklick errechnen lassen.

Beispiel:

In Zelle A2 steht 100€ und in Zelle A3, 45€. Diese Zellen sollen jeweils per doppelklick eingefärbt und in Zelle A50 soll dann ausgerechnet werden.

A2-A40 = Ergebnis
dann doppelklick auf A3:
A3-Ergebnis aus A40
usw


zum einfärben der Zellen benutze ich folgenden Code:

Code:

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)

If Target.Interior.Color = RGB(198, 224, 180) Then
    Target.Interior.ColorIndex = xlColorIndexNone
Else
    Target.Interior.Color = RGB(198, 224, 180)

End If

Cancel = True

End Sub

nur möchte ich ausserdem das die Werte aus den angeklickten Zellen von einem bestimmten Werte runtergerechnet werden

Vllt kann mir da ja jemand helfen und ich hoffe ich habe mich nicht zu kompliziert ausgedrückt

Kurz und knapp: ich möchte zellen einfärben und die Werte darin sollen von einem anderen Wert abgezogen werden.

 

Hallo louge,

was genau willst Du rechnen?
Bei Klick auf A2: A2-A40. Aber wohin mit dem Ergebnis?
Bei Klick auf A3: A3-???
Von welchem Wert willst Du runterrechnen?

Hast Du eine Beispieldatei`?

Gruß,
Lutz

 

Eine Bespiel Datei habe ich jetzt nicht zur hand.

Gerechnet werden Soll : klick auf A3 : A3-A40 , Ergebnis soll in A50 kommen, dann weiter klick auf A4: usw...

Danke :)

Die Zellen sind jetzt nur als beispiel , es soll halt von 1000 nach jedem klick runter gerechnet werden
1000-100 = 900
900 - 250 = 650 .....

 

Hallo louge,

Code:

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)

If Target.Interior.Color = RGB(198, 224, 180) Then
    Target.Interior.ColorIndex = xlColorIndexNone
Else
    Target.Interior.Color = RGB(198, 224, 180)
End If

Cells(50, 1) = Cells(50, 1) - Target.Value

Cancel = True

End Sub

Soweit ein einfacher Code dazu.
Aber natürlich ergeben sich einige Fragen:
Darf der Zellwert nur einmal abgezogen werden oder beliebig häufig? (Darf die Zelle nur einmal angeklickt werden?) Klickst Du A3 dreimal an, zieht der Code auch dreimal ab. Sollten nur weiße Zellen abgezogen werden, einfach die neue Zeile in den Else-Bereich schieben.
Gibt es eine bestimmte Reihenfolge, in der gearbeitet werden soll? Dem aktuellen Code ist die Reihenfolge egal.
Dürfen nur bestimmte Zellen abgezogen werden? Der aktuelle Code zieht auch den Wert von AA14254 ab, wenn du darauf klickst.
Enthalten die angeklickten Zellen immer Zahlen? Der Code läuft bei Text in einen Fehler.

Wozu das Ganze? Du kannst bei Doppelklick in eine Zelle doch auch alle Zellen auf einmal abziehen.

Gruß,
Lutz