Supprimer les doublons

C

Compte Supprimé 979

Guest

• 12 Mai 2010

• #2

Re : Supprimer les doublons

Sophie, bonjour.

Sujet traité des milliards de fois 😱
merci d'effectuer des recherches sur le forum ou sur google
Ce lien n'existe plus=

A+

 

Vote positif 0 Vote négatif

U

Ubot303

XLDnaute Occasionnel

• 12 Mai 2010

• #3

Re : Supprimer les doublons

Bonjour à tous les 2,

Puisque je suis dans ma période TCD, voici une solution "rigolote" et pas du tout optimisée pour repérer les doublons... 😀

Une recherche te permettra de trouver les formules des cracks du site ultra optimisées 😛

 

Pièces jointes

• Sophie.zip

  3.6 KB · Affichages: 33
• Sophie.zip

  3.6 KB · Affichages: 34
• Sophie.zip

  3.6 KB · Affichages: 35

Vote positif 0 Vote négatif

D

david84

XLDnaute Barbatruc

• 12 Mai 2010

• #4

Re : Supprimer les doublons

Bonjour à tous,
sous réserve d'avoir compris ta demande, ci-joint fichier à tester.
Cordialement

 

Pièces jointes

• Doublons_sophie.xls

  43.5 KB · Affichages: 80

Vote positif 0 Vote négatif

Sophie11

XLDnaute Occasionnel

• 12 Mai 2010

• #5

Re : Supprimer les doublons

oui je sais je sais et croyais moi, j'en ai fais une recherche, mais j'ai trouvé beaucoup de résultat mais aucun correspondé à mon cas 🙁
Merci pour vos réponses mais je souhaite créer une macro qui me supprime les doublons et non pas créer un nouveau tableau à coté avec mes cellules de references 🙁
En tout cas merci quand même

 

Vote positif 0 Vote négatif

U

Ubot303

XLDnaute Occasionnel

• 12 Mai 2010

• #6

Re : Supprimer les doublons

Il aurait fallu indiquer que tu souhaitais une macro... 🙄

Il faut mettre en place une boucle qui scanne la colonne, repère les doublons (les doublons sont-ils toujours à la suite les uns des autres) et supprime les lignes (ou les valeurs?) redondantes...

Ou bloques-tu?

 

Vote positif 0 Vote négatif

Sophie11

XLDnaute Occasionnel

• 13 Mai 2010

• #7

Re : Supprimer les doublons

Merci à vous, je voudrais supprimer les lignes qui ont les doublons.
Je vais regarder ton code, je vais essayer de trouver par moi même pour modifier ton code...
Mais je veux bien que quelqu'un me donne la solution. Promis que je regarderais qu'en guise de correction 🙂
😛 😛

 

Vote positif 0 Vote négatif

L

Lii

XLDnaute Impliqué

• 14 Mai 2010

• #8

Re : Supprimer les doublons

Bon soir,

un autre exemple.

 

Pièces jointes

• SansDoublon(VBA).xls

  22.5 KB · Affichages: 90

Vote positif 0 Vote négatif

Sophie11

XLDnaute Occasionnel

• 14 Mai 2010

• #9

Re : Supprimer les doublons

merci à vous.
Pour reprendre le code de Jean-Marcel, si je veux supprimer les lignes et non pas les mettre en blanc, je pense modifier ces lignes:

Sub SupprimerDoublons()
Dim Collec As New Collection
Dim cell As Range, Itm As Long
With Sheets("Sheet1")
For Each cell In .Range("C5:C" & .Range("C65536").End(xlUp).Row)
On Error GoTo GestionDesErreurs
Valeur = cell & cell.Offset(0, 1)
Collec.Add Valeur, CStr(Valeur)
Autre:
On Error GoTo 0
Next
End With
GestionDesErreurs:
If Err = 457 Then
Err = 0
cell = ""
cell.Offset(0, 1) = ""
Resume Autre
End If
End Sub


Mais tous mes essais étaient infructueux, si quelqu'un a un idée sur ce code?

Mercii 🙂 😛

 

Vote positif 0 Vote négatif

Sophie11

XLDnaute Occasionnel

• 14 Mai 2010

• #10

Re : Supprimer les doublons

Merci Jean-Marcel et les autres. j'aurais jamais réussi toute seule...
Ca marche trés bien!! Thanks!!

 

Vote positif 0 Vote négatif