Need help with adding shortcut, not copying blank rows, and saving worksheet

I was able to get my macro to work with the code below and then I was asked to tweak a little and now I'm having problems again. Assistance on the tweaks to my code is greatly appreciated.

The tweaks I am to add:
1) Add a keyboard shortcut. However, when I do this, the macro stops running at the point when I open my other workbook. Want to use Ctrl + Shift +Q
2) Skip blanks rows in my iteration series as some are merged cells acting as header dividers to breakup the sheet. When I do this, it leaves the blank row still on my new worksheet (shtLoad).
3) Copy the newly created worksheet (shtLoad) as its own workbook (as well as leave a page in the active workbook) and title it using part of the name of the sheet (shtReq) it is pulling data from. I haven't tried this because my brain is fried after how long I've spent trying to get everything else to work.

Please Login or Register  to view this content.