Progress bar

P

Papaye

Guest

• 1 Juin 2006

• #2

Bonjour Nanir,

Voici un exemple ... que j'ai adapté d'un exemple piqué ailleurs (John Walkenbach ??).

Papaye [file name=Progress_bar.zip size=11168]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/Progress_bar.zip[/file]

 

Pièces jointes

• Progress_bar.zip

  10.9 KB · Affichages: 65

Vote positif 0 Vote négatif

N

Nanir

XLDnaute Occasionnel

• 1 Juin 2006

• #3

Merci Papaye,

Je vais essayer d'ajuster pour mon cas mais ca va être difficile...

A+

 

Vote positif 0 Vote négatif

coco_lapin

XLDnaute Impliqué

• 1 Juin 2006

• #4

Bonjour à tous.

Pour ce besoin j'utilise plutôt la barre des tâches, c'est plus facile à mettre en oeuvre

Un exemple:

Lig_max=10
for i= 1 to Lig_max
Application.StatusBar = 'Traitement de la ligne ' & i & ' / ' & Lig_max
Next i

'A la fin de la macro il faut faire un reset de la barre des tâches
Application.StatusBar = False

 

Vote positif 0 Vote négatif

N

Nanir

XLDnaute Occasionnel

• 2 Juin 2006

• #5

Bonjour Coco lapin,

Je me pose une question.

Dans le code que tu proposes tu fais référence à un max. (j'ai bien compris que pour installer une progress bar, il faut un max).

Dans mon cas le max peut varier.

Admettons que dans la colonne A j'ai un certains nombre de nom de fichiers à ouvrir (jusqu'à 200, donc 200 lignes), peut on par vba faire un nbval de la colonne A et lui faire comprendre que ce résultat sera le max pour la progress bar?

Merci.

 

Vote positif 0 Vote négatif

P

Papaye

Guest

• 2 Juin 2006

• #6

Coucou,

Tu peux modifier le code de coco_lapin comme suit :


Lig_max=Range('A65536').End(xlUp).Row
for i= 1 to Lig_max
Application.StatusBar = 'Traitement de la ligne ' & i & ' / ' & Lig_max
Next i

Du coup Lig_max comprendra le nombre de lignes remplies dans ta colonne A

Papaye

 

Vote positif 0 Vote négatif

coco_lapin

XLDnaute Impliqué

• 2 Juin 2006

• #7

Bonjour le forum.

Ce fil te permet de connaître la dernière cellule utilisée quelquesoit la colonne (voir la réponse de Mydearfriend!).

Lien supprimé

 

Vote positif 0 Vote négatif

N

Nanir

XLDnaute Occasionnel

• 5 Juin 2006

• #8

Merci à tout ceux qui ont participé à ce post,

Grâce à vos conseils et aux anciens posts du site j'ai réussi à faire ce que je voulais.

C'est vrai qu'une progress bar n'a pas forcement une grande utilité mais question présentation, ca cartonne !!

Encore merci...

 

Vote positif 0 Vote négatif