Word Print to Fit

[greg0303]

I am using VBScript, part of the script will open a Word document in the background and print it to a print then close. I would like to print to one sheet if the document spills over to a second page. Is there a way to use the Shrink to fit option through VBScript. Here is how I am currently printing:

Set objWord = CreateObject("Word.Application")
Set objDoc = objWord.Documents.Open(DoctoPrint)
objDoc.PrintOut()
objWord.Quit wdDoNotSaveChanges

Thanks.

 

[white605]

Not sure exactly how the syntax goes but you need
Document.FitToPages Method
search for this in msdn
wjwjr

This old world keeps spinning round - It's a wonder tall trees ain't layin' down

 

[PHV]

...
objDoc.FitToPages
objDoc.PrintOut
...

Hope This Helps, PH.
FAQ219-2884
FAQ181-2886