SQL Code ausschalten

Question

Hallo,

ich habe in einem Tabellenblatt folgenden Code hinterlegt, den ich während des Laufes eines Makros vorübergehend ausschalten will, damit nicht bei jedem Schleifendurchlauf eine Datumsaktualisierung erfolgt. Erst nach Beendigung des Makro soll der Code wieder aktiviert werden:

Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Range("A:I"), Target) Is Nothing Then
On Error GoTo EndeSub
Application.EnableEvents = False
Range("I2") = Format(Now, "DD.MM.YYYY hh:mm ") & Application.UserName
End If
EndeSub:
Application.EnableEvents = True
End Sub

Hat jemand einen Tipp?

Answer 1

schalte die Reaktion auf die Zellveränderung aus und ein.
Application.EnableEvents = False


Gruß Hajo

Answer 2

Der Befehl hat mir gefehlt....hat geklappt! Danke!!