BrianWren
asked on
Word 97 Pamphlet Printing
Man! There has GOT to be an easier way!
I am trying to create a pamphlet with printing on both sides of each sheet, each of which is then folded in half, and all of them stapled together. This is a small, 20 page book, with chapters, So I need to put the chapter starts on the right hand side, and so on.
I would like to have page numbers, but of course, Word numbers the sheet of paper, not the intended location for it.
What I am doing is this: I have the pages set up in two columns landscape. I am printing, cutting it apart, pasting it back togeter. Then I use the resultant sheets as a ‘go by’ to do a paste up on an extra sheet at the end of the document. having printed one side, I take the paper out of the printer and turn it over, then do a paste up of the other side of it, print that, etc., etc.
Surely this is not all that uncommon?
I am trying to create a pamphlet with printing on both sides of each sheet, each of which is then folded in half, and all of them stapled together. This is a small, 20 page book, with chapters, So I need to put the chapter starts on the right hand side, and so on.
I would like to have page numbers, but of course, Word numbers the sheet of paper, not the intended location for it.
What I am doing is this: I have the pages set up in two columns landscape. I am printing, cutting it apart, pasting it back togeter. Then I use the resultant sheets as a ‘go by’ to do a paste up on an extra sheet at the end of the document. having printed one side, I take the paper out of the printer and turn it over, then do a paste up of the other side of it, print that, etc., etc.
Surely this is not all that uncommon?
ASKER CERTIFIED SOLUTION
membership
This solution is only available to members.
To access this solution, you must be a member of Experts Exchange.
ASKER
Thanks, Brian!
After 300,000 points I guess a few this way or that don't matter as much, but your answer was really helpful.
I have yet to peruse the knowledge base articles you referenced, but your diagram of page numbering turned on the light.
You weren't the first to mention linked textboxes, but your diagram is what made the difference.
Then is was a case of getting uniform placement... What I did, was I set the pages to be justified vertically, turned them ladscape, put a carriage return on each page, (which moved the insertion point to the bottom of the page), and, using centered tabs, put page numbers.
Then I ran this macro on each page:
Sub Add_T_Bxs()
Dim BxWdth As Single: BxWdth = InchesToPoints(4.2)
Dim BxHght As Single: BxHght = InchesToPoints(6.95)
Dim Margin As Single: Margin = InchesToPoints(0.65)
' Now all measurements are in points.
Dim LfBxLeft: LfBxLeft = Margin
Dim LfBxTop: LfBxTop = Margin
Dim RtBxLeft: RtBxLeft = Margin + BxWdth + (2 * Margin)
Dim RtBxTop: RtBxTop = Margin
Set m = ActiveDocument.Shapes.AddT extbox(mso TextOrient ationHoriz ontal, _
LfBxLeft, _
LfBxTop, _
BxWdth, _
BxHght)
Set m = ActiveDocument.Shapes.AddT extbox(mso TextOrient ationHoriz ontal, _
RtBxLeft, _
RtBxTop, _
BxWdth, _
BxHght)
End Sub
Then I got out the text box toolbar with zoom at 10%, and linked 'em all up.
It's a drag to have to manually create the appearance of footnotes, but that is a lot less hard than trying to slice and dice the text!
BTW: Who's Bob Buckland?
Again, thanks lots,
Brian
After 300,000 points I guess a few this way or that don't matter as much, but your answer was really helpful.
I have yet to peruse the knowledge base articles you referenced, but your diagram of page numbering turned on the light.
You weren't the first to mention linked textboxes, but your diagram is what made the difference.
Then is was a case of getting uniform placement... What I did, was I set the pages to be justified vertically, turned them ladscape, put a carriage return on each page, (which moved the insertion point to the bottom of the page), and, using centered tabs, put page numbers.
Then I ran this macro on each page:
Sub Add_T_Bxs()
Dim BxWdth As Single: BxWdth = InchesToPoints(4.2)
Dim BxHght As Single: BxHght = InchesToPoints(6.95)
Dim Margin As Single: Margin = InchesToPoints(0.65)
' Now all measurements are in points.
Dim LfBxLeft: LfBxLeft = Margin
Dim LfBxTop: LfBxTop = Margin
Dim RtBxLeft: RtBxLeft = Margin + BxWdth + (2 * Margin)
Dim RtBxTop: RtBxTop = Margin
Set m = ActiveDocument.Shapes.AddT
LfBxLeft, _
LfBxTop, _
BxWdth, _
BxHght)
Set m = ActiveDocument.Shapes.AddT
RtBxLeft, _
RtBxTop, _
BxWdth, _
BxHght)
End Sub
Then I got out the text box toolbar with zoom at 10%, and linked 'em all up.
It's a drag to have to manually create the appearance of footnotes, but that is a lot less hard than trying to slice and dice the text!
BTW: Who's Bob Buckland?
Again, thanks lots,
Brian
ASKER
The link to www.ffg.com\wp\clickbook.html doesn't work.
Nor does www.microsoft.com/kb/softlib/mslfiles/WD1025.exe.
I would really like to have a look at that macro, and see if it would be helpful...
Nor does www.microsoft.com/kb/softlib/mslfiles/WD1025.exe.
I would really like to have a look at that macro, and see if it would be helpful...
Hi Brian,
Well since i get no notifs after any answers i have to look it up everytime....
Glad you got something to it, i'll try to find the files you mentioned and couldn't be found.
Bob Buckland, is someone who's name i catch on all posts on the Word user groups so he's a real guru :)
Brian
PS every point matters i'm slowing down when i'm top 25 and got more then 1200 Q's answered :)
Well since i get no notifs after any answers i have to look it up everytime....
Glad you got something to it, i'll try to find the files you mentioned and couldn't be found.
Bob Buckland, is someone who's name i catch on all posts on the Word user groups so he's a real guru :)
Brian
PS every point matters i'm slowing down when i'm top 25 and got more then 1200 Q's answered :)
wd1025.exe can be found here
http://www.alltheweb.com/search?cat=ftp&cs=utf-8&ftype=4&q=wd1025.exe
and the new home for clickbook
http://www.bluesquirrel.com/clickbook/
Brian
http://www.alltheweb.com/search?cat=ftp&cs=utf-8&ftype=4&q=wd1025.exe
and the new home for clickbook
http://www.bluesquirrel.com/clickbook/
Brian
Look into using Linked Text Boxes to create the desired look you want. This will give you control over the flow of your text and the placement, inclusion and exclusion of page numbers.
Hope this helps.