Afficher doublon

BRUNO62 · 16 Mai 2010

Bonsoir,

J'ai besoin d'aide.
Ci-joint ma demande
Avez vous une solution ?
Merci, d'avance
A+

Tibo · 16 Mai 2010

Re : Afficher doublon

Bonsoir,

Demande très proche de celle-ci :

https://www.excel-downloads.com/threads/afficher-doublon-essentiellement.141922/

Tu pouvais poursuivre sur ce fil initial.

En attendant une solution VBA, une solution formule en B2 :

Code:

=SI(NB.SI($A$2:$A$9;A2)>1;A2;"")

à recopier vers le bas

@+

BOISGONTIER · 17 Mai 2010

Re : Afficher doublon

Bonjour,

Code:

  For Each c In Range([A2], [A65000].End(xlUp))
    If Application.CountIf([a:a], c) > 1 Then c.Offset(, 1) = c
  Next c

JB

BRUNO62 · 17 Mai 2010

Re : Afficher doublon

Bonjour,

Merci à BOISGONTIER et Tibo
C'est OK.
Bonne journée
A+

Privacy & Transparency