Print 2 pages on one

[dim]

Hi all,

I've recorded the belowmentioned macro in order to print 2 pages on on page
to our printers, but it seems that this is not always working. Sometimes it
prints ok, sometimes it prints blank pages... i thought this could have been
due to printer drivers, but i've been trying several ones (and different
printers) without success. I have the impression it's something in the
document itself which triggers the printer to print correctly or not but i'm
not sure..
Maybe there is another way to print 2 pages to one page than using this code:?

Sub Print2on1()
'
' Print2on1 Macro
'
Application.PrintOut FileName:="", Range:=wdPrintAllDocument, Item:= _
wdPrintDocumentWithMarkup, Copies:=1, Pages:="",
PageType:=wdPrintAllPages, _
Collate:=True, Background:=True, PrintToFile:=False,
PrintZoomColumn:=2, _
PrintZoomRow:=1, PrintZoomPaperWidth:=11907,
PrintZoomPaperHeight:=16839
End Sub



Any suggestions are highly appreciated,
best regards
dim

 

[Jonathan West]

Hi all,

I've recorded the belowmentioned macro in order to print 2 pages on on
page
to our printers, but it seems that this is not always working. Sometimes
it
prints ok, sometimes it prints blank pages... i thought this could have
been
due to printer drivers, but i've been trying several ones (and different
printers) without success. I have the impression it's something in the
document itself which triggers the printer to print correctly or not but
i'm
not sure..
Maybe there is another way to print 2 pages to one page than using this
code:?

Sub Print2on1()
'
' Print2on1 Macro
'
Application.PrintOut FileName:="", Range:=wdPrintAllDocument, Item:= _
wdPrintDocumentWithMarkup, Copies:=1, Pages:="",
PageType:=wdPrintAllPages, _
Collate:=True, Background:=True, PrintToFile:=False,
PrintZoomColumn:=2, _
PrintZoomRow:=1, PrintZoomPaperWidth:=11907,
PrintZoomPaperHeight:=16839
End Sub

Does your document contain any section breaks? Are those section breaks set
up as "Odd page" or "Even Page" breaks?

 

[dim]

yes section breaks etc, but don't know how they've been defined, i'll have a
look...

If this is causing it, how do I make sure it will always work..through some
extra code i guess? as i cannot change thousands of docs manually ;-)

thx

dim

 

[dim]

ok i've tested... I had a doc with NO sections breaks... in the page setup,
layout, section start there was "continious"... -> printer printed blank
pages...

I've put the section start to new page -> printer printed the doc with two
pages/sheet = ok

wanted to change it back to continious to re-reprocude the error and it
doesn't work anymore... it always prints correctly now...

very strange, i don't get it?

 

[dim]

ok the section part in the setup page is the cause of this behaviour ! if I
put it on next page... no probs at all!!!

i've now added in the macro that it should go to printview and change the
section setup
thanks for the tip !!!
regards

 

[Jonathan West]

ok the section part in the setup page is the cause of this behaviour ! if
I
put it on next page... no probs at all!!!

i've now added in the macro that it should go to printview and change the
section setup
thanks for the tip !!!
regards

I wasn't sure precisely what was causing the problem, but I do know that
section breaks can contribute in that area. Glad I was able to point you in
the right general direction!