suppression lignes identiques

1 réponse

bernard

02/04/2005 à 07:37

bonjour à tous,
j'ai une feuille de calcul de 30000 lignes environ, comment après tri
supprimer par VBA les lignes identiques (exemple en A1=50020356, enA2=
50020356,en A3=50020356,en A4=50020487,en A5=50020487, etc.... je veux
supprimer A5,A3,A2.
meric d'avance
--
bernard

1 réponse

PEB

02/04/2005 à 08:24

Tu copies ta (tes) colonnes sans doublon vers un autre emplacement :

exemple suivant : les données de la colonnes A vont être filtrées vers la
colonne B sans doublon.

NB : les en-têtes de colonnes A1 et B1 doivent être identiques. (Ex : A1
="DATAS" = B1)
Dans ton cas il conviendra de les insérer puisque "A1" est une valeur.

Columns("A:A").AdvancedFilter Action:=xlFilterCopy, CopyToRange:=Columns( _
"B:B"), Unique:=True

Bien à toi,

PeB

"bernard" a écrit dans le message de
news:

bonjour à tous,
j'ai une feuille de calcul de 30000 lignes environ, comment après tri
supprimer par VBA les lignes identiques (exemple en A1P020356, enA2 > 50020356,en A3P020356,en A4P020487,en A5P020487, etc.... je veux
supprimer A5,A3,A2.
meric d'avance
--
bernard

suppression lignes identiques

1 réponse

Veuillez sélectionner un problème