VBA detect current worksheet print range?

[Giga_Me]

Hi all - here's a scenario I'm struggling to resolve: I have code that will create 10 additional worksheets based on criteria found in a master worksheet (all within the same workbook).

For the additional worksheets, I would like to set each one to match the master worksheet's print area and page setup options.

Here's code I'm working with:

Set WSNrange = Range(WSN.Cells(StartRow, 1), WSN.Cells(lastrow, 62))
WSO.Range(WSO.Cells(StartRow, 1), WSO.Cells(lastrow, 62)).Copy
WSNrange.PasteSpecial Paste:=xlPasteAll

 

[Jerry Sullivan]

Hi Giga Me,

There might be an faster way, but one approach would be to have your code:
1. Copy the Master Worksheet
2. Clear all the Cells in the New Worksheet
3. Copy the Cleared Worksheet 9 more times.

 

[Giga_Me]

Jerry - that's yet another..."why didn't I think of that?" solution that keeps me coming back to this forum.

I'll have to rework my code but that'll be a quick fix.

Much appreciated.

Giga_Me

 

[Jerry Sullivan]

that's yet another..."why didn't I think of that?" solution that keeps me coming back to this forum.

That happens to me all the time...Thanks for the reply.