Pb d'affichage dans un textbox d'une userform [Résolu]

Messages postés
113
Date d'inscription
mercredi 9 mai 2007
Statut
Membre
Dernière intervention
28 août 2007
- - Dernière réponse : Charles Racaud
Messages postés
3181
Date d'inscription
dimanche 15 février 2004
Statut
Membre
Dernière intervention
9 avril 2017
- 3 août 2007 à 16:48
Bonjour,
comme l'explique le titre j'ai un petit problème d'affichage dans une textbox d'une userform

grâce à une boucle for je parcours une feuille dans laquelle il y a du texte dans les cellules de la première colonne, et j'aimearis donc a afiicher ce texte au fur et à mesure dans ma textbox

code utilisé:

For i = 1 to 10
UserForm1.TextBox1=Sheet("toto").Cell(i,1).Value


Sleep 1000 (pour lui laisser le temps d'afficher)


Next i


 malheuresement, celui ci ne m'affiche dans la textbox que le dernier texte (celui de la cellule 10) entre temps il ne m'affiche pas du tout le texte de la cellule 1,2,3... il me met rien pendant 10s  (car y le sleep) et il ne m'affiche qu'à la fin la dernière valeur


Quelqu'un s'aurait-il comment afiicher mes valeur au fur et à mesure, pour chaque i????


Merci @+

Je viens de découvrir le bonheur de programmer et le VB me le rend bien
Afficher la suite 

7 réponses

Meilleure réponse
Messages postés
3181
Date d'inscription
dimanche 15 février 2004
Statut
Membre
Dernière intervention
9 avril 2017
25
3
Merci
Salut,

Ajoute un DoEvents dans ta boucle (avant le Sleep)







__________
Kenji

(


Nouveau forum VBA/Office

Dire « Merci » 3

Quelques mots de remerciements seront grandement appréciés. Ajouter un commentaire

Codes Sources 210 internautes nous ont dit merci ce mois-ci

Commenter la réponse de Charles Racaud
Messages postés
113
Date d'inscription
mercredi 9 mai 2007
Statut
Membre
Dernière intervention
28 août 2007
0
Merci
Merci bien, je l'avais oublié celui-là !!!,
PS: je sais vraiment pas comment vous faites pour être aussi rapide par les réponses......
(dopage????)

encore MERCI @+
Je viens de découvrir le bonheur de programmer et le VB me le rend bien
Commenter la réponse de taj88
Messages postés
3181
Date d'inscription
dimanche 15 février 2004
Statut
Membre
Dernière intervention
9 avril 2017
25
0
Merci
Hé oui, faut vite donner une réponse avant que d'autre ne le fassent.
Je te rassure, il n'y a pas de dopage. Enfin, je crois ^^







__________
Kenji

(


Nouveau forum VBA/Office
Commenter la réponse de Charles Racaud
Messages postés
15815
Date d'inscription
jeudi 8 août 2002
Statut
Modérateur
Dernière intervention
4 mars 2013
83
0
Merci
Hum... la prog c'est comme le vélo : avant qu'on ne découvre un gars qui se dope, on dit que c'est un sport propre, mais dès qu'on en trouvera un, on trouvera les autres

Charles : veuillez me suivre dans mon bureau pour un petit contrôle EPO s'il vous plaît
Commenter la réponse de cs_DARKSIDIOUS
Messages postés
3181
Date d'inscription
dimanche 15 février 2004
Statut
Membre
Dernière intervention
9 avril 2017
25
0
Merci
Aie, je suis découvert. Je ne suis fait avoir.



__________
Kenji

(


Nouveau forum VBA/Office
Commenter la réponse de Charles Racaud
Messages postés
113
Date d'inscription
mercredi 9 mai 2007
Statut
Membre
Dernière intervention
28 août 2007
0
Merci
Re,


j'ai une autre petite question,


ma boucle se deroule pour i = 1 à 10 mais est ce que je peu arreter ma boucle une fois que je n'ai plus de valeur dans ma colonne

un truc du genre for i = 1 to fin
avec fin = "chiffre de la dernière ligne de ma colonne contenant qqc"....
je crois savoir qu'il y a un truc du genre end(1xdown) ????

need help !

merci @+

Je viens de découvrir le bonheur de programmer et le VB me le rend bien
Commenter la réponse de taj88
Messages postés
3181
Date d'inscription
dimanche 15 février 2004
Statut
Membre
Dernière intervention
9 avril 2017
25
0
Merci
Tout a fait :
j =
http://www.codyx.org/snippet_rechercher-premiere-ligne-ou-colonne-vide-partir-cellule_206.aspx


For i = 0 to j
...

Sinon, une boucle while tant que la cellule n'est pas vide.






__________
Kenji

(


Nouveau forum VBA/Office
Commenter la réponse de Charles Racaud