Bloquer l' exécution d' une macro.

[Sebastien]

Bonsoir,

Est-il possible d' empêcher une macro de se dérouler si par exemple la valeur de la cellule A1 est égale à la valeur de la cellule B1 ? Ou en général est-il possible de bloquer l' exécution d' une macro si la valeur de 2 cellules désignées sont égales.

Merci.

 

[OnErrorResumeNext]

bonjour Sebastien,

VBA te permet de contrôler ce que tu veux faire avec les "if", "Select Case", etc ...
----------------------------------------------------------------------------
Sub SebMacro()

With worksheets("Feuil1")
If [A1] = [B1] Then Exit Sub
MsgBox "ma macro peut démarrer, A1 et B1 sont <>"
' ici le code de ma macro ....
End With
End Sub
----------------------------------------------------------------------------

 

[Sebastien]

Bonsoir,

Merci, c' est parfait, tu n' as pas fait d' error mais si on veut que le message s' affiche dans le cas inverse, c' est à dire si la macro ne s' exécute pas, c' est possible?

 

[OnErrorResumeNext]

Sebastien,

comme ça

------------------------------------------------------------------------
Sub SebMacro()

With worksheets("Feuil1")
If [A1] = [B1] Then
MsgBox "ma macro ne peut pas démarrer, A1 = B1 "
Else
' ici le code de ma macro ....
End if
End With
End Sub
------------------------------------------------------------------------

amicalement

 

[Sébastien]

Parfait OnError, je vais retenir le leçon, je te remercie.

Bonsoir. A plus .Seb.