Code: Select all
ActivePrinter = "\\servername\printername"
How could I do that?
Ken
Code: Select all
ActivePrinter = "\\servername\printername"
Code: Select all
pname = InputBox("type in either name1 OR name2", "Set the A3 printer")
ActivePrinter = "\\servername\" & pname
Code: Select all
Dim pName As string
Select Case MsgBox("Do you want to print to name1?", vbQuestion + vbYesNo)
Case vbYes
pName = "name1"
Case vbNo
pName = "name2"
End Select
ActivePrinter = "\\servername\" & pName
Simple is good, that does the trick nicely.HansV wrote:Or still simpler, use a message box
That could be very useful, thank you for sharing it.Guessed wrote:...
Dialogs(97).Show
...