macro per merge files csv

Raga buonasera a tutti,
ho urgenza di avere una macro che mi permetta di incollare in un unico foglio il contenuto di oltre 2000 file csv. Nel foglio di riepilogo è necessario che appaia, nella prima o nella ultima colonna, anche il nome del file.
Vi allego la macro da me creata che però mi fa apparire il nome del file solo nella prima riga io invece necessito di averla anche in quelle successive. Vi allego macro e quanto a me necessitante[TESTO ::Dim wsMerge As Worksheet Dim RowInsert As Long Sub Merge_Files() Const FolderPath As String = "" Dim Files As String Dim wbTemp As Workbook Dim LastRow As Long Set wsMerge = ThisWorkbook.Worksheets("Merge") Call ClearMergeWorksheet RowInsert = 2 Files = Dir(FolderPath + "*.csv") Application.DisplayAlerts = False Do Until Files = "" Set wbTemp = Workbooks.Open(Files) With wbTemp.Worksheets(1) LastRow = .Cells(Rows.Count, "A").End(xlUp).Row .Range("A2:G" & LastRow).Copy '<<<<<<<<<<<<<<<<<< wsMerge.Range("A" & RowInsert).PasteSpecial xlPasteValues wsMerge.Range("H" & RowInsert) = Files '<<<<<<<<<<<<<<<<<< wbTemp.Close False RowInsert = RowInsert + LastRow - 1 End With Files = Dir() Loop Application.DisplayAlerts = True MsgBox "File Merge Complete", vbInformation End Sub Private Sub ClearMergeWorksheet() Dim LastRow As Long With wsMerge LastRow = .Cells(Rows.Count, "A").End(xlUp).Row If 2 > LastRow Then Exit Sub .Range("A2:N" & LastRow).ClearContents End With End Sub]

Caro Giuseppe,
come da tua indicazione, allego alcuni files origine da cui necessito copiarne il contenuto, tranne la prima riga che si ripete, creando così un foglio unico nel quale inserire una colonna finale riportante il nome del file origine di fianco a ogni riga (come da esempi allegati)

Allega un File (senza Dati sensibili) con alcuni Record significativi già inseriti e chiarisci ciò che desideri ottenere.

A margine di quanto sopra, anche se no è una mia prerogativa, ti suggerisco di proporre eventuali Codici VBA nel modo corretto ponendo le Istruzioni all'interno di 

---

CODE /CODE  entrambi racchiusi fra []

---

P.s. Sono/Siamo ancora in religiosa 😠attesa di un riscontro di:
http://www.freeforumzone.com/d/11478458/Macro-per-copia-dati/discussione.aspx?#idm135456583

Giuseppe

E pensare che non ha nemmeno avuto la decenza di dire che la macro è già stata 'ritoccata' da patel in quest'altro forum:
https://www.excelvba.it/forumexcel/forums/discussione/macro-per-incollare-oltre-2000-file-csv/

Crossposting a gogo