Waarde selectievakje

[vijverbegeman]

Hallo,

Vanuit een startscherm wil ik een ander scherm openen. Als ik het selectievakje selecteer wil ik dat er een scherm wordt gestart vanaf een bepaalde datum die op een andere plek wordt berekend, als het selectievakje niet geselecteerd is, dan moeten alle records worden weergegeven. De waarde van zo'n checkbox is toch 0 voor geselecteerd en -1 voor niet geselecteerd (of net andersom, maar dat vind ik dan wel uit...)? Een button zorgt verder voor het opstarten van het aan te roepen scherm. Wat zie ik over het hoofd?

If Me.Selectievakje12 = 0 Then
DoCmd.OpenForm stDocName, acFormDS, "datum >= #" & v_datum & "#", stLinkCriteria
Else: DoCmd.OpenForm stDocName, acFormDS, , stLinkCriteria
End If

Bedankt voor je reactie.

Pascal

 

[Tardis]

Hallo Pascal,

probeer dit eens

stLinkCriteria = "datum >= #" & Format(v_datum,"mm-dd-yyyy") & "#"
stDocName = "zet hier de naam van het te openen formulier"

If Me.Selectievakje12 = -1 Then
DoCmd.OpenForm stDocName, acFormDS, , stLinkCriteria
Else
DoCmd.OpenForm stDocName, acFormDS
End If

Groet,

Tardis