Application.ActivePrinter = "\\itdev1\HPLaserJet (Ne00:)" Application.ActivePrinter = "\\oko5\HP LaserJet 1018 (Ne01:)"