Macro pour concatener une liste de longueur variable

Bonjour à tous,

Tout d'abord, j'espère que vous allez bien en cette période difficile et je vous remercie de prendre le temps de me lire.

Comme l'indique le titre, je m'arrache les cheveux depuis plus d'une heure pour créer une macro afin de concaténer une liste variable de NOM et une liste de PRENOM dans une seule et même cellule.

Cette liste pourra être plus longue ou plus courte, c'est pourquoi j'aimerais une macro qui prenne en compte la sélection.

J'ai essayé plusieurs codes en fouillant sur le forum mais ne s'adapte pas à ce que je veux.

C'est pourquoi je me permets de solliciter votre aide s'il vous plait

En pièce jointe un fichier exemple avec une tentative de macro.

Bonjour,

Par exemple, en conservant le principe de la formule :

Sub Concatener()
Range("C2:C" & Cells(Rows.Count, "A").End(xlUp).Row).FormulaR1C1 = "=RC[-2]&"" ""&RC[-1]"
End Sub

Peut-être?

Sinon, en écrivant en "dur" :

Sub Concat2()
Dim Cel As Range
For Each Cel In Range("C2:C" & Cells(Rows.Count, "A").End(xlUp).Row)
    Cel = Cel.Offset(, -2) & " " & Cel.Offset(, -1)
Next Cel
End Sub

Oui, ça fonctionne.

Merci beaucoup !