Comment corriger cette ligne

Le
Apitos
Bonsoir,

Comment corriger l'erreur 1004 dans cette ligne :

Sheets("Feuil1").Range("C2", [C65000].End(xlUp)).AdvancedFilter
Action:=xlFilterCopy, CopyToRange:=[H1], Unique:=True

Merci.
Vidéos High-Tech et Jeu Vidéo
Téléchargements
Vos réponses
Gagnez chaque mois un abonnement Premium avec GNT : Inscrivez-vous !
Trier par : date / pertinence
Apitos
Le #5017911
Voila, je l'ai trouvé.

Sheets("Feuil1").Range("C2:C" &
Range("C65000").End(xlUp).Row).AdvancedFilter Action:=xlFilterCopy,
CopyToRange:=[H1], Unique:=True
Apitos
Le #5017901
Pourquoi cette ligne me donne une erreur et ne me copie que deux
lignes :

Erreur = 'Nom de champs introuvable ou incorrect dans la plage
d'extraction'

Sheets("Feuil1").Range("C2:C" &
Range("C65000").End(xlUp).Row).AdvancedFilter Action:=xlFilterCopy,
CopyToRange:=[H2], Unique:=True

Et celle-ci me copie tout les lignes de la colonne C :

Sheets("Feuil1").Range("C2:C1000").AdvancedFilter
Action:=xlFilterCopy, CopyToRange:=[H2], Unique:=True

Merci.
Publicité
Poster une réponse
Anonyme