Doublons (et oui encore!)

[pierre]

Bonsoir,

J´ai 2 bases de données (1 en colonne A et une en colonne B) de + de 2000 references de produits, et je voudrais les comparer et mettre en evidence les doublons (au pire les oculter).

Meric pour vos sugjestion

PS: je me gave pas trop en VBA...

 

[zon]

Salut Pierre,

Voila un début de code (Excel 2000 et +),
où on coupe les cellules de la deuxième colonne dans la troisieme

Sub doublon()
Dim L1, L2, i, j, k As Integer
Set wsbase = Sheets("feuil1")
L1 = wsbase.Range("A65536").End(xlUp).Row
L2 = wsbase.Range("B65536").End(xlUp).Row
k = 1
For i = 1 To L1
For j = L2 To 1 Step -1
If Cells(i, 1) = Cells(j, 2) Then
Cells(j, 2).Cut Destination:=Cells(k, 3)''on coupe et on colle
k = k + 1

End If
Next j
Next i
End Sub

Sub doublon() ''''on supprime les cellules en doublon
Dim L1, L2, i, j As Integer
Set wsbase = Sheets("feuil1")
L1 = wsbase.Range("A65536").End(xlUp).Row
L2 = wsbase.Range("B65536").End(xlUp).Row
k = 1
For i = 1 To L1
For j = L2 To 1 Step -1
If Cells(i, 1) = Cells(j, 2) Then
Cells(j, 2).delete Shift:=xlUp
End If
Next j
Next i
End Sub

 

[Patrick]

Bonjour, ce problème de doublons m'interesse au plus au point.
Si l'on enregistre ta macro tel quel, cela ne fonctionne pas ( probl de nom répété 2 fois dans la macro: Sub Doublon()

Ensuite, avant de lancer cette ou ces macros, faut-il sélectionner 2 ou 3 colonnes ?

Les 2 colonnes à comparer doivent-elles être A et B ???

merci de ta patience !!!

 

[zon]

Salut Patrick,

Ce sont deux macros, si tuveux utiliser les deux dans le même fichier il faut renommer la seconde ex: sub doublon2 ().

Tu n'as pas besoin de selectionner les colonnes avant de la lancer.

Si tu veux, envoie moi ton fichier que tu as à dédoublonner, je t'expliquerai plus en détail ..

A+++

 

[Celeda]

Bonjour le Forum,

Quelques liens sur les doublons et des fonctionnalités diverses (formules et vba) qui peuvent t'aider.



Lien supprimé

Lien supprimé

Lien supprimé
(deux pour 1) (Ti : l'image des explications est partie)

Celeda

 

[Monique]

Bonsoir,

Je viens juste de terminer un fichier là-dessus :
données sur 2 colonnes, possibilités de plages vides,
report des données sans doublons sur une autre colonne.
(formules, pas de macro)

 

[zon]

Bonsoir Monique,

Effectivement une fois de plus on arrive au même résultat sans macro, par contre il faut reconnaître que cela est aussi compliqué (voire plus) à mettre en place qu'une macro.

A+++

 

[Monique]

Bonsoir,

Mais non, c'est pas compliqué.
Et quand on ne connait pas l'anglais...

 

[Patrick]

Bonsoir, merci pour le coup de main, ok pour enregistre les 2 macros, mais cela décle une colonne par rapport à la seconde, c'est tout !!!

Si tu as le courage je te joins un petit fichier d'exemple. Il s'agit de 2 colonne de N° client sur 2 mois différents, le fait de trouver les doublons me permet de déduire immédiatement les comptes nouveaux et ceux qui ont arrêté; Ligne par ligne cela me prends des heures !!!!

 

[zon]

Bonsoir Patrick et à tout le forum,

Tiens en fichier voilà la macro que j'ai associé à un bouton.


Ne t'inquiètes pas si le sablier reste pendant un trentaine de secondes quand tu lances la macro.


A+++


Dis moi si celle là que tu voulais...

 

[Patrick]

Bonjour à tous, je te remercie, cela correspnd à ce que je cherchais, je suis simplement étonné du temps relativement long nécessaire; toutefois, le principal est que cela fonctionne !!!! Excellente semaine.

Cordialement : Patrick