Found my solution. Just eliminated the reference to the active printer.


"Patrick C. Simonds" wrote in message
...
Is there any way to cause something to print to the default printer for
the computer from which it is printed? The code works great for printing
to my network printer but this document could be printed by anyone in the
building and they are not going to want to come down to my work area to
retrieve their printout.

Private Sub CommandButton1_Click()
If CheckBox1 = True Then
Sheets("January").PrintOut Copies:=1, ActivePrinter:= _
"Paratransit_Color_Laser on Ne01:"

End If
End Sub