Nieuw lid |
|
Hallo
Weet er iemand hoe je vanuit VBA Access je uw printdialogbox kunt oproepen?
de code die nu achter mijn drukknop zit is
Private Sub Command25_Click()
On Error GoTo Err_Command25_Click
Dim stDocName As String
stDocName = "Rpt_afdrukkenvansuivichangementd'effectief"
DoCmd.OpenReport stDocName, acNormal
Exit_Command25_Click:
Exit Sub
Err_Command25_Click:
MsgBox Err.Description
Resume Exit_Command25_Click
Private Sub Command25_Click() On Error GoTo Err_Command25_Click Dim stDocName As String stDocName = "Rpt_afdrukkenvansuivichangementd'effectief" DoCmd.OpenReport stDocName, acNormal Exit_Command25_Click: Err_Command25_Click: MsgBox Err.Description Resume Exit_Command25_Click
Maar nu wil ik dat als ik op die knop druk er mijn oof gevraagd word welke printer en hoeveel prints ik wil....
Groeten
|