If - then start macro - else do nothing. VBA ?

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$A$1" Then

MsgBox "celle(A1) er ændret"
End If
End Sub

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$A$1" Then
'If Target = "HEJ" then ' den værdi det skal være for at køre makro
call makro ' navnet på din makro
end if
End If
End Sub

hvis feltet indeholder en formel og en makro skal aktives ved given værdi, så højreklik på  arkfanen, vælg "vis programkode" og indsæt denne makro
(Kalder makroen MinMakro hvis A1 bliver større end 5

Private Sub Worksheet_Calculate()
If Range("A1") > 5 Then Call MinMakro
End Sub

Lukketid.