Discussion :

[wind_vinch]

Salut a tous, j'avais posté précédement pour savoir comment créer des textbox dynamique et maintenant je me retrouve denouveau bloqué car j'arrive plus a retrouver mes textbox, je m'explique:

dans un premier temps, lors de la l'activation de ma UserForm, je cré dynamique mes TextBox comme cela (selon les conseils d'AlainTech):

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
 
For Each mycell In Worksheets("Sheets1").Range("A1:A15")
     Set oNewControl2 = UserForm1.Controls.Add("Forms.TextBox.1")
     oNewControl2.Name = mycell.Value
     'Plus la positions x, y etc
next mycell

Ensuite, sur ma userfrom1 je dispose aussi d'un bouton ok et j'aimerais, lorsque je clique sur ok, utiliser les valeurs de mes différents textbox. Malheureusement je ne sais pas comment retrouvé mes textbox, si quelqu'un pouvait m'éclairer ce serait vraiment cool car la je rame a fond.

Je travail en vba 6.3

[wind_vinch]

ok, moi je veux bien changer pour la création de mes controls, ce qu'il me faut c'est une solutions et toute celle qui existe sont bonnes a prendre (tant que c'est pas trop tordu)

[AlainTech]

Ben, tu leur a donné un nom à tes contrôles.

Utilise ce nom...

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Msgbox(Me.LeNomDeTonControle.Text)

[AlainTech]

Et si tu ne peux pas retrouver leur nom (parce que le contenu de ta feuille peut changer), boucle dans la collection Controls de ton form.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
Dim oCtrl as Control
For Each oCtrl in Me.Controls
  Msgbox(oCtrl.Text)
Next oCtrl

Tapé dans la fenêtre du forum.
Donc, pas testé (pour une fois).

[wind_vinch]

ok, c'est tout bon , j'ai réussi merci a tous, votre aide ma été d'une grande importance, c'est vraiment cool de savoir qu'on peut compter sur des gars comme vous quand on sait plus quoi faire