Discussion :

[ghosty04]

Bonjour,

J'essaye de mettre quelques TextBox's dans un tableau pour ensuite vérifier leur 'Value' mais ça ne marche pas. Le bout de code et du genre:

Code :

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

1
2
3
4
5
6
 
    Dim testTable(1 To 10)
 
    testTable(1) = UserForm1.TextBox1
 
    MsgBox testTable(1).Value

A l'execution je recoit le message suivant. "Erreur d'exécution 424. Objet requis".
Si quelqu'un sait comment regler ça... (:

merci d'avance

[ucfoutu]

Bonjour,

ce qui est une erreur est ceci :

Code :

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

MsgBox testTable(1).Value

enlève tout simplement .value (qui n'a rien à faire là)

et il seraiot bon (pâs indispensable, mais recommandé) de préciser :

Code :

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

testTable(1) = UserForm1.TextBox1.Text  '   (ou .value)

et

Code :

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

Dim testTable(1 To 10) as string

[ghosty04]

Oui, mais ce que je voulais en fait, c'est avoir les TextBox dans le tableau, et pas leurs valeurs, pour pouvoir dès lors qu'on écrit du texte dedans, faire une boucle pour vérifier les valeurs de ce texte dans les différent TextBox's. Y a-t-il un moyen de faire ça?

[ucfoutu]

Oui, mais si tu fais celà, il te faut respecter exactement les même règles que celles à respecter pour toute variable !
Il faut que tu comprennes bien que chaque élément d'un tableau dynamique n'est jamais rien d'autre qu'une variable (et doit donc être traité comme tel).

Exemple :

Code :

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

1
2
3
Dim tableau(0) As TextBox
 Set tableau(0) = TextBox1
 MsgBox tableau(0).Text

Il est clair que le Set est ici (s'agissant d'un objet) INDISPENSABLE !

Maintenant : il est clair que tu devras peut-être remplacer

Code :

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

Dim tableau(0) As TextBox

par une meilleure précision, sous VBA (notamment du fait que l'objet peut être sur une feuille ou sur un UserForm)
Tu peux également te contenter de déclarer en type Object, ainsi

Code :

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

Dim tableau(0) As Object

[ghosty04]

merci ucfoutu, C ce que je voulais. je savais pas comment gerer les references en VBA. apparament c'est avec l'instruction SET.