Bonjour,
Dans une feuille de calcul servant à mettre en forme un graphe j'utilise plusieurs txtbox pour rentrer des valeurs. A chaque txtbox est associé une checkbox qui commute l'état enabled de la textbox entre false et true.
Par la suite, pour gagner du temps et des lignes de code j'utilise une boucle for
J'ai essayé :
for i = 1 to 8
If "Sheets(""Pilote"").TextBox" & Format(i) & ".Enabled" = True Then
....
Mais ça ne marche pas. J'ai donc essayé de passé par une variable objet :
Dim objTxtBox As Object
For i = 1 To 8
set objTxtBox = "Sheets(""Pilote"").TextBox" & Format(i)
If TxtBox.Enabled = True Then
....
Ca ne marche pas non plus.
en revanche si je fixe l'objet :
set objTxtBox = Sheets("Pilote").TextBox1
la ça marche;
Donc en gros soit je n'ai rien compris aux objets, soit les objets sont des variables figées et donc peu pratique.
Ma syntaxe n'est peut-être pas bonne .
Dans une feuille de calcul servant à mettre en forme un graphe j'utilise plusieurs txtbox pour rentrer des valeurs. A chaque txtbox est associé une checkbox qui commute l'état enabled de la textbox entre false et true.
Par la suite, pour gagner du temps et des lignes de code j'utilise une boucle for
J'ai essayé :
for i = 1 to 8
If "Sheets(""Pilote"").TextBox" & Format(i) & ".Enabled" = True Then
....
Mais ça ne marche pas. J'ai donc essayé de passé par une variable objet :
Dim objTxtBox As Object
For i = 1 To 8
set objTxtBox = "Sheets(""Pilote"").TextBox" & Format(i)
If TxtBox.Enabled = True Then
....
Ca ne marche pas non plus.
en revanche si je fixe l'objet :
set objTxtBox = Sheets("Pilote").TextBox1
la ça marche;
Donc en gros soit je n'ai rien compris aux objets, soit les objets sont des variables figées et donc peu pratique.
Ma syntaxe n'est peut-être pas bonne .