Une variable dans le nom d'un TextBox
Bonjour à tous,
j'ai cherché un peu partout sans trouver de réponse
mon problème est que j'ai un tableau Excel qu'une macro rempli ligne par ligne suivant ce modèle
" Cellule(1,1) = TextBox1
Cellule(2,1) = TextBox2
..."
Je voulais savoir si on pouvais (et si oui comment) faire pour intégrer une variable dans le nom TextBox dans ce genre là
" Cellule ( i ,1) = TextBox & i"
Et faire tourner ça avec une boucle
Merci d'avance pour la réponse,
en espérant avoir été assez clair
j'ai cherché un peu partout sans trouver de réponse
mon problème est que j'ai un tableau Excel qu'une macro rempli ligne par ligne suivant ce modèle
" Cellule(1,1) = TextBox1
Cellule(2,1) = TextBox2
..."
Je voulais savoir si on pouvais (et si oui comment) faire pour intégrer une variable dans le nom TextBox dans ce genre là
" Cellule ( i ,1) = TextBox & i"
Et faire tourner ça avec une boucle
Merci d'avance pour la réponse,
en espérant avoir été assez clair
1 réponse
-
Bonjour,
'textbox feuille de calculDim Ctrl As OLEObject
With Worksheets("feuil1")
For i = 1 To 4
Set Ctrl = .OLEObjects("TextBox" & i)
.Cells(i, 1).Value = Ctrl.Object.Value
Next
End With
'ou textbox UserformWith Worksheets("feuil1")
For i = 1 To 4
.Cells(i, 1).Value = Me.Controls("TextBox" & i).Value
Next
End With