[VBA-E] Macro tres longue

**zouille** · 22/10/2006, 10h26

salut a tous

voila , suite a votre aide ds le forum , on m'a proposer cettte macro qui fonctionne bien ( correspond a mes attentes) mais elle est tres longue ( environ 20 a 30 seconde dans le projet final)

Le but etant de remplire un listbox en fonction du statut du personnel
Dans feuil 1 , j'ai une liste de nom avec le statut "PAYE" ou rien
Le probleme est que qd je demarre cette macro , je vois la macro , selectionner les noms dans la collone B un par un et une fois terminé , le listbox , s'affiche corectement.

Idem , si je valide un payement avec le Bouton " PAYEMENT" qui entraine une initialisation du listbox.

Qqun a une idée ???
merci a vous

**ouskel'n'or** · 22/10/2006, 10h48

Au début de ta macro, mets

Code :

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

Application.screenupdating = false

et avant End sub

Code :

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

Application.screenupdating = True

**zouille** · 22/10/2006, 15h29

Envoyé par ouskel'n'or

Au début de ta macro, mets

Code :

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

Application.screenupdating = false

et avant End sub

Code :

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

Application.screenupdating = True

Salut a toi et merci de ton aide

En fait quel est le probleme concernant la lenteur de la macro ?
A quoi correspond "screenupdating" et faut il que je le colle ds l'action du bouton ou dans le module ( car la fonction se trouve ds un modul)

Serait il plus simple de mettre la fonction directement dans le code du USF en ajoutant ton code ?

Grand merci a toi

**plegat** · 22/10/2006, 16h10

Envoyé par zouille

En fait quel est le probleme concernant la lenteur de la macro ?

La mise à jour de l'affichage du classeur prend énoooooooormément de temps... c'est cela qui ralentit ta macro.

Envoyé par zouille

A quoi correspond "screenupdating"

"screenupdating"="mise à jour de l'écran"
Si tu le passes à false, il n'y a plus de mise à jour de faite, l'écran reste figé. La macro ne perd plus de temps, elle va beaucoup plus vite.

Envoyé par zouille

et faut il que je le colle ds l'action du bouton ou dans le module ( car la fonction se trouve ds un modul)

Tu encadres la portion de code qui fait des changements de pages en pagaille... avec un =false au début, et un =true à la fin

Envoyé par zouille

Serait il plus simple de mettre la fonction directement dans le code du USF en ajoutant ton code ?

Euh... est-ce plus compliqué de la laisser là où elle est???
En plus, il vaut mieux séparer le traitement du classeur de l'interface graphique, donc laisse les séparés...