VB that merges multiple files into one worksheet - but does this 3 times - see detail

[BlueberryTech]

Hey guys,

I need your help with a 3 macros, I found some stuff that's close but isn't working quite right.

I have a workbook that has the following tabs: "Directions", "Equipment Location Reports", "Low Battery Tamper Tag Reports", and "3rd Party Reports".

On the "Equipment Location Reports" tab, I want to be able to select a "MergeEquipLocationReports" macro that will: prompt me to browse to whatever folder my files are in, select multiple files to merge, copy data contained in columns A-L of all the files I've selected, and paste it to the "Equipment Location Reports" tab without duplicating the column headings found in columns A-L of each sheet (they'll all have the same column headings).

On the "Low Battery Tamper Tag Reports" tab, I want to be able to select a "MergeLowBatteryReports" macro that will: prompt me to browse to whatever folder my files are in, select multiple files to merge, copy data contained in columns A-K of all the files I've selected, and paste it to the "Low Battery Tamper Tag Reports" tab without duplicating the column headings found in columns A-K of each sheet (they'll all have the same column headings).

On the "3rd Party Reports" tab, I want to be able to select a "Merge3rdPartyReports" macro that will: prompt me to browse to whatever folder my files are in, select multiple files to merge, copy data contained in columns A-AQ of all the files I've selected, and paste it to the "3rd Party Reports" tab without duplicating the column headings found in columns A-AQ of each sheet (they'll all have the same column headings).

I would greatly appreciate your expertise!

[Bernie Deitrick]

Assumes your headers are in row 1 and each of the workbooks has only one sheet: It is left as a learning exercise for you to create the other 2 macros based on this macro.

Please Login or Register  to view this content.

[BlueberryTech]

Hi Bernie,

It didn't work, it produced the following error:

Run-time error '9':
Subscript out of range

[BlueberryTech]

Hey Bernie,

Hold up .... let me retest - I think I might have done something wrong... hold tight...

[BlueberryTech]

Hi Bernie Deitrick

Ok, so it worked, the only problem was it left the column headings blank, I want the column headings to come over, I just don't want them duplicated times however many sheets I've selected to copy. I hope that makes sense - the only piece missing is the column headings.

[Bernie Deitrick]

I thought you had them - use this version:

Please Login or Register  to view this content.

[BlueberryTech]

Hi Bernie Deitrick,

This is it exactly!! Thank you soooooooo much - you ROCK!