ecrire variable dans une progress bar

Voila j'ai juste une petite question, est il possible d'écrire une variable dans une progressbar en VBA? Parce que dans mon code les seules options que j'ai c'est pbar.ouvrir pbar.fermer pbar.avancer pbar.couleurFond pbar.Minuterie pbar.CouleurComplementaire et pbar.ChoixCouleur.
Or j'ai vu que certaines personnes utilisaient pbar.Value = ...
Seulement j'ai essayé mais ca me met un message d'erreur...

Je voulais préciser que la variable que je veux afficher est le numero de la ligne traité car en fait le traitement est long , ca permetterai à l'utilisateur de savoir que l'ordianteur n'a pas planté, et s'il plante, grace a cette variable il retrouverai facilement la ligne dans le fichier exel qui n'est pas passée.

Pour ta pbar, si tu utilises le VBA, tu as effectivement des propriétés non affichés dans "l'aide à la frappe" à savoir :

Pbar.Max : Valeur maximum à donnée à ta progress bar
Pbar.Min : Valeur minimum

Le Pbar.value fonctionne normalement...

Oui je suis bien en VBA. Je vais tester le pBar.Max ca serai super que ca marche.Pour le pBar.value c'est sur ca ne marche pas

Ah ben nan aparament ca ne marche pas le Pbar.Max, ca me met une erruer et ca revient sur mon code

Sisi, je t'assure que ça marche, je l'utilise actuellement dans 3 applications qui sont en production depuis plusieurs mois.

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13

Me.pbar.Min = 1 Me.pbar.Value = 1 Me.pbar.Max = rs_load.RecordCount + 1 'rs_load est un recordset   While Not rs_load.EOF 'TRAITEMENT   rs_load.MoveNext Me.pbar.Value = Me.pbar.Value + 1 Wend

---

Et cela fonctionne parfaitement ;)

ben écoute je ne comprend pas il me met le message membre de méthode ou de données introuvable...

Un peu vague tout ça, tu n'as pas un bout de code ^^ ?

je déclare ma barre de progression comme cela :

Code:

---

Dim Pbar As New BarreDeProgression

---

ensuite je l'ouvre comme ceci :

Code:

---

Pbar.Ouvrir

---

Puis je l'initialise :

Code:

---

Pbar.Minuterie 0

---

et enfin je teste ce que tu me dit avec une valeur quelconque pour le moment :

Code:

---

Pbar.Max = 570

---

J'ai essayé de cette facon puis en metant Me... ca donne la même chose

Ha d'accord. Je ne fais pas ça du tout.

Quand tu es sur ton formulaire, en mode création, vas dans le menu : Insertion=> Contrôles ActiveX

Et Sélectionnes "Microsoft progressBar control 6.0"

Celle-ci va apparaître sur ton formulaire. Tu n'as plus qu'à lui donner un nom, et l'utiliser dans ton code (plus besoin de déclaration, tu l'utilises directement dans le code).

En mode création, si tu double-cliques dessus, tu peux également modifier certains paramètre (apparence, ect.)

Voilouu ;)

De plus

Ah ok ben super merci pour ton aide je vais pouvoir enfin faire ce dont j'ai envie!!!

Bon j'ai un autre souci, il me met "propriété ou méthode non géré par cet objet"

à quel moment ?

Dès le début lorsque j'écris ceci :

Code:

---

ProgressBar8.Ouvrir

---

est quand j'enlève cette ligne il me met l'erreur à

Code:

---

ProgressBar8.Value = 0

---

Pb.ouvrir n'existe pas pour ce controle.

Quand à la valeur, tu ne peux pas lui affecter une valeur inférieure au Pbar.min.
Moi je mets par défaut :

Code:

---

pbar.value = 1

---

Ok c'est bon j'ai ompris le principe maintenant. Merci pour ton aide