Lancer la macro selon condition

Bonjour

je suis tout à fait débutant et sollicite votre aide pour ma macro.

je souhaite lancer la macro uniquement si la valeur de la cellule AF3 est "ok" sinon passer à la ligne suivante

mon code :

Sub Macro4()

'

' Macro4 Macro

'

If InStr(UCase(Range("AF3").Value), "ok") Then

Call Macro3

Else: Exit Sub

End If

End Sub

d'avance merci pour votre aide précieuse !

Bonjour,

Tu peux par exemple ajouter cette ligne au début de Macro3 pour ne pas l'exécuter si pas "ok" :

If Range("AF3") <> "ok" Then Exit Sub
Sub Macro3()
    If Range("AF3") <> "ok" Then Exit Sub
    'Si ok ...
End Sub

Cordialement,

Salut et bienvenue sur le Forum,

La prochaine fois, pense à joindre un fichier.

Une solution dans le fichier ci-joint.

Cordialement.

EDIT : Salut Sébastien, je n'avais pas vu ta réponse.

53essai-biguetf.zip (9.11 Ko)

un grand merci

je me doute que pour vous c'est simple mais pour moi ....

vous êtes au top merci !

Rechercher des sujets similaires à "lancer macro condition"