Si affichage MsgBox ne pas exécuter les lignes suivantes

Bonsoir ,

Je vous soumet encore un petit problème que je n'arrive pas à résoudre :

lorsque que l'on quitte un MsgBox il ne faudrait pas exécuter les lignes de code qui suivent. Ceci étant jusqu'à les conditions sont remplies.

Private Sub Worksheet_Change(ByVal Target As Range)

If Range("A3") = "" Then
 MsgBox " Entrer un nom en cellule A3"

 ' Si clique sur OK ou sur la croix pour sortir du MsgBox ne pas exécuter les actions suivantes

 End If

 Sheets("Test1").Activate
 Call macro1

 Sheets ("Test2")
 Call macro2

End Sub

Merci pour votre aide

Bonjour

Comme ceci

Private Sub Worksheet_Change(ByVal Target As Range)
If Range("A3") = "" Then
 MsgBox " Entrer un nom en cellule A3"
 Exit Sub
End If
    Sheets("Test1").Activate
    Call macro1
    Sheets ("Test2")
    Call macro2
End Sub

Cordialement

Bon sang mas c'est bien sûr :

la solution était simple. Merci de votre aide