Can I define a printarea using a named range

I have the following code trying to define the conditions for a print out

Please Login or Register  to view this content.

This fails at .PrintArea = .Range(PrintMonth)
with an error "object doesn't support this property or method"
Can someone show me where I've gone wrong?
John

Greg M.
Thanks for your interest in my problem.
Unfortunately your suggestion didn't work.
I have found an answer on the web though which is-

Please Login or Register  to view this content.

This works properly

Hi again,

Thanks for your feedback.

Your solution doesn't work on my computer.

As I mentioned before, using:

Please Login or Register  to view this content.

means that "Range(PrintMonth).Address" is regarded as a property of PageSetup - such a property does not exist, which is why the "Object doesn't support this property or method" is generated.

To work correctly (on my computer anyway), the following code is used:

Please Login or Register  to view this content.

Apologies for not including .Address in my original post.


Regards,

Greg M

Hi RoryA,

I'm happy to be corrected on this, but I think that the PrintArea property holds a string value (i.e. an A1-style Address) rather than an object (i.e. a Named Range).

Best regards to you,

Greg M

I don't quite know how my initial formulation, without the Sheets(SheetName) did work but I found that the code generated by the Macro had dozens of repeated lines.
After the first run I cleaned this up and perhaps cleaned up an important reference to the sheet.
Any how the following test code works and I will be able to add the bells and wistles I need.

Please Login or Register  to view this content.

Many thanks for your help (and persistence). This was my first taste of coding a print out and I needed the help
John