by MYLE
16. July 2010 00:01
Every wanted to be able let the User Change the printer in MSaccess
Dim prt As Printer
For Each prt In Application.Printers
Me!Myprinter.AddItem Item:=prt.DeviceName
Next prt
where Me!Myprinter is a combo box on the form Now Printing that report
Dim prt
Set prt = Application.Printers(Me!Myprinter)
Set Application.Printer = prt
stDocName = "That Report"
DoCmd.OpenReport stDocName, acNormal
Set Application.Printer = Nothing
f5f6eb9d-9184-4207-a8f9-c0da0c06c515|0|.0
Category: MSaccess
Tags: Printing