Msgbox vbyesno sous conditions
Fermé
Bonjour,
Je desire lancer une msgbox a l ouverture d un classeur excel comprenant plusieurs feuilles. Cette msgbox se lance automatiquement a l ouverture du classeur. Si vbNO, alors elle se ferme et rien d autre n est lance. Si vbYes, je desire qu elle lance une autre macro sur toutes les autres feuilles de mon classeur.
Merci beaucoup pour votre aide!
Je desire lancer une msgbox a l ouverture d un classeur excel comprenant plusieurs feuilles. Cette msgbox se lance automatiquement a l ouverture du classeur. Si vbNO, alors elle se ferme et rien d autre n est lance. Si vbYes, je desire qu elle lance une autre macro sur toutes les autres feuilles de mon classeur.
Merci beaucoup pour votre aide!
4 réponses
lermite222
Messages postés
8724
Date d'inscription
dimanche 8 avril 2007
Statut
Contributeur
Dernière intervention
22 janvier 2020
1 191
16 juil. 2009 à 11:37
16 juil. 2009 à 11:37
Bonjour,
Drôle de question... Tu ne connait pas la touche F1 ?
Bon, puisque j'y suis
A+
Drôle de question... Tu ne connait pas la touche F1 ?
Bon, puisque j'y suis
If MsgBox("Texte",VbYeNo,"Titre") = VbYes thenRemarque le parenthèses.
'C'est oui
else
'C'est Non
End If
A+
Merci de votre reponse mais je crains alors m etre mal exprimee.
J ai bien ceci
If MsgBox("Texte",VbYeNo,"Titre") = VbYes then
'C'est oui
else
'C'est Non
End If
avec une procedure aui ouvre une message box sur chaque feuille si la reponse est oui. mais si la reponse est non, cette msgbox s ouvre quand meme en posant la question sur les autre feuilles alors que je souhaite que quand la reponse est "non", elle ne s affiche plus sur les autres feuilles non plus.
Autrement dit:
voila peut etre un exemple
feuilles 1. 2 . 3
ouverture du classeur: feuille 1 msgbox vbyesno
si yes alors msgbox specifique a feuille 1 s affiche ( que j ai deja)
puis msbgox vbyesno sur feuille 2 ,..
si no alors rien ne se lance plus nul part...
J ai bien ceci
If MsgBox("Texte",VbYeNo,"Titre") = VbYes then
'C'est oui
else
'C'est Non
End If
avec une procedure aui ouvre une message box sur chaque feuille si la reponse est oui. mais si la reponse est non, cette msgbox s ouvre quand meme en posant la question sur les autre feuilles alors que je souhaite que quand la reponse est "non", elle ne s affiche plus sur les autres feuilles non plus.
Autrement dit:
voila peut etre un exemple
feuilles 1. 2 . 3
ouverture du classeur: feuille 1 msgbox vbyesno
si yes alors msgbox specifique a feuille 1 s affiche ( que j ai deja)
puis msbgox vbyesno sur feuille 2 ,..
si no alors rien ne se lance plus nul part...
lermite222
Messages postés
8724
Date d'inscription
dimanche 8 avril 2007
Statut
Contributeur
Dernière intervention
22 janvier 2020
1 191
16 juil. 2009 à 14:08
16 juil. 2009 à 14:08
Si je comprend bien ?...
dans un module général.
et dans les module de feuille...
dans un module général.
Public DejaOui as boolean
et dans les module de feuille...
If not DejaOui then 'ou l'inverse, je comprend pas bien ton sens If MsgBox.... DejaOui = True end if