bonjour,

j'ai un p'tit soucis pour désigner mes textbox dans une boucle.
Mes Textbox se nomme : Textbox3, Textbox4...Textbox14
Je souhaite y afficher le contenu d'une plage de cellules.

voici mon code pour comprendre

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
Private Sub ComboBox1_Change()
Dim n As Integer
Dim i As Integer
 
n = 13
With Sheets("besoins par ensemble")
    Do While ComboBox1 <> ""
        If .Cells(n, 2) = ComboBox1.Value Then
            i = 3
            Do While i <> 15
                TextBox(i) = .Cells(n, 3 + i) 'mon problème ce situe ici : Textbox(i)
            Loop
        End If
    Loop
End With
 
End Sub
Merci d'avance de votre aide