Hallo
met behulp van een macro kan ik een handleiding afdrukken. Nu is het geval dat in een handleiding geen printnummer 2 voorkomt. Op het moment dat ik ga afdrukken krijg ik een foutmelding dat waarde "printnummer 2" niet aanwezig is. ipv deze foutmelding wil graag realiseren dat deze automatisch doorgaat naar het volgende printnummer. is dit mogelijk en hoe?
bvd
gr mic
hieronder staat de code(s):
met behulp van een macro kan ik een handleiding afdrukken. Nu is het geval dat in een handleiding geen printnummer 2 voorkomt. Op het moment dat ik ga afdrukken krijg ik een foutmelding dat waarde "printnummer 2" niet aanwezig is. ipv deze foutmelding wil graag realiseren dat deze automatisch doorgaat naar het volgende printnummer. is dit mogelijk en hoe?
bvd
gr mic
hieronder staat de code(s):
Private Sub Printnr_2_afdrukken_Click()
On Error GoTo Err_Printnr__2_afdrukken_Click
Dim stDocName As String
stDocName = "Printnummer 2.Afdrukken printnummer 2"
DoCmd.RunMacro stDocName
Exit_Printnr_2_afdrukken_Click:
Exit Sub
Err_Printnr_2_afdrukken_Click:
MsgBox Err.Description
Resume Exit_Printnr_2_afdrukken_Click
Private Sub Printnr__3_afdrukken_Click()
On Error GoTo Err_Printnr__3_afdrukken_Click
Dim stDocName As String
stDocName = "Printnummer 3.Afdrukken printnummer 3"
DoCmd.RunMacro stDocName
Exit_Printnr__3_afdrukken_Click:
Exit Sub
Err_Printnr__3_afdrukken_Click:
MsgBox Err.Description
Resume Exit_Printnr__3_afdrukken_Click
End Sub
Private Sub Totaal_rapport_Click()
On Error GoTo Err_Totaal_rapport_Click
Dim stDocName As String
stDocName = "Afdrukken totaal rapport.Afdrukken"
DoCmd.RunMacro stDocName
Exit_Totaal_rapport_Click:
Exit Sub
Err_Totaal_rapport_Click:
MsgBox Err.Description
Resume Exit_Totaal_rapport_Click
End Sub