WCM Forum - Einzelnen Beitrag anzeigen

chrisne · 15.03.2006, 15:22

danke. hat sich schon erledigt

Code:

Private Sub Worksheet_Change(ByVal Target As Range)
If Target = Range("A1") Then
    MsgBox "Mach was"
End If
End Sub

15.03.2006, 15:22	#2
chrisne Gesperrt Registriert seit: 23.08.2000 Beiträge: 3.692	danke. hat sich schon erledigt Code: Private Sub Worksheet_Change(ByVal Target As Range) If Target = Range("A1") Then MsgBox "Mach was" End If End Sub