copie de colonne sans doublon

rafmix

XLDnaute Nouveau
hello,
je copie une colonne vers une autre, sans doublon avec :

Worksheets("CatData").[M:M].Clear
Worksheets("CatData").[G:G].AdvancedFilter _
Action:=xlFilterCopy, _
CopyToRange:=Sheets("CatData").[M:M], Unique:=True


ca fonctionne très bien sauf pour le premier élément qui est répéter !!

Si qq à une solution

PS. Je débute en VBA, plus l'habitute de php, asp, sql,... un peu perdu

merci d'avance
 

Pièces jointes

  • Classeur1.zip
    15 KB · Affichages: 24
  • Classeur1.zip
    15 KB · Affichages: 29
  • Classeur1.zip
    15 KB · Affichages: 25

rafmix

XLDnaute Nouveau
Re : copie de colonne sans doublon

Ca fonctionne pas mieux

ci-joint mon fichier, la macro est sur le bouton "Trier" dans la partie copie data

en fait, ca ne marche pas si dans la colonne à triée (G), j'ai deux fois le même élements dans les deux premières lignes
 

Pièces jointes

  • raf1.zip
    16.4 KB · Affichages: 57
Dernière édition:

Hervé

XLDnaute Barbatruc
Re : copie de colonne sans doublon

bonsoir :)

de mémoire, ceci est surement dû au fait que ta colonne ne comporte pas d'entete.

en effet le filtre elaboré reclame au moins une ligne vide ou une ligne d'entete en debut de colonne.

salut
 

Discussions similaires

Réponses
7
Affichages
884

Statistiques des forums

Discussions
312 496
Messages
2 088 980
Membres
103 997
dernier inscrit
SET2A