Link to home
Start Free TrialLog in
Avatar of Carrie Miles
Carrie Miles

asked on

Run-time error 4608 value out of range

First, I am running in a citrix environment with Word 2000.  
I created macros for printing to different trays, for instance, page 1 will print from tray 3 and all other pages will print from tray 1.  

One user will not work, I receive Run-Time Error '4608': Value Out of Range.

Here is the macro:

Sub scopier()
'
' scopier Macro
' Macro recorded 9/9/2007 by BAH
varDefaultPrinter = ActivePrinter
'
    ActivePrinter = "\\BBKW1NOTES\Copier_4045 (Small Copier in Mail Room)"
    With ActiveDocument.PageSetup
        .FirstPageTray = 2
        .OtherPagesTray = 1
    End With
    Application.PrintOut FileName:="", Range:=wdPrintAllDocument, Item:= _
        wdPrintDocumentContent, Copies:=1, Pages:="", PageType:=wdPrintAllPages, _
        Collate:=True, Background:=True, PrintToFile:=False, PrintZoomColumn:=0, _
        PrintZoomRow:=0, PrintZoomPaperWidth:=0, PrintZoomPaperHeight:=0

ActivePrinter = varDefaultPrinter
With ActiveDocument.PageSetup
        .FirstPageTray = 1
        .OtherPagesTray = 1
    End With

End Sub

It's not liking the following line:

With ActiveDocument.PageSetup
        .FirstPageTray = 2

I don't understand why on one person's it doesn't work but all other user's are ok, since we are running in a Citrix enviroment?  Any ideas?

Thank you in advance
ASKER CERTIFIED SOLUTION
Avatar of cup
cup

Link to home
membership
This solution is only available to members.
To access this solution, you must be a member of Experts Exchange.
Start Free Trial
SOLUTION
Avatar of RobSampson
RobSampson
Flag of Australia image

Link to home
membership
This solution is only available to members.
To access this solution, you must be a member of Experts Exchange.
Start Free Trial