trouver la valeur d'une celule contenu ds un combobox et copier la colonne

[ben]

Bonjour le forum

j'ai un petit souci
je cherche comment faire pour que à partir d'une valeur contenu ds un combobox ,q'une commande se positionne sur la celulle contenant la valeur du combobox et que ensuite je fasse un copier coller de toute la colonne.

merci pour votre aide

 

[pierref]

Dim i, j As Integer
Dim trouve As Boolean

i = 0
j = 0

While (i < nb_lignes) And (trouve = False)
i = i + 1
While (j < nb_colonnes) And (trouve = False)
j = j + 1
If (Cells(i, j).Value = ComboBox1.Value) Then
trouve = True
End If
Wend
Wend

Range(Cells(1, j), Cells(nb_lignes, j)).Copy

en esperant qu'il n'y ait pas d'erreur....

a+