Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address <> "$A$3" Then Exit Sub
If Target.Value = 7 Then MeinMakro
End Sub
Sub MeinMakro()
MsgBox "Du hast in die Zelle A3 den Wert " & Range("A3").Value & " eingetragen!"
End Sub
Gruß
Heinz
AW: Makro per Änderung starten
22.09.2004 11:40:14
Basti
irgendwie geht das nicht...
AW: Makro per Änderung starten
22.09.2004 11:44:35
Heinz
Hallo Basti,
das erste Makro gehört in das Klassenmodul der betreffenden Tabelle, in der du den Eintrag machen möchtest, das zweite in ein allgemeines Modul
Gruß
Heinz
AW: Makro per Änderung starten
22.09.2004 11:49:36
Basti
Hi Heinz,
also das erste is im Klassenmodul , das zweite im normalen Modul (beides im Klassenmodul hatte ich auch)
In alle anderen möglichen Kombis wie Tabelle hatte ich das auch...