Lancement de macro sous condition d'une cellule

Bonsoir

je suis toujours sur mon projet d'automatiser un formulaire pour une équipe et je souhaiterais savoir si il est possible qu'un macro choisisse ou non de s'exécuter suivant certaine condition et/ou qu'elle lance une autre macro suivant la réponse ?

Exemple :

je lance ma macro pour générer mon mail et PDF, et en fin de cycle je demande la vérification suivante :

si dans : Feuille xx > Colonne "Dérogation" Cellule XX = Oui

Alors je lance telle macro (ou fenêtre), mais si c'est "non" alors je lance une autre macro

je suppose que les experts me diront oui bien sur :D

Merci à vous

Bonsoir Cfrancky77

Oui bien sûr que c'est faisable

Sub EnvoiMailPDF()
  ' Tout le code pour le pdf et l'envoi ici
  ' Puis avant de sortir de la sub tu appelles la vérification
  Call Vérif
End Sub

Sub Vérif()
  If UCase(Sheets("XX").Range("X1")) = "OUI" Then
    Call TelleMacro
  Else
    Call AutreMacro
  End If
End Sub

Sub TelleMacro()
  MsgBox "Telle macro", vbInformation, "HI HI..."
End Sub

Sub AutreMacro()
  MsgBox "Autre macro", vbInformation, "BLA BLA..."
End Sub

J'espère que ce sera clair pour toi

A+

bonsoir

ca a l'air tellement simple lu comme ca , un grand merci en tout cas

Oui j'ai bien compris la formule, je vais la reproduire sur mon projet pour voir si je suis encore correctement réveillé

Rechercher des sujets similaires à "lancement macro condition"