multiple page doc

[Debi]

We have a multiple page duplexed word do that is a Mail Merge doc also. It
is 14 pages, 7 duplexed. We need to have it staple the 7 pages for each
record in the Merged excel file. But it staples all together. How can we
get it to just staple the 7 pages per record?

 

[Doug Robbins]

Execute the merge to a new document and then run a macro containing the
following code when that document is the active document and it will send
the 7 pages for each record to the printer as a separate print job so that
they will be stapled individually:

Dim i As Long
With ActiveDocument
For i = 1 To .Sections.Count
.PrintOut Range:=wdPrintFromTo, From:="s" & i, To:="s" & i
Next i
End With



--
Hope this helps.

Please reply to the newsgroup unless you wish to avail yourself of my
services on a paid consulting basis.

Doug Robbins - Word MVP

 

[Debi]

This did not work for us.
--
dm

Execute the merge to a new document and then run a macro containing the
following code when that document is the active document and it will send
the 7 pages for each record to the printer as a separate print job so that
they will be stapled individually:

Dim i As Long
With ActiveDocument
For i = 1 To .Sections.Count
.PrintOut Range:=wdPrintFromTo, From:="s" & i, To:="s" & i
Next i
End With



--
Hope this helps.

Please reply to the newsgroup unless you wish to avail yourself of my
services on a paid consulting basis.

Doug Robbins - Word MVP

 

[Doug Robbins]

What did happen?

--
Hope this helps.

Please reply to the newsgroup unless you wish to avail yourself of my
services on a paid consulting basis.

Doug Robbins - Word MVP

 

[amie]

Hi, I have taken this over this project. I believe this isn't working for us
because our original mail merge doc contains multiple sections. i have tried
to delete these but that seems to corrupt the formatting of the doc. i need
to be able to staple this multipage doc. i have been reading the visual basic
help. i have some ideas. is there a way to specify to staple range of x
amount of pages once i have merged to a new doc. or is there a way to insert
break at the end of the original doc before i merge records to new document?

 

[Doug Robbins]

I have answered your later post.

--
Hope this helps.

Please reply to the newsgroup unless you wish to avail yourself of my
services on a paid consulting basis.

Doug Robbins - Word MVP

 

[amie]

thanks so much for your time and wisdom...
now i'm encountering 2 problems that i hope visual basic can help me with.
1) after i merge to new document and run visual basic. it starts to print
the merge in the middle of the list like around record 9 each time? how do i
get it to spool from the beginning like it should?

2) i get an error twice about the sections going outside of the printable
area. i have to click yes to print twice for each record. is there anyway to
get visual basic to enter twice for me? or is there any other means by which
i can get rid of this annoying error?

 

[Doug Robbins]

Re 1, copy and paste the code of the macro that you are trying to use into a
message that you post back here.

Re 2, you would be far better off to fix this problem at the source (in the
mailmerge main document) by changing the margin setting so that the error
message is not received.

--
Hope this helps.

Please reply to the newsgroup unless you wish to avail yourself of my
services on a paid consulting basis.

Doug Robbins - Word MVP

 

[amie]

Dim i As Long
With ActiveDocument
For i = 1 To .Sections.Count Step 7
.PrintOut Range:=wdPrintFromTo, From:="s" & i, To:="s" & i +6
Next i
End With

my word doc has 7 sections