Comment stoper une macro

Bonjour,

En bref, comment puis-je arrêter une macro par une autre macro ?

J'ai ce code, qui me fait clignoter le motif de la cellule, mais je n'arrive pas à l'arrêter.
Je souhairerais avoir un ordre pour l'arrêter à ajouter dans ma macro "Remise à Zéro".

Sub Clignot1()

Range("B2").Select
For compteur = 1 To 20
With Selection.Interior
.ColorIndex = 3
'.Pattern = xlSolid
End With
Application.Wait Now + TimeValue("00:00:01")

With Selection.Interior
.ColorIndex = 5
'.Pattern = xlSolid
End With
Application.Wait Now + TimeValue("00:00:01")
Next
End Sub

Merci de votre aide.
Guy