View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.programming
Brad Brad is offline
external usenet poster
 
Posts: 846
Default Dealing with 3 Printer Ports

Hello,

My spreadsheet prints to a color printer for my users. Between the 4 users,
there was only 2 printer ports that it had to deal with ne01 and ne02. Now we
just added another user and they printer to ne04. How do I change my code to
accomodate this 3rd printer port. My code is below for the printing portion.
Thanks.

---
On Error Resume Next
Application.ActivePrinter = "HP Color LaserJet P_30 on Ne01:"
If Err.Number = 1004 Then
Application.ActivePrinter = "HP Color LaserJet P_30 on Ne02:"
Err.Clear
End If