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.
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.