Comment valider un MsgBox

[Stéphane]

Bonjour le forum,

Je cherche à connaître le code qui me permettra de valider un MsgBox (appui sur le bouton OK)


Application.sendkeys ... peut-être ?



Merci de vos réponses

Stéphane

 

[Hellboy]

Bonjour

à l'aide d'une variable vous pouvez récupérer la sélection du MsgBox comme ceci:
Response = MsgBox('Message', 3, 'Titre', 'DEMO.HLP', 1000)


Phil

 

[Bernard_XLD]

Bonjour Hellboy, Stephane

Stephane, un msgbox est destiné à l'utilisateur, pourquoi vouloir le valider en auto ? ce qui n'est, d'aprés moi, pas possible car il est modal.

A+

Ps: on peut par contre remplacer le msgbox par un userform non modal.

Message édité par: yeahou, à: 29/03/2005 16:50

 

[Stéphane]

Rebonjour le forum,

En fait, ce n'est pas mon 'MsgBox' personnel MAIS celui de l'ordinateur.. En fait un message système ! (suite à la suppression d'une feuille --ActiveWindow.SelectedSheets.Delete--) et je ne désire pas qu'il apparaisse.. et pour l'enlever je dois cliquer sur le bouton OK

Merci

Stéphane

 

[@Christophe@]

Bonjour,

Ajoute simplement les lignes suivante entre ton code:

Application.displayalerts= false

''Ton code

Application.displayalerts = true

bonne journée

 

[Stéphane]

Excellent ça fonctionne, encore merci christophe !

Stéphane


Nota : et si j'avais voulu cliquer sur le bouton ANNULER et non OK sur ce fameux message d'alerte ? Quel aurait été le code ?


Merci à toi

 

[@Christophe@]

Re,

Le code aurait été de ne pas crée l'action qui supprime la feuille. lol

En faite application.displayalerts ne montre pas l'alerte et y réponds avec l'action par défaut. Puisque si tu lance l'action c'est que tu veux le faire. Maintenant, si tu te trompes, il fallait pas désactiver les alertes, elle son la pour éviter les mauvaises manip.

Bonne journée