Beste forumleden,
Hierbij wil ik het volgende probleem van mij voorleggen:
Ik heb een rapport waarbij van te voren een formulier wordt geopend met een keuzelijst om de criteria te bepalen voor het rapport. Dit werkt volledig naar behoren, echter op het formulier heb ik een knop annuleren en zodra ik daarop klik, dan gaat het mis.
Er wordt dan namelijk nog steeds gevraagd naar een Parameterwaarde opgeven:
Formulieren!frmSelecteerAchternaam!KeuzelijstAchternamen
De volgende code zit onder de knop Annuleren:
Private Sub Annuleren_Click()
On Error GoTo Err_Annuleren_Click
DoCmd.Close
DoCmd.Close , "Rapport", acSaveNo
Exit_Annuleren_Click:
Exit Sub
Err_Annuleren_Click:
MsgBox Err.Description
Resume Exit_Annuleren_Click
End Sub
De volgende code zit onder het rapport:
Private Sub Report_Close()
DoCmd.Close acForm, "frmSelecteerAchternaam"
End Sub
Private Sub Report_Open(Cancel As Integer)
DoCmd.OpenForm "frmSelecteerAchternaam", , , , , acDialog
End Sub
Hoe kan ik ervoor zorgen dat het formulier daadwerkelijk wordt gesloten en er niet meer naar de Parameter wordt gevraagd voor de criteria?????
Bij voorbaat dank voor jullie hulp.
Hierbij wil ik het volgende probleem van mij voorleggen:
Ik heb een rapport waarbij van te voren een formulier wordt geopend met een keuzelijst om de criteria te bepalen voor het rapport. Dit werkt volledig naar behoren, echter op het formulier heb ik een knop annuleren en zodra ik daarop klik, dan gaat het mis.
Er wordt dan namelijk nog steeds gevraagd naar een Parameterwaarde opgeven:
Formulieren!frmSelecteerAchternaam!KeuzelijstAchternamen
De volgende code zit onder de knop Annuleren:
Private Sub Annuleren_Click()
On Error GoTo Err_Annuleren_Click
DoCmd.Close
DoCmd.Close , "Rapport", acSaveNo
Exit_Annuleren_Click:
Exit Sub
Err_Annuleren_Click:
MsgBox Err.Description
Resume Exit_Annuleren_Click
End Sub
De volgende code zit onder het rapport:
Private Sub Report_Close()
DoCmd.Close acForm, "frmSelecteerAchternaam"
End Sub
Private Sub Report_Open(Cancel As Integer)
DoCmd.OpenForm "frmSelecteerAchternaam", , , , , acDialog
End Sub
Hoe kan ik ervoor zorgen dat het formulier daadwerkelijk wordt gesloten en er niet meer naar de Parameter wordt gevraagd voor de criteria?????
Bij voorbaat dank voor jullie hulp.