add imported text file name above imported data

Hey,

I need to import huge amounts of text files in single excel workbooks. The text files are all located in one folder and are named as follows: "A2224.txt" "A2225.txt",... They consist of two columns of data (numbers) each.

I did find code that is working great to import all textfiles that I select and imports it in a workbook. Each imported textfile is a new sheet in the workbook with the sheet name being the name of the original textfile. The two comuns of data per text file are located in the two columns (A:B) of each imported worksheet.

the code is as follows:

Please Login or Register  to view this content.

now I would like to insert a column header (at B1) in each imported text file/worksheet that has the same name as the worksheet/textfile...

I am sorry that I can't solve something as simple as this not myself yet, but I am quite new to this. Any help would be most appreciated!

thank you very much!
wishes
Tom