Aanpassing in macro

[mic82]

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):

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