Excel : Supprimer les doublons
Bonjour,
Je souhaiterais savoir si il y avait un code VBA pour purger une liste de ses doublons à la fermeture d'un fichier excel. La colonne de tri étant la colonne " Z ".
Merci d'avance à ceux qui m'aideront.
Je souhaiterais savoir si il y avait un code VBA pour purger une liste de ses doublons à la fermeture d'un fichier excel. La colonne de tri étant la colonne " Z ".
Merci d'avance à ceux qui m'aideront.
3 réponses
-
Salut,
le mieux serait que tu enregistres une macro et que tu fasses les manips toi-même.
tu verras le code que ça te génère.
j'ai mis des infos seulement dans la colonne Z, entre les lignes 1 et 21, et sans titre. j'ai enregistré la macro et voilà ce que j'ai obtenu :
Sub Macro1()
Columns("Z:Z").Select
ActiveSheet.Range("$Z$1:$Z$21").RemoveDuplicates Columns:=1, Header:=xlNo
End Sub
essaie, ce n'est pas compliqué tu verras. -
re,
tu peux mettre ton fichier Excel sur le site cijoint.fr et donner le lien ici stp.
ça sera plus simple.-
J'ai mis une version (très) simplifiée de mon fichier pour le rendre plus léger. Je souhaiterais que les doublons soient éliminés en Feuil9 à la pression du button "Quitter". La colonne Z étant ma référence. La c'eest fait car je l'ai fait à la main... Plus de 4000 lignes pour au final n'en avaoir que 100...
http://www.cijoint.fr/cjlink.php?file=cj201005/cijqwqu5oH.xls
Merci en tout cas de m'accorder un peu de ton temps. -
-
-
-
Salut,
ce que je t'avais donné fonctionne très bien. c'est juste que, ne connaissant pas la plage de données sur laquelle tu l'appliquais, j'avais pris l'exemple entre les lignes 1 et 21, comme je l'avais précisé.
si tu veux que ça affecte toutes les colonnes de ton tableau, utilise le code donné par gbinforme. agrandi juste la plage de données "$A$1:$Z$21" pour que cela prenne tout ton tableau en compte.
si tu veux seulement toucher à la colonne Z :
ActiveSheet.Range("$Z$1:$Z$65536").RemoveDuplicates Columns:=1, Header:=xlNo
j'ai pris large ("$Z$1:$Z$65536") pour être sûr que tout soit pris dans cette colonne.
à toi de voir selon ce que tu souhaites faire.
