Incrémenter des doublons sur Excel

Bonjour

Problème classique; proposition sans macro

tes noms prénoms en colonne A et B

en colonne C ( à masquer)
=GAUCHE(A2;3)&GAUCHE(B2;3)
en colonne D
=SI(NB.SI(C$2:C$28;C2)>1;C2&NB.SI(C$2:C2;C2);C2)

formules à tirer vers le bas

maintenant pour des milliers de login, on pourrait passer par VBA (bof!): la méthode est la m^me que par formule + boucle et variable-tableau pour la rapidité;si ca t'intéresse, je reviens en fin de journée (rando) mais un forumeur devrait pouvoir te répondre avant mon retour!

Bonjour le fil,

Je pense qu'il est possible d'obtenir directement le résultat, à partir de A2 saisir nom et prénom
DUPONT Catie etc ...

en B2 coller cette formule et incrémenter vers le bas

=GAUCHE(A2;3)&SUBSTITUE(STXT(A2;CHERCHE(" ";A2)+1;3);;)&NB.SI($A$2:A2;A2)

et si on souhaite numéroter à partir du premier doublon

=GAUCHE(A2;3)&SUBSTITUE(STXT(A2;CHERCHE(" ";A2)+1;3);;)&SI(NB.SI($A$2:A2;A2)-1=0;"";NB.SI($A$2:A2;A2)-1)

A+
Mike-31

Une période d'échec est un moment rêvé pour semer les graines du savoir.

Bonjour,
d'abord un grand merci à tous, je ne m'attendais pas a autant d'engouement pour mon problème, c'est super. Il faut que je fasse des essais. Je vous tiens au courant.
A++

Bonjour,
J'ai testé votre solution Michel_m et elle me satisfait.
A vrai dire vu que je ne suis pas très doué, je n'ai pas réussi à adapter les autres solutions à mon tableau excel :-/

Je rajouterais une contrainte supplémentaire, je m'explique:
j'ai une macro qui colorie les cases des doublons détectés. Cependant elle n'est pas très pratique puisqu'il faut la lancer manuellement et ensuite choisir une plage d'application. De plus, tous les doublons se colorient en vert au lieu de mettre une couleur par groupe de doublons.

Serait-il possible qu'en plus d'incrémenter les doublons, leurs cases soient soient colorées de différent couleur (ex: tous les "DUPONT1", "DUPONT2", "DUPONT3", etc. en bleu, les "DUPRES1", "DUPRES2", etc. en rouge) et ne pas avoir à rentrer manuellement la plage?

Voici la macro:

Sub MarqueLesDoublons()
Dim Plage As Range, i&, Cell As Range, Rng As Range

On Error Resume Next
Set Plage = Application.InputBox("Plage à examiner", Type:=8)
If IsEmpty(Plage) Then Exit Sub

Application.ScreenUpdating = False

For Each Cell In Plage
For i = 1 To Plage.Count
Set Rng = Cell.Offset(i)
If Rng <> "" And Rng = Cell Then
Cell.Interior.ColorIndex = 43
Rng.Interior.ColorIndex = 43
Exit For
End If
Next i
Next Cell

End Sub

Je vous joint ci-dessous une partie de mon fichier excel, j'ai enlever une grande partie de mes colonnes et le nom et le prénom des utilisateurs pour une question de confidentialité...

https://www.cjoint.com/?AIBchF9W2Qd

Merci par avance

Salut,

tu peux tout faire simplement sans passer par le VBA, dans mon exemple en A tu saisis le nom et prénom une formule recompose le nom et prénom en conservant que les trois premières lettres de chacun
et une mis en forme conditionnelle pour coloriser uniquement les doublons. si tu souhaites que les tous les mots en doublon se colorisent, la formule est plus simple
=NB.SI($A$2:$A$20;A2)>1

https://www.cjoint.com/?AIBi5lyG472
A+
Mike-31

Une période d'échec est un moment rêvé pour semer les graines du savoir.

Bonjour,

Je ne comprends pas trop ta démarche

dans ton classeur, tu as une macro** qui t'incrémente les doublons et il suffirait alors d'affecter les couleurs sans avoir à réécrire une macro

**:peut-^tre des petites modifs pour quelle respecte ta disposition

tu dis