[VBA-E] copier des cellules filtrées
Bonjour,
Je débute en VBA sous Excel. Je souhaite filtrer des cellules, copier le résultat et le coller dans une nouvelle feuille. Voici mon code :
________________________
Code:
1 2 3 4 5 6 7 8 9
| Range("A1:AW30").Select
Selection.AutoFilter
Selection.AutoFilter Field:=2, Criteria1:="Non Conformité Majeure"
Selection.AutoFilter Field:=3, Criteria1:="Soldé"
Selection.AutoFilter Field:=48, Criteria1:="1"
Selection.SpecialCells(xlCellTypeVisible).Copy _
Destination:=Worksheets("data_NCM").Range("A2") |
________________________
Une erreur sur la méthode copy apparait (pourtant dans les faits, le copier coller se fait bien !).
Dans ce code je recopie la première ligne (ligne de titre) mais en réalité je voudrais copier uniquement les lignes filtrées du dessous.
Si quelqu'un peut m'éclaircir sur l'origine de l'erreur ....
Merci beaucoup