Discussion :

[Scritch852]

Salut à tous, voila mon problème:

Ma macro est composée d'une page principale avec boutons et textes. Lorsqu'on la lance, elle va traiter plusieurs fichiers excel assez longs et en extrait les données. Je voudrais donc insérer une barre de loading qui informe de la progression du travail, en fontion de ce qu'a déjà traité excel, et ce qui reste à traiter (en calculant à l'avance combien de temps cela va prendre).
Dans la théorie cela marche bien, mais dansl a pratique je suis déjà bloqué au niveau de l'affichage de la barre:

Si je mets Application.ScreenUpdating à True, on ne voit pas la barre avancer, puisque Excel ouvre le .xls de données et c'est lui qu'on voit pendant tout le traitement...

Si je mets Applcation.ScreenUpdating à False, eh bien on ne voit plus rien, puisque la barre de loeading ne se rafraichit pas, vu qu'elle fait partie de la feuille excel.

Bref je suis assez bloqué, auriez vous une idée (si vous avez bien compris kle problème... )

[tangjuncn]

Tu peux peut-etre afficher l'info ds application.statusbar ?
Il n'est pas lié avec application.screenupdate.

[Scritch852]

Oui c'est ce que actuellement j'ai fait...Mais bon, ciao la zolie barre qui avance et bonjour la barre de texte geek avec le pourcentage. tant pis!

[Scritch852]

Up:

La statusbar fonctionne, mais ce n'est vraiment pas pérsentable... J'ai essayé d'ouvrir un Userform dans lequel j'affiche le loading, malheuresement le userform ne se rafraichit pas (mais apparamment ce n'est pas lié au fait que ScreenUpdating soit à False...)
Any suggestions guys ???

[AlainTech]

Code :

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

Me.Repaint

[Scritch852]

Ok un rafraichissement manuel...Cela fonctionne très bien. Par contre un dernier problème: impossible d'avoir accès à la fenêtre Userform pendant que Excel bosse, donc impossible d'appuyer sur un bouton "Stop" et même de couper l'exécution avec "Echap", ce qui est assez bizarre. Y'a t-il une commande qpour donner le focus à la userForm juste après l'avoir rafraichit ? Parceque du coup mon loading bloque Excel pendant tout le traitement...

EDIT: J'ai trouvé comment empêcher la Userform d'être dominante par rapport à l'appli Excel, suffit de l'appeler en non modal avec Show Userform 0

Tout fonctionne!