Piotrwilczak
New Member
- Joined
- May 18, 2017
- Messages
- 2
Hello
We are using the macro below to print a copy on Plain and Letterhead at the same time . The application which we use is on remote server and our print server is on local network ( I think we use something called Remote Desktop Easy Print which kind of redirects the print job from the server on which the application reside to print server in our office). For the macro to work we have to edit it and change the redirected values every day.
Is there a way to edit this macro to specify the range of numbers (lets say from 1 to 65,000) no matter to which number printing is redirected macro would still work?
Sub Macro1()
'
' Macro1 Macro
'
'
ActivePrinter = _
"TCL012 - Team A - Headed on abctclfls001 (redirected 613)"
Application.PrintOut FileName:="", Range:=wdPrintAllDocument, Item:= _
wdPrintDocumentWithMarkup, Copies:=1, Pages:="", PageType:= _
wdPrintAllPages, Collate:=True, Background:=True, PrintToFile:=False, _
PrintZoomColumn:=0, PrintZoomRow:=0, PrintZoomPaperWidth:=0, _
PrintZoomPaperHeight:=0
ActivePrinter = "TCL012-Team A on abctclfls001 (redirected 613)"
Application.PrintOut FileName:="", Range:=wdPrintAllDocument, Item:= _
wdPrintDocumentWithMarkup, Copies:=1, Pages:="", PageType:= _
wdPrintAllPages, Collate:=True, Background:=True, PrintToFile:=False, _
PrintZoomColumn:=0, PrintZoomRow:=0, PrintZoomPaperWidth:=0, _
PrintZoomPaperHeight:=0
End Sub
I would be grateful if you could assist .
Thank You
Piotr
We are using the macro below to print a copy on Plain and Letterhead at the same time . The application which we use is on remote server and our print server is on local network ( I think we use something called Remote Desktop Easy Print which kind of redirects the print job from the server on which the application reside to print server in our office). For the macro to work we have to edit it and change the redirected values every day.
Is there a way to edit this macro to specify the range of numbers (lets say from 1 to 65,000) no matter to which number printing is redirected macro would still work?
Sub Macro1()
'
' Macro1 Macro
'
'
ActivePrinter = _
"TCL012 - Team A - Headed on abctclfls001 (redirected 613)"
Application.PrintOut FileName:="", Range:=wdPrintAllDocument, Item:= _
wdPrintDocumentWithMarkup, Copies:=1, Pages:="", PageType:= _
wdPrintAllPages, Collate:=True, Background:=True, PrintToFile:=False, _
PrintZoomColumn:=0, PrintZoomRow:=0, PrintZoomPaperWidth:=0, _
PrintZoomPaperHeight:=0
ActivePrinter = "TCL012-Team A on abctclfls001 (redirected 613)"
Application.PrintOut FileName:="", Range:=wdPrintAllDocument, Item:= _
wdPrintDocumentWithMarkup, Copies:=1, Pages:="", PageType:= _
wdPrintAllPages, Collate:=True, Background:=True, PrintToFile:=False, _
PrintZoomColumn:=0, PrintZoomRow:=0, PrintZoomPaperWidth:=0, _
PrintZoomPaperHeight:=0
End Sub
I would be grateful if you could assist .
Thank You
Piotr