=wenn(A1=10000;startemakro("makro1");startemakro("makro2")) 'P.S.: nur Schematisch da ich noch keine Lösung gefunden habe wie ein Makro ohne Maus oder Tastatureingabe gestartet werden kann.
Gruß
Thomas
Private Sub Worksheet_Calculate()
If [A1] = 10000 Then
MsgBox "Makro1"
Else
MsgBox "Makro2"
End If
End Sub
Wenn der Wert in A1 manuell eigegeben wird (oder über VBA), dann so:Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("A1")) Is Nothing Then
If [A1] = 10000 Then
MsgBox "Makro1"
Else
MsgBox "Makro2"
End If
End If
End Sub
Gruß Matthias