With code I would like to change the print_area range to be the same as
another range. Something like these three lines (though this doesn't work):

Dim r As Range
Set r = range("myRange")
Range("print_area") = r

How do I do this?

Arthur

Try:

ActiveSheet.PageSetup.PrintArea = "myRange"

Good luck

Ken
Norfolk, Va


ArthurJ wrote:
> With code I would like to change the print_area range to be the same as
> another range. Something like these three lines (though this doesn't work):
>
> Dim r As Range
> Set r = range("myRange")
> Range("print_area") = r
>
> How do I do this?

If you check "PrintArea" in the Help or the Object Browser, you will see if
returns/sets a String.
So you need to pass the address of the Range object, not the Range object
itself.

NickHK

"ArthurJ" <(E-Mail Removed)> wrote in message
news:23482C51-404A-41A9-BBA3-(E-Mail Removed)...
> With code I would like to change the print_area range to be the same as
> another range. Something like these three lines (though this doesn't
work):
>
> Dim r As Range
> Set r = range("myRange")
> Range("print_area") = r
>
> How do I do this?