Création d'une boîte de dialogue

Résolu
BAUHAUS44 Messages postés 50 Date d'inscription samedi 19 août 2006 Statut Membre Dernière intervention 17 juillet 2010 - 23 août 2006 à 14:39
jrivet Messages postés 7393 Date d'inscription mercredi 23 avril 2003 Statut Membre Dernière intervention 6 avril 2012 - 23 août 2006 à 15:40
Bonjour, je suis entrain de créer deux macros via visual basic pour l'appliquer à un fichier excel. Suivant le fichier, je vais utiliser l'une ou l'autre des macros. Pour l'instant, je n'ai pas trouvé d'autre solution que de créer deux fichiers excel avec les macros appropriées. En fouinant dans le dossier d'aide d'excel, j'ai vu qu'il était possible d'ouvrir des boîtes de dialogue mais je n'ai pas trouvé mon bonheur. Ma question est donc la suivante ; est-il possible de mettre au demarrage de la macro l'ouverture d'une boîte de dialogue avec une question (quelle macro utiliser A ou B ?, par exemple) et suivant la réponse, activer la macro souhaiter ? Si oui, je vais avoir besoin d'aide. Merci d'avance à ceux qui pourront m'aider.

4 réponses

jrivet Messages postés 7393 Date d'inscription mercredi 23 avril 2003 Statut Membre Dernière intervention 6 avril 2012 60
23 août 2006 à 14:44
Salut,


C'est pas tres joli, mais il existe cette option (j suis en manque d'inspiration) Simple a mettre en oeuvre mais laide.


Private Sub Workbook_Open()


If MsgBox("A ou B" & vbCrLf & "A OUI" & vbCrLf & "B NON", vbYesNo Or vbQuestion, "Choix Macro") = vbYes Then
    Call MacroA
Else
    Call MacroB
End If
End Sub


Private Sub MacroA()


End Sub


Private Sub MacroB()


End Sub






@+, Julien
3
Julien237 Messages postés 883 Date d'inscription vendredi 3 novembre 2000 Statut Membre Dernière intervention 3 mars 2009 7
23 août 2006 à 14:53
Si c'est suivant le fichier, tu peux même ne pas passer par la msgbox en utilisant

If ActiveWorkbook.Name = "FichierA" Then
MacroA
ElseIf ActiveWorkbook.Name = "FichierB" Then
MacroB
End if

Julien.
0
BAUHAUS44 Messages postés 50 Date d'inscription samedi 19 août 2006 Statut Membre Dernière intervention 17 juillet 2010
23 août 2006 à 15:37
Esthétique ou pas peu m'importe, l'essentiel c'est que ça marche et c'est le cas. Y'a pas à dire tu métrises parfaitement ton sujet. Encore merci Julien
0
jrivet Messages postés 7393 Date d'inscription mercredi 23 avril 2003 Statut Membre Dernière intervention 6 avril 2012 60
23 août 2006 à 15:40
Re,


Lequel de Julien?
N oublie pas d'appuyer sur réponse acceptée sur le ou les posts qui ont pu t'aider.
Si tu le fait pendant l'écriture de ce message, excuses moi
a plus sur le forum






@+, Julien
0
Rejoignez-nous