Anonymiser des noms de voyageurs

Bonjour à tous !

J'aurais besoin de votre aide pour anonymiser des noms des voyageurs dans mon fichier Excel qui reprend une liste de réservations :)

Un même voyageur peut avoir plusieurs réservations à son nom et donc être présent sur plusieurs lignes.

A ce jour, l'info est en colonne P de mon fichier, avec ce format :

NOM/PRENOM

Je souhaiterai avoir quelque chose de type :

Voyageur 1

Voyageur 2

Voyageur 3....

Est-ce possible ? :)

Merci beaucoup pour votre aide !

Bonjour à tous,

Une proposition :

bonjour,

edit: Hello DjiDji59430

une proposition (vba), ne fonctionne pas sur Mac.

Sub anonymiser()
    Set dict = CreateObject("scripting.dictionary")
    With Sheets("sheet1") '<- à adapter
        dl = .Cells(Rows.Count, "P").End(xlUp).Row
        t = .Range("P2:P" & dl)
        For i = 1 To UBound(t)
            If dict.exists(t(i, 1)) Then
                an = dict(t(i, 1))
            Else
                ctr = ctr + 1
                an = "Voyageur " & ctr
                dict(t(i, 1)) = an
            End If
            t(i, 1) = an
        Next i
        .Range("P2").Resize(UBound(t), 1) = t
    End With
End Sub