supression des lignes contenant même numéro

[coolmen1080]

Bonjour j'apprécierais si quelqu'un pouvait me faire la macro suivante:

j'ai un tableau excel avec des numéro de groupe dans la colonne A (EX: 30000, 2543, B150, ....). Cependant, quelques groupes se retrouvent plusieurs fois dans ma colonne et j'ai besoin de ceux-ci qu'une seule fois. Comme j'ai une centaine de groupe, je voudrais une macro qui supprime les lignes des groupes qui se retouvent en double, triple, etc. tout en gardant la ligne du groupe lorsqu'il apparait pour la 1ere fois.

Merci amis informaticiens

phil

 

[pierrejean]

Re : supression des lignes contenant même numéro

bonjour phil

Bien qu'amateur plutot qu'informaticien , je te propose la macro suivante
Elle ne supprime rien sur la feuil1 mais ne reporte en feuil2 qu'une des lignes doublons

 

[job75]

Re : supression des lignes contenant même numéro

Bonjour,
Pour un amateur, pas mal...
Moi je n'ai fait qu'une toute petite :

Sub SupprGroup()
For i = 1 To Application.CountA(Range("A:A"))
txt = Range("A1").Offset(i - 1, 0).Value
For j = i + 1 To Application.CountA(Range("A:A"))
If Range("A1").Offset(j - 1, 0).Value = txt Then Rows(j).Delete
Next
Next
End Sub

Edit : j'ai supprimé les lignes plutôt que les cellules, comme demandé

A+

 

[pierrejean]

Re : supression des lignes contenant même numéro

Re

Salut job75

Ta petite est diablement efficace !!

 

[coolmen1080]

Re : supression des lignes contenant même numéro

merci les gars, exactement ce que je voulais