Help Fixing Copy/Paste VBA

[juniperjacobs]

I have this code that I need to tweak a few things on.
1. I need it to work regardless of the tab name, having some troubles when I take out the worksheet name.
2. The goal is to copy rows 7:37 and paste in the next available row the selected number of times, but it's not doing it.

here's the code:

Please Login or Register  to view this content.

[JBeaucaire]

Try this:

Please Login or Register  to view this content.

Special note: Sheets("1") and Sheets(1) are completely different things.
Sheets(1) - the first indexed sheet in the workbook, could have any name
Sheets("1") - a worksheet named "1" found anywhere in the workbook

[snb]

Please Login or Register  to view this content.

[juniperjacobs]

JBeaucaire:
The VBA you provided works but only if the tab name matches in the coding. saw your note about "" v. no "", but when i tried to name the code active.sheet or workbook it gave me an error. i want to be able to use the code in whatever active tab i'm in regardless of the name.

I tried this, but it doesn't seem to work:

Please Login or Register  to view this content.

[JBeaucaire]

There is no Active.Sheet reference, it is Activesheet.

So, this macro is intended to run solely on the activesheet?

Please Login or Register  to view this content.

[juniperjacobs]

Thanks JB!