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
Merci d'avance de votre aide
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
Partager