Ich möchte das wenn in einem Bereich der den Namen "Daten" hat etwas geändert wird eine Anzeige in z.B. A1 kommt. Dort soll dann " Daten geändert" stehen.
Kann mir jemand helfen ?
viele Grüße Hans
Private Sub Worksheet_Change(ByVal Target As Excel.Range)
Application.EnableEvents = False
If Not Intersect(Target, Range("Daten")) Is Nothing Then
[A1] = "Änderung"
Else
[A1] = ""
End If
Application.EnableEvents = True
End Sub
Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden
Suche nach den besten AntwortenEntdecke unsere meistgeklickten Beiträge in der Google Suche
Top 100 Threads jetzt ansehen