Extraction de données sans doublons avec critères

apt · 3 Novembre 2007

Bonjour,

Pour extraire des données sans doublons avec critères, j'ai utilisé ce code :

Sheets("Feuil1").Range("C1:C100").CurrentRegion.AdvancedFilter Action:=xlFilterCopy, _
CriteriaRange:=Range("J2"), CopyToRange:=Range("H1"), Unique:=True

Mais le critère n'est pas respecté, incompréhensible ou ignoré.

Le critère est : Extraire tout les données de la colonne C, avec chacune une croix "x" dans la colonne D.

Merci.

CB60 · 3 Novembre 2007

Re : Extraction de données sans doublons avec critères

Bonsoir
regarde si cela te convient

apt · 3 Novembre 2007

Re : Extraction de données sans doublons avec critères

Bon voila où j'en veux arriver :

C'est d'avoir en Feuil2 le même résultat présenté dans Feuil3.

Exemple en fichier joint :

apt · 3 Novembre 2007

Re : Extraction de données sans doublons avec critères

Je n'ai pas vu ta réponse CB60.

Enfin je vais la voir en attendant de ton coté de me proposer des idées à propos de mon nouveau fichier joint.

CB60 · 4 Novembre 2007

Re : Extraction de données sans doublons avec critères

Bonjour
Je n'ai pas tout à fais le même résultat que ton souhait, mais mes connaissances macro sont limités, alors je fais avec ce que je connais

apt · 4 Novembre 2007

Re : Extraction de données sans doublons avec critères

Bonsoir CB60,

Très bon travail CB60.

Bon, j'ai obtenu de JB un résultat presque fait de ce que je demandais. (Je le remercie au passage).

Et j'ai pu ajouté ce qui manquait.

Merci à tous, et surtout CB60 de m'avoir assister tout au long de ce fil.

Extraction de données sans doublons avec critères

apt

XLDnaute Impliqué

CB60

XLDnaute Barbatruc

Pièces jointes

apt

XLDnaute Impliqué

Pièces jointes

apt

XLDnaute Impliqué

CB60

XLDnaute Barbatruc

Pièces jointes

apt

XLDnaute Impliqué

Discussions similaires