Usf d'attente

[Seb]

Bonsoir à tous,

J'essais despérément de faire un "USF d'attente" mais rien ne se produit...

J'ai une macro qui prend pas mal de temps a ce réaliser et j'aimerais mettre un petit message d'attente durant son exécution..

Voila comment marche ma macro...

J'ouvre un USF (USF1), je mets des données et je clique sur "valider".
Un petit USF(Wait) s'ouvre pendant que la macro s'exécute et se ferme des que c terminé. L'autre USF (USF1) se ferme egalement. Le pb, c'est que quand l'USF Wait s'ouvre, la macro stoppe et plus rien ne se produit... Comment faire...

Private Sub VALIDER_Click()
wait.Show
.
.
La macro.
.
.
wait.hide
unload USF1
end sub..

mais ça marche pas...

Quelqu'un sait comment s'y prendre ???
Seb

 

[pascal21]

Re : Usf d'attente

bonsoir
fais un essais avec

wait.show 0

pour info wait hide ne fait que cacher ton usf, utilises plutôt

unload wait

 

[Seb]

Re : Usf d'attente

Bonsoir pascal21,

Je viens d'essayer et j'ai un message d'erreur. je comprend pas pourquoi ...

 

[pascal21]

Re : Usf d'attente

re
quel est le message?

 

[pascal21]

Re : Usf d'attente

usfinfo.Show 0
usfinfo.Repaint
Sheets("feuille blanche").Activate
Unload usfinfo

usfAffichage.Show

voila ce que j'utilise sur un classeur chez moi
usfinfo étant l'usf message d'attente
repaint permet l'affichage du contenu de l'usf
et usfaffichage, le'usf devant s'afficher ensuite
merci à celui qui m'avait donné l'info, j'ai oublié qui!!

 

[Seb]

Re : Usf d'attente

je reviens dans ma macro avec wait.show 0 souligner en jaune

 

[pascal21]

Re : Usf d'attente

j'avais pas tout lu ton post
esaye peut-être comme ça
au clic
usf1.hide
wait.show 0
ta macro
unload usf1
unload wait

 

[Seb]

Re : Usf d'attente

ça marche impec !!!

J'ai rajouter wait.repaint apres wait.show 0 car Wait etait tout blanc

merci pour ton coup de main... !!

seb

 

[Pierrot93]

Re : Usf d'attente

Bonjour Seb, Pascal

attention "wait" est un mot réservé vba(en autre une méhode s'appliquant à l'appli), il est donc très déconseillé de l'utiliser comme variable ou nom d'objet...

bonne journée
@+