Discussion :

[akira66fr]

bonjour,
j'ai créé une macro qui met en forme un tableau mais on voit à l'écran tout ce que fait la macro ...
peut-on mettre une "boite de dialogue" (ce n'est peut-être pas le bon terme) qui s'afficherait au déclenchement de la macro, style "merci de patienter" avec un fond fixe et on terminerait sur une autre boite de dialogue "traitement terminé".
Merci

[Didier Gonard]

Bonjour,

Vois dans l'aide du côté de

ScreenUpdating
En plus tu gagnes beaucoup de temps

cordialement,

Didier

Oups, si un modérateur passe par là, ce message a sa place en vba...

[akira66fr]

pas mal du tout cette "Application.ScreenUpdating = False"
+ un petit MsgBox à la fin, c'est tout bon

par contre, on reste avec la boite Macro ouverte jusqu'à la fin ...

Merci

[rtg57]

Bonjour,

il est important de placer le 'ScreenUpdating' au bon endroit
Par exemple:

Code :

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

1
2
3
4
5
6
7
MsgBox("Veuillez patienter...", "TRAITEMENT EN COURS", mbOk)
DoEvents  ' Traite l'évènement de fermeture de la boite de dialogue
ScreenUpdating = False  ' Rend l'affichage inactif une fois que la boite est fermée
  *
  *
  *
ScreenUpdating = True  ' Très important

[Didier Gonard]

tu ne nous dis pas comment tu lances ta macro, mais un truc plus sophistiqué que le msgbox, mais bien plus simple qu'une barre de progression serait l'utilisation d'un Userform à afficher pendant le traitement.
l'intérêt est que tu y loges facilement un gif (image) explicite genre "traitemetn en cours etc...

Pour les USF, voir ici :
http://silkyroad.developpez.com/VBA/UserForm/

cordialement,

Didier

[fring]

Bonjour tlm,

Un message via une MsgBox ne fonctionne pas, le déroulement du processus sera arrêté tant que la MsgBox sera affichée

Via un UserForm c'est possible mais il faut mettre sa propriété ShowModal sur False sinon même résultat qu'avec la MsgBox