Import multiple .TXT/.TAB files only using one header row

**Delta** · 05-04-2012, 02:41 AM

Hello,

I am currently using VBA code to import multiple .txt and .tab files into excel. Each file has a header row and data. When the macro imports these files, I want it to only use one header row instead of what it is doing now. Is this even possible with variable file names? Here is a copy of the code I am using:

Please Login or Register  to view this content.

Please find attached example workbook and source files. Any assistance in this matter is greatly appreciated....Regards... Delta

**JBeaucaire** · 05-04-2012, 03:07 AM

Add a Boolean dim at the top:

Please Login or Register  to view this content.

Then change this:

Please Login or Register  to view this content.

...to this:

Please Login or Register  to view this content.

**Delta** · 05-04-2012, 04:21 AM

Hello,

Thanks for the quick reply. I have made the adjustments, saved, closed, and reopened.. The macro now hangs up here:

Please Login or Register  to view this content.

with a "Run-time error 1004 Application-defined or object-defined error"

The Dim section now looks like this:

Please Login or Register  to view this content.

and the full code looks like this:

Please Login or Register  to view this content.

Thanks again for you knowledge and assistance.....Regards..... Delta

**watersev** · 05-04-2012, 04:52 AM

hi Delta, try to change your original code as follows:

Please Login or Register  to view this content.

to

Please Login or Register  to view this content.

**JBeaucaire** · 05-04-2012, 01:37 PM

I had thought that trick might work to convert the Boolean TRUE into 1 to offset 1, I tested this and it works now:

Please Login or Register  to view this content.

Basically, the first time through the copy command Titles=False so it won't offset, thus including the title row. After that, it's always TRUE so it will always offset 1 row, skipping the titles.

**Delta** · 05-04-2012, 01:58 PM

Excellent.....The data is imported under one header... Exactly what I was looking for... Thank you so much JBeaucaire...watersev, your solution works as well but no headers are retained in the import. I probably was not clear as to what I was looking for... Your efforts are greatly appreciated... I was wondering if you guys could look at another post involving this same code and importing all data fields as text data format instead of the excel default of general data format, but I do not know how to link it here....Thanks again for sharing your knowledge, time, and effort.....Regards.... Delta