mark curtis
Registered User.
- Local time
- Today, 21:05
- Joined
- Oct 9, 2000
- Messages
- 457
Can anyone tell me how to automatically print to my default printer via a command button?
Below is the code I use to automatically print from a command button but it does not select the default printer?
Private Sub Print1_Click()
On Error GoTo Err_Print1_Click
Dim stDocName As String
stDocName = "rptHighlight Report for Projects"
DoCmd.OpenReport stDocName, acNormal
Exit_Print1_Click:
Exit Sub
Err_Print1_Click:
MsgBox Err.Description
Resume Exit_Print1_Click
End Sub
Thanks
Mark
Below is the code I use to automatically print from a command button but it does not select the default printer?
Private Sub Print1_Click()
On Error GoTo Err_Print1_Click
Dim stDocName As String
stDocName = "rptHighlight Report for Projects"
DoCmd.OpenReport stDocName, acNormal
Exit_Print1_Click:
Exit Sub
Err_Print1_Click:
MsgBox Err.Description
Resume Exit_Print1_Click
End Sub
Thanks
Mark