Runtime error 4608

[BuddahBelly]

I am using a macro to print in Word and i get the above error
sporadically.
Here is the macro:

Sub White()

With ActiveDocument.PageSetup
.FirstPageTray = wdPrinterLargeCapacityBin
.OtherPagesTray = wdPrinterLargeCapacityBin
End With

Application.PrintOut FileName:="", Range:=wdPrintAllDocument,
Item:=wdPrintDocumentContent, Copies:=1, Pages:="",
PageType:=wdPrintAllPages, Collate:=True, Background:=True,
PrintToFile:=False

End Sub

it is bombing on the '.FirstPageTray...' line. when i'm in debug mode
and i hover over '.FirstPageTray' it has a value of 9999999 and then
it bombs. if the document prints with no problems then the value is 0
(or object value not set). any ideas why this is happening and any
suggested fixes??

thanks,
BB

 

[Jezebel]

9999999 is the value Word uses for "undefined" or "mixed" (You get it, eg,
if you ask for the font size of a selection that includes text with
different sizes.) In this case, you would get that result -- and presumably
the error -- if the active printer doesn't support the .FirstPageTray
property.

Why not just trap and ignore the error?