Bonjour,

je cherche à copier coller des cellules filtrées.

J'utilise la séquence suivante

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
 
Rows.AutoFilter Field:=1, Criteria1:="MonChoix"
Range("A2", Cells(lastRow, 14)).SpecialCells(xlCellTypeVisible).Copy
Malheureusement si MonChoix ne figure pas en ligne 2 le range("A2") n'est pas visible.--> Erreur 1004.
Si en débug je remplace A2 par Ax, x étant le N° de la première ligne où se trouve Monchoix, ça marche.
Cela voudrait dire qu'il faille d'abord faire un find de MonChoix pour obtenir le N° de la ligne ?
Ou alors prendre la ligne de titre et la supprimer après ?

Merci pour vos lumières
Denis