Hi, I have figured out how to increase the range: Set tRange =
Range("Print_Area").Resize(, 1 + Range("Print_Area").Columns.Count).

But now that I have my new range, how can i save the spreadsheet and
save the new range?

Thanks.

Ross Try

Range("Print_Area").Resize(, 1 + Range("Print_Area").Columns.Count).Name =
"RangeName"

enjoy , Rick


wrote in message
oups.com...
Hi, I have figured out how to increase the range: Set tRange =
Range("Print_Area").Resize(, 1 + Range("Print_Area").Columns.Count).

But now that I have my new range, how can i save the spreadsheet and
save the new range?

Thanks.

Thanks for the replay.

I added the code but nothing seemed to happen. I did a saveas and
checked the page break view and it was the same. the behavior is either
the new print range didn't save or the print range didn't change. Not
sure. This has turned out to be remarkably difficult task. All i wanted
to do was add a column to an existing print range (called Print_Area)
and save it back to a different file name. Whew.

Rick Hansen wrote:
Ross Try

Range("Print_Area").Resize(, 1 + Range("Print_Area").Columns.Count).Name =
"RangeName"

enjoy , Rick


wrote in message
oups.com...
Hi, I have figured out how to increase the range: Set tRange =
Range("Print_Area").Resize(, 1 + Range("Print_Area").Columns.Count).

But now that I have my new range, how can i save the spreadsheet and
save the new range?

Thanks.

By the way, is the name 'Print_Range" standard or something that was
made up. I inheired this code so i don't know

I messed up and missed the last "Range_Name" it works!!!!!!

Thanks