Makro erweitern
14.11.2016 15:17:02
Josef_T
Ich möchte von dem Wert der in D14 steht, den durch eine Formel errechneten Wert in Zelle G2, abziehen.
Wenn das überhaupt möglich ist, kann mir dann bitte jemand behilflich sein, wie das
geschrieben werden muss?
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$D$14" Then
On Error GoTo ERRHANDLER
Application.EnableEvents = False
Range("G2") = Range("G2") + Target
Application.EnableEvents = True
End If
ERRHANDLER:
Application.EnableEvents = True
Danke schon mal
Josef Thelen