Vba : suppression doublons dans n'importe quelle colonne

Résolu
gbdos Messages postés 65 Date d'inscription   Statut Membre Dernière intervention   -  
gbdos Messages postés 65 Date d'inscription   Statut Membre Dernière intervention   - 15 janv. 2024 à 13:49

Bonjour à tous, 

Je travaille actuellement sur une macro pour mettre en forme et supprimer les doublons d'un fichier de données. 

J'ai rapatrié toutes mes données dans un seul onglet. Je souhaite supprimer les doublons colonne par colonne. 

J'ai bien mon code pour supprimer dans la colonne A et ma boucle pour passer d'une colonne à la suivante, jusqu'à la dernière colonne ayant des données. 

Mais là maintenant je ne sais pas comment modifier le code pour supprimer, pour qu'il prenne la bonne colonne dans les paramètres du code:

Code pour suppression doublon dans colonne A :

ActiveSheet.Range("$A$1:$A$2000").RemoveDuplicates Columns:=1, Header:=xlYes

Comment je peux changer ce code pour qu'il prenne la plage avec la colonne suivante, sans écrire en dur B à la place de A ?

Si quelqu'un a une idée :), merci d'avance. 


Android / Chrome 120.0.0.0

1 réponse

Réponse 1 / 1
yg_be Messages postés 23541 Date d'inscription   Statut Contributeur Dernière intervention   Ambassadeur 1 583
 

bonjour, une suggestion

dim col as long
col=1
ActiveSheet.Range(ActiveSheet.Cells(1,col),ActiveSheet.Cells(2000,col)). _
     RemoveDuplicates Columns:=1, Header:=xlYes
1
gbdos Messages postés 65 Date d'inscription   Statut Membre Dernière intervention   2
 

Merci beaucoup :)

ça fonctionne impeccable.

0

Discussions similaires

"L'indice n'appartient à la sélection" + VBA
fleur.31 -
geosevda -

2 réponses
Erreur d'exécution 13 Incompatibilité de type
grace -
pijaku -

5 réponses
appliquer une pause dans une macro vba excel
ch'duj -
lerif25 -

10 réponses
ouverture d'un fichier excel à partir d'un code VBA
TraderAS -
pijaku -

3 réponses
Méthode find dans VBA - Recherche de données sous Excel
baissaoui -
baissaoui -

0 réponse