Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Problème de Macro Suppression DOUBLONS

benjy555

XLDnaute Junior
Bonjour

N'étant pas expert en macro j'ai tout bêtement utilisé l'enregistrement pour cette macro.
Je me positionne sur la première cellule du tableau (6 colonnes / 43 000 lignes qui s'actualise tous les jours) puis dans l'onglet "DONNEES" je clic sur "supprimer les doublon" . je sélectionne toutes les colonnes et coches titre en entête.
A ce moment tous les doublons de ma table disparaissent parfaitement et voici la macro enregistrée :

Sub doublon()

Sheets("Base").Select
ActiveSheet.Range("Tableau_stat_control_germi[#Tout]").RemoveDuplicates _
Columns:=Array(1, 2, 3, 4, 5, 6), Header:=xlYes

End Sub


Tous les jours j'actualise cette table et le nombre de ligne s’incrémente, il faut donc relancer cette macro et la ça plante ! avec interruption de macro en clic sur "debug" se surligne en jaune toute la ligne ActiveSheet.......

En gros la commande qui marche tres bien lors de l'enregistrement ne fonctionne pas par Macro !

comment faire ?

Merci
 

Modeste

XLDnaute Barbatruc
Re : Problème de Macro Suppression DOUBLONS

Bonjour benjy555

Essaie en enlevant le [#Tout] ...
Code:
ActiveSheet.Range("Tableau_stat_control_germi").RemoveDuplicates _
        Columns:=Array(1, 2, 3, 4, 5, 6), Header:=xlYes
 

Discussions similaires

Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…