Discussion :

[Pierre Fauconnier]

Oui Marcel (Sorry, j'ai édité mon message précédent). La colonne ne doit évidemment être ajoutée que la première fois puis complétée pour chaque fichier...

[MarcelG]

Merci mais surtout pas de "Sorry". Tu penses!

En fait, je n'avais qu'un enregistrement d'où

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

.Cells(1,1)

Pour un cas plus général, si l'on veut compéter toutes les lignes du tableau structuré final (ce qui est bien entendu souhaitable), alors la dernière ligne de la fonction Merge devient

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
With celTarget.Offset(0, Target.ListColumns(SourceColumnName).Index - 1)
        .Resize(.Rows.Count, 1).Value = SourceName
 End With

Merci, Pierre.
Ma documentation sur les tableaux structurés commence à s'étoffer