Forum |  HardWare.fr | News | Articles | PC | S'identifier | S'inscrire | Shop Recherche
3602 connectés 

  FORUM HardWare.fr
  Programmation
  VB/VBA/VBS

  {résolu}Boucle avec indice en pourcentage qui déconne

 


 Mot :   Pseudo :  
 
Bas de page
Auteur Sujet :

{résolu}Boucle avec indice en pourcentage qui déconne

n°1423670
zephyron1
Posté le 10-08-2006 à 14:24:20  profilanswer
 

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...  :pfff:  
Pouvez m'aider s'il vous plaît? Moi je trouve pas là...  :sweat:  
 
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
mood
Publicité
Posté le 10-08-2006 à 14:24:20  profilanswer
 

n°1423680
jpcheck
Pioupiou
Posté le 10-08-2006 à 14:33:26  profilanswer
 

pense à initialiser ton z à une valeur, ca vient peut etre de la...

n°1423729
zephyron1
Posté le 10-08-2006 à 15:05:10  profilanswer
 

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. :fou:

n°1423762
galopin01
Posté le 10-08-2006 à 15:38:14  profilanswer
 

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

n°1423779
zephyron1
Posté le 10-08-2006 à 15:52:53  profilanswer
 

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?

n°1423784
jpcheck
Pioupiou
Posté le 10-08-2006 à 15:56:05  profilanswer
 

zephyron1 a écrit :

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?


ben remplace ton integer par un double =)

n°1423796
galopin01
Posté le 10-08-2006 à 16:02:48  profilanswer
 

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.

n°1423806
zephyron1
Posté le 10-08-2006 à 16:08:35  profilanswer
 

:sol: "Bonne réponse de notre ami jpcheck!"  Bon admets quand même que je t'ai bien aidé avec mon indice... :D  
 
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.  :hello:  @+
 
EDIT : T'as raison pour la progressbar Galopin, j'y avais pas pensé.


Message édité par zephyron1 le 10-08-2006 à 16:10:19

Aller à :
Ajouter une réponse
  FORUM HardWare.fr
  Programmation
  VB/VBA/VBS

  {résolu}Boucle avec indice en pourcentage qui déconne

 

Sujets relatifs
[RESOLU] Itext - Mise en page et outils formulaire[résolu] Problème réplication MySQL
[c#] [résolu] help overloadedprobleme de boucle
[Résolu] - help FOR tokens=1,2* et le caractére *[résolu]Comment passer plusieurs arg. à Property Let
[VBA-E] [Résolu] Copier une valeur provenant d'un autre classeurboucle
[Résolu] [Algo] Stabilisation et Système du premier ordreMsgBox[resolu]
Plus de sujets relatifs à : {résolu}Boucle avec indice en pourcentage qui déconne


Copyright © 1997-2025 Groupe LDLC (Signaler un contenu illicite / Données personnelles)