Discussion :

[mamoud51]

Bonjour, j'aimerai savoir comment faire pour lorsqu' (la msg box apparait) on clic sur le bouton "Ok", le "logiciel" se ferme ?


Merci d'avance

[zebrette]

Salut,

Il faut intercepter le msgbox result et agir en conséquence:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
dim Reponse as MsgBoxResult
Reponse = Msgbox("blahblah")
If reponse = vbOK then end

[mamoud51]

Nickel ! Merci Zebrette !!