Printer Control

[Blair]

I have a printer control on my form and when I use it, it prints to the
default printer. I would like for it to bring up the screen to allow me to
select which printer to use, like when you use the file/print way.

thanks Blair


Private Sub Command310_Click()
On Error GoTo Err_Command310_Click


DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70
DoCmd.PrintOut acSelection
DoCmd.GoToControl "CloseFemaleCards"

Exit_Command310_Click:
Exit Sub

Err_Command310_Click:
MsgBox Err.Description
Resume Exit_Command310_Click

End Sub

 

[Damon Heron]

This will call the print dialog and print the current form...or report if
open.

DoCmd.RunCommand acCmdPrint
If Err = 2501 Then Err.Clear

Damon

 

[Guest]

Blair,

Please do not multi-post questions as you did with this one. People end up
answering question twice (or more) this way - when it has already been
addressed in another group. It is bad etiquette.

Daniel P

 

[Blair]

sorry thanks for the help
Blair

Blair,

Please do not multi-post questions as you did with this one. People end
up
answering question twice (or more) this way - when it has already been
addressed in another group. It is bad etiquette.

Daniel P

 

[Blair]

thanks Blair

This will call the print dialog and print the current form...or report if
open.

DoCmd.RunCommand acCmdPrint
If Err = 2501 Then Err.Clear

Damon