{résolu}Boucle avec indice en pourcentage qui déconne - VB/VBA/VBS - Programmation
Marsh Posté le 10-08-2006 à 14:33:26
pense à initialiser ton z à une valeur, ca vient peut etre de la...
Marsh Posté le 10-08-2006 à 15:05:10
mon z est déjà initialisé plus haut car je prends le nombre de ligne que contient mon fichier excel. Mais j'ai quand même rajouté "z = 3000" au dessus et bizarrement "percent" reste toujours bloqué quand "a" à la valeur 327... Pourtant mon a monte bien jusqu'à 3000... Je comprends rien.
Marsh Posté le 10-08-2006 à 15:38:14
Max ne devrait pas dépasser 100
A toi définir le pourcentage de progression de ton traitement dans une boucle de 1 a 100
Marsh Posté le 10-08-2006 à 15:52:53
Je comprends pas ce que tu veux me dire Galopin.
Tu veux dire que mon "Userform3.ProgressBar.Max" ne doit pas être au dessus de 100? Mais pourtant ça marche bien, la barre augmente bien malgrès que z soit égale à 28000... J'ai fait la même barre pour plusieurs fichiers et j'ai jamais vu de problème sur ça (enfin ça ne veut pas dire que je ne te crois pas, je suis juste etoné).
En cherchant un peu, j'ai trouvé que le problème venait de là : [Valeur>32700] / [z=28500]...
J'ai pas un problème de typage par hasard?
Marsh Posté le 10-08-2006 à 15:56:05
zephyron1 a écrit : Je comprends pas ce que tu veux me dire Galopin. |
ben remplace ton integer par un double =)
Marsh Posté le 10-08-2006 à 16:02:48
possible. Je sais pas. J'ai l'habitude de toujours ramener à un pourcentage de cent
+1 pour le double
Sinon (à moins de pas être pressé) t'es pas obligé de redéfinir toute la progressbar à chaque tour de boucle : le Value suffit.
Marsh Posté le 10-08-2006 à 16:08:35
"Bonne réponse de notre ami jpcheck!" Bon admets quand même que je t'ai bien aidé avec mon indice...
Ben voilà, j'ai changé mes variables "a" et "z" en double et plus aucun problème. Vraiment bizarre ce truc... En tout cas merci Galopin et merci jpcheck. @+
EDIT : T'as raison pour la progressbar Galopin, j'y avais pas pensé.
Marsh Posté le 10-08-2006 à 14:24:20
Bonjour à tous, je veux faire une barre de progression avec un indice en pourcentage mais cet indice ce bloque à 1,14% et mon compteur "a" reste lui à 327.
Dans ce morceux de code "a" est un entier qui monte jusqu'à environ 28000 (entier z). Ma chaine de caractère "percent" reste bloqué sur "1,14% 327" malgrès que "a" continu à augmenter et que ma barre de progression augmente bien...
Pouvez m'aider s'il vous plaît? Moi je trouve pas là...
Private a As Integer
...
Dim z As Integer
Dim percent As String
Do
percent = CStr(Round(((100 * a) / z), 2)) + "% " + CStr(a)
UserForm3.Caption = percent
UserForm3.Show 0
UserForm3.ProgressBar1.Min = 0
UserForm3.ProgressBar1.Max = z
UserForm3.ProgressBar1.Value = a
UserForm3.Repaint
UserForm3.ProgressBar1.Refresh
a = a + 1
Loop Until a = z
Message édité par zephyron1 le 10-08-2006 à 17:18:56