Msgbox par Api Windows

Bonsoir,

J’essaye d’utiliser un Mgbox par les API suivant le code de Tofalu « Afficher un msgbox avec l’Api Windows » ,
mais je n’obtiens que Oui comme bouton de contrôle, alors que je voudrais le Non aussi.

Est-ce possible ?

Extrait du code :

Code:

---

1 2 3 4 5 6 7

Dim reponse as long reponse=MessageBox(me.Hwnd, "Voulez vous continuer", _ "Demande de confirmation", MB_YESNO + MB_ICONQUESTION)) If reponse=VbYes then '.......... 'code à effectuer si l'utilisateur clique sur Oui End if

---

Dans la ligne de code de l’exemple il manque une parenthèse je l’ai rajouté à cet endroit :

"Demande de confirmation", (MB_YESNO + MB_ICONQUESTION))

Est-ce exact ?

Merci de votre aide.

Salutations.

as tu bien aussi copier les valeurs des constantes...

Code:

---

1 2	Const MB_YESNO = &H4&

---

pour être sur que ces constantes sont bien accessible à l'endroit ou tu les utilises, rajoute option explicit en haut de ton code (cette option t'oblige à déclarer les variables)

Bonsoir bbil.

J'ai bien variable MB_YESNO non définie sur cette ligne alors quelle est bien déclarée dans un module séparé:

Code:

---

1 2	reponse=MessageBox(me.Hwnd, "Voulez vous continuer", _ "Demande de confirmation", (MB_YESNO + MB_ICONQUESTION))

---

Par contre est-ce que les parenthèses sont correct ?

Salutations et bon dimanche.

pas de probléme pour les parenthèses, tu peu même enlever celles entourant MB_YESNO et MB_Question, mais si ta variable MB_YESNO, est inacessible, sans l'option explicit VB en crée une nouvelle et l'initialise à 0 ..au lieu des 4 désirés..

tiens un petit cours à re lire, qui devrai te permettre de comprendre pourquoi la portée de ta constante MB_YESNO , n'est pas "bonne"

Cours : Les fondamentaux des Variables et des Constantes en VBA par Maxence Hubiche

Bonjour bbil,

Merci pour ta réponse, et j'apprécie ta démarche de ne pas me donner la solution de suite, et de me la faire trouver à travers un mémo.

Donc le oui /non de la mgsbox fonctionne correctement.

Salutations