Copy/paste vba script results in missing data or method of range class failed

Tried umpteen different ways to get this to work and only two do (sort of, but not really), and ultimately result in errors.

The first routine copies and then if any data exists on the worksheet, it should then be copied to a second worksheet -- problem is, when it copies to the second worksheet, the first way (without errors) there is no data, only highlights the same number of cells in the range on the second sheet. The second way, when I run an activeworksheet.paste (or a couple of other ways -- I've spent so long looking at it I'm seeing sideways), it results in method of range class failed, but throws the error AND copies the data.

I'm almost sure it's something simple and could use a fresh set of eyes... What am I missing? Or is there an easier way?

Please Login or Register  to view this content.

Seriously -- I've been working on the details of this for about a week now, trying to find the best way to approach this problem and the few minutes you spent put me on the right track and I can finally start moving forward and fleshing this out. You.Are.Awesome.

I did, by the way, find a better way to approach the line deletion, by just shifting some of the code around. So again, thank you.

Please Login or Register  to view this content.

Also, having not known the actual name of the standard, 'Hungarian Notation', until today and prior to your first reply, seeing you had changed my sheet labels to match was a nice reminder that it's just good practice, personal or otherwise, to maintain it's use in one's code. I'll try to remember, in the future when uploading my workbooks, to maintain that sort of notation across all aspects of my code/work.

I guess my next question, given the changes to the code, what would be the best way to approach error handling with the 'selusrrng' inputbox? I can't seem to lock down an exit sub on pressing cancel... I've tried both in the function and in the selusrrng call in the main sub and I still wind up getting kicked to 424 "Object Required".

Here's my changes so far (see comments within the code for locations):

Please Login or Register  to view this content.

Had I not just spent the last few days, off and on, banging my head against a silly worksheet specific button in RibbonX I'd be more inclined to try further, but my head hurts and I'm exhausted...

Any thoughts?