Adjusting margins of an existing document in MS Pub 2003?

[Paul Simon]

I am using MS Publisher 2003. I have an entire completed document.
Sadly, the way I was planning to bind it, a 1/4" on the left is hidden.
How do I adjust the margins of the entire document so that all of the
pages slide over that 1/4" to the right?

I saw that I can change the guide, and I know how to highlight the
entire page and "nudge" it over to the new guide. Since there are 30
pages, that would be VERY time consuming. Is there a quick and easy way
to mass modify all of the pages?

Thanks...

Paul

 

[Ed Bennett]

I saw that I can change the guide, and I know how to highlight the
entire page and "nudge" it over to the new guide. Since there are 30
pages, that would be VERY time consuming. Is there a quick and easy way
to mass modify all of the pages?

For only thirty pages, it would probably take less time than it would to
wait for a reply to your post, but that's besides the point.

You can write a macro to do this.

Something along the lines of

For Each aPage in ThisDocument.Pages
For each aShape in aPage.Shapes
aShape.Left = aShape.Left + 72
Next
Next

(Completely untested and written in a rush. Almost certainly won't work,
but it's in the right direction)

 

[Paul Simon]

That worked GREAT!!!!

Other than the fact that the shift value was more like 15 for a quarter
inch shift, it worked perfectly!

Many, many thanks.... Paul

 

[Ed Bennett]

Other than the fact that the shift value was more like 15 for a quarter
inch shift, it worked perfectly!

Glad to hear it! (Sorry, I read your post as 1 inch; 72 points are in an
inch). Thanks for posting back, it makes me happy