Discussion :

[duplaly]

Bonjour
J'ai un tableau avec 10 colonnes et plusieurs lignes. j'aimerais rentrer un mot dans un combobox (ActiveSheet) pour rechercher le mot sur la colonne B d'une autre feuille (adresse). Si le mot est trouvé, copier toute la ligne et copier résultat en colonnes dans ma feuille active.
j'ai besoin d'un coup de pouce.
Merci

[casefayere]

Bonjour,
A main levée

Code :

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

1
2
3
4
5
dim ch as long
ch = sheets("adresse").range("B2:B" & der_ligne).find(sheets("feuil1").combobox1).row'la feille de ton combo
 sheets("adresse").cells(ch, der_colonne).copy
sheets("feuil1").range("ta_cellule").select'la feuillle de ton combo
 sheets("adresse").cells(ch, der_colonne).PasteSpecial Paste:=xlPasteAll, Operation:=xlNone, SkipBlanks:=   False, Transpose:=True