Boite de dialogue informative

[havopti]

Salut a tous je cherche à prévenir les usagers d'une de mes macros que celle ci s’exécute et qu'il ne faut pas paniquer car celle ci est un peu longue 😉

problème en mettant un code du type

MsgBox "Patientez", vbInformation

au tout début de macro

il faut cliquer sur "ok" pour que la suite s’exécute, hors je voudrais juste informer et que la macro se lance tout de suite sans attendre de cliquez sur ok

 

[Pierrot93]

Re : Boite de dialogue informative

Bonjour,

essaye avec ceci, restera affiché 2 secondes...

CreateObject("WScript.Shell").Popup "Ca va être long....", 2, "Patienter....", vbCritical

bonne journée
@+

 

[havopti]

Re : Boite de dialogue informative

merci mais dans se cas il faut toujours cliquer sur ok pour que la suite se lance

 

[Pierrot93]

Re : Boite de dialogue informative

Re,

CreateObject("WScript.Shell").Popup "Ca va être long....", 2, "Patienter....", vbCritical

non au bout de 2 secondes (2ème argument), la boite de dialogue se ferme....

 

[Pierrot93]

Re : Boite de dialogue informative

Re,

merci mais dans se cas il faut toujours cliquer sur ok pour que la suite se lance

non au bout de 2 secondes (2ème argument), la boite de dialogue se ferme....

 

[havopti]

Re : Boite de dialogue informative

quelle est l'erreur alors?

change les quantités pour que la macro modifie les chiffres
merci de l'attention portée a mon problème 😉

 

[Pierrot93]

Re : Boite de dialogue informative

Re,

pas le code dans ta macro... si je le rajoute, ok sous 2003

Sub test()
CreateObject("WScript.Shell").Popup "Ca va être long....", 2, "Patienter....", vbCritical
With Sheets("feuil1").Range("H4:H10")
.FormulaLocal = "=SI(D4<>"""";G4/D4/$G$16*$G$18+E4;"""")"
.Value = .Value
End With
End Sub

 

[Pierrot93]

Re : Boite de dialogue informative

Re,

non OK sous 2010, ma msgbox reste affichée....

 

[havopti]

Re : Boite de dialogue informative

oops oubliez de sauvez avant de l'envoyer, mais sous 2007 moi ca ne marche pas :/
edit ah au moins je suis pas complètement a la rue ^^

 

[Pierrot93]

Re : Boite de dialogue informative

Re,

oui... sous 2010 non plus, voir post #8...

 

[Pierrot93]

Re : Boite de dialogue informative

Re,

une autre approche avec un userform....

 

[havopti]

Re : Boite de dialogue informative

merci beaucoup avec ton modèle j’ai réussi à coder un userfrom qui fonctionne 😀