doublon

A

al1000

XLDnaute Impliqué

• 1 Octobre 2006

• #2

Re : doublon

bonjour

j'ai trouve cette macro mais je voudrais l'adapter:
Dim i As Long
For i = 1 To Range("c235").End(xlUp).Row
Range("a" & i & ":B" & i).Interior.ColorIndex = -4148 * (Application.CountIf(Range("A1:A" & i), Cells(i, 1)) > 1) - 4142
Next i
End Sub

mais je voudrais l'adapter:
Si dans la colonne de c2 à c235 j'ai un doublon
alors je mets en jaune la cellule a et b (davant le doublon)

a+

 

Vote positif 0 Vote négatif

L

lacorse33

XLDnaute Occasionnel

• 1 Octobre 2006

• #3

Re : doublon

Bonsoir al1000 et le forum,

Voici une réponse à ta demande

@+
Béa

 

Dernière édition: 5 Octobre 2006

Vote positif 0 Vote négatif

L

lacorse33

XLDnaute Occasionnel

• 1 Octobre 2006

• #4

Re : doublon

al1000,

Pour info, j'ai mis une mise en forme conditionnelle.

@+

 

Vote positif 0 Vote négatif

O

ODVJ

XLDnaute Impliqué

• 1 Octobre 2006

• #5

Re : doublon

Bonsoir,

une mise en forme conditionnelle te conviendrait-elle?
tu sélectionnes A2:B200 et tu saisis en formule dans la MFC :
=NB.SI($C$2:$C$200;$C2)>1
tu choisis le format qui te convient et ça roule

A+

Ah Ah!! excellent!
même formule et même couleur!!
salut lacorse33

 

Vote positif 0 Vote négatif

A

al1000

XLDnaute Impliqué

• 1 Octobre 2006

• #6

Re : doublon

bonsoir

merci pour votre lumiere

a+

 

Vote positif 0 Vote négatif