I believe that when you set the print area and/or rows or columns to appear
on each page that Excel automatically creates a name for that data.
Therefore, your code is deleting that name and Excel then doesn't know what
to print.

I guess you could either add code at the end of your routine to add the
appropriate name back.....Or you could just have your routine not delete the
appropriate name if it is a certain name "Print_Area".

Hope this gets you started in the right direction.

Thanks,
Bill Horton

"JGeniti" wrote:

I have routine that makes a copy of a workbook to save as a snapshot
that has all of the code and range names removed. I couldn't figure out
why my print area was screwed up on my snapshots and then I used the
debug.print to figure out exactly what was causing my print area to be
erased.

here is the code that does it

For Each RName In NewWorkBook.Names
RName.Delete
Next RName

Does anyone have any idea why deleting all of the range names from the
workbook would do this. None of the sheets in my workbook utilize a
named range for it's print area.

Any help would be appreciated.
Thanks
James