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

Detecter doublons

kaki31

XLDnaute Occasionnel
Bonsoir tous le monde;

Ya t'il un moyen de détecter les doublons ( les colorer ) comme dans l'exemple joint ?

je les ai trié pour simplifier.

Merci
 

Pièces jointes

  • Doublons1.xls
    16 KB · Affichages: 63
  • Doublons1.xls
    16 KB · Affichages: 65
  • Doublons1.xls
    16 KB · Affichages: 60

job75

XLDnaute Barbatruc
Re : Detecter doublons

Bonsoir kaki31,

Si j'ai bien compris :

- sélectionner les colonnes B:C

- effacer les couleurs des cellules

- mise en forme conditionnelle (MFC) avec cette formule :

Code:
=SI(NB.SI($C:$C;$C1)>1;EQUIV($C1;$C:$C;0)=LIGNE())
A+
 

kaki31

XLDnaute Occasionnel
Re : Detecter doublons

je m'explique ;

Si en colonne B j'ai par exemple 11 fois Lucas et en colonne C j'ai 10 fois Lucas, j'aurais donc 10 Lucas colorés en B et 10 Lucas colorés en C, ça va de paire 2,4,6,8....

 
Dernière édition:

DoubleZero

XLDnaute Barbatruc
Re : Detecter doublons

Bonjour, kaki31, job75 , le Forum,

Si j'ai compris le besoin , peut-être ainsi :

Code:
Option Explicit
Sub Doublons_colorer()
Dim i As Long
For i = 2 To Range("b65536").End(xlUp).Row
    If Range("b" & i).Value = Range("b" & i).Offset(, 1).Value Then Range("b" & i).Resize(, 2).Interior.ColorIndex = 36
Next
End Sub

A bientôt
 

job75

XLDnaute Barbatruc
Re : Detecter doublons

Re, bonjour chère ânesse

On peut bien sûr faire l'inverse, fichier (2).

A+
 

Pièces jointes

  • Doublons(2).xls
    26 KB · Affichages: 57
  • Doublons(2).xls
    26 KB · Affichages: 58
  • Doublons(2).xls
    26 KB · Affichages: 62
Dernière édition:
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…