Une variable dans le nom d'un TextBox

lecanu.jordan Messages postés 51 Statut Membre -  
f894009 Messages postés 17417 Date d'inscription   Statut Membre Dernière intervention   -
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

1 réponse

  1. f894009 Messages postés 17417 Date d'inscription   Statut Membre Dernière intervention   1 717
     
    Bonjour,

    'textbox feuille de calcul
        Dim 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 Userform
        With Worksheets("feuil1")
    For i = 1 To 4
    .Cells(i, 1).Value = Me.Controls("TextBox" & i).Value
    Next
    End With
    0