Door middel van een macro wil ik door het klikken op een button automatisch een printer kiezen en automatisch de saved settings kiezen bij de eigenschappen van de printer. Kom er alleen niet achter hoe ik die saved settings voor elkaar krijg.
Tot zover werkt het prima:
Tot zover werkt het prima:
Code:
Public Sub printen()
Dim STDprinter As String
STDprinter = Application.ActivePrinter
Application.ActivePrinter = "PRT2259 on srv0077:"
ActiveSheet.PrintOut Copies:=1
ActiveSheet.PrintOut
End Sub