Rename Sheet While Copying To New Workbook

I have an electronic meter (Fluke AirCheck) that provides me with reports in the form of excel documents. I need to combine those documents and have a page/worksheet that contains a legend and some notes etc. for reporting to management.

Given:
I have a folder with nearly identical workbooks. All contain 4 worksheets:
Document map
Sheet2
Sheet3
Sheet4

Goal:
1. Copy and combine, either specific sheet(s) or all the sheets from multiple workbooks into a new workbook (with prompting)
2. Rename the worksheets as the workbook file names and existing worksheet names combined.

Example:
Workbook name is "101B.xls"
Worksheet 1 would be = "101B - Document Map"
Worksheet 2 would be = "101B - Sheet2"
Worksheet 3 would be= "101B - Sheet3"
Worksheet 4 would be= "101B - Sheet4"

Results thus far:
Okay so I managed to find a script that does most of what I need:

[Code] .....

For renaming the worksheets I have tinkered with:

[Code] .....

But alas none of that works. I can also only copy 1 sheet at a time currently.

Another issue which seems to have reared its ugly head in the copy and paste function as the text on my new worksheets is white on white when the originals are black text on white. I can select the new worksheet and select all cells and hit "Automatic" on text and it fixes it but that's a pain on 100+ worksheets. So I need some sort of copy /paste special command, I think to make that work too.