Discussion :

[jusalou]

bonsoir à tous amis programmeur,

Voila je souhaite faire une itération d'un code dans une boucle for next; mais je n'y arrive pas ... voilà le type de code que je rentre :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
Private Sub ListBox1_Click()
 
dim i as integer
for i = 1 to 50
If ListBox1 = [Feuil3!A&i] Then TextBox1.Text = [Feuil3!B&i]
next
 
End Sub

merci à tous pour votre aide.

JusaLOU

[Pierre Fauconnier]

Bonsoir

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

If ListBox1 = worksheets("Feuil3").range("A"& i) Then TextBox1.Text = worksheets("Feuil3").range("B" & i)