Makroausführung bei Zellwertänderung
08.09.2003 15:18:28
André
ich möchte, dass ein Makro ausgeführt wird, wenn sich in einer Zelle der Wert ändert. Der Wert wird mit einer Bildlaufleiste verändert, also ohne direkt in die zelle einzugreifen. Folgendes Makro habe ich gefunden, dies funktioniert aber nur , wenn man die Zelle manuell ändert (mit Doppelklick hinein, anderen Wert eingeben).
Sub Worksheet_Change(ByVal Target As Excel.Range)
If Target.Address = "$D$9" Or Target.Address = "$H$9" Then
Attention
End If
End Sub
Sub Attention()
If Not Fix(Cells(9, 4) / Cells(9, 8)) Mod 2 <> 0 Then
MsgBox "gerade!"
End If
End Sub
Für Tipps wäre ich sehr dankbar!
André
Anzeige