A voir également:
- Excel : Supprimer les doublons
- Liste déroulante excel - Guide
- Formule excel - Guide
- Si et excel - Guide
- Aller à la ligne excel - Guide
- Mise en forme conditionnelle excel - Guide
3 réponses
tibouuh
Messages postés
2686
Date d'inscription
lundi 30 juin 2008
Statut
Contributeur
Dernière intervention
9 février 2017
647
25 mai 2010 à 17:58
25 mai 2010 à 17:58
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.
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.
tibouuh
Messages postés
2686
Date d'inscription
lundi 30 juin 2008
Statut
Contributeur
Dernière intervention
9 février 2017
647
25 mai 2010 à 19:52
25 mai 2010 à 19:52
re,
tu peux mettre ton fichier Excel sur le site cijoint.fr et donner le lien ici stp.
ça sera plus simple.
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.
http://www.cijoint.fr/cjlink.php?file=cj201005/cijqwqu5oH.xls
Merci en tout cas de m'accorder un peu de ton temps.
gbinforme
Messages postés
14946
Date d'inscription
lundi 18 octobre 2004
Statut
Contributeur
Dernière intervention
24 juin 2020
4 684
26 mai 2010 à 10:37
26 mai 2010 à 10:37
bonjour,
Comme ceci cela devrait mieux fonctionner :
Comme ceci cela devrait mieux fonctionner :
ActiveSheet.Range("$A$1:$Z$21").RemoveDuplicates Columns:=26, Header:=xlNo
tibouuh
Messages postés
2686
Date d'inscription
lundi 30 juin 2008
Statut
Contributeur
Dernière intervention
9 février 2017
647
26 mai 2010 à 11:08
26 mai 2010 à 11:08
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.
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.
25 mai 2010 à 18:05
25 mai 2010 à 18:09