doorlopend formulier checkbox

[wacco]

Hallo,

Ik heb een doorlopend formulier, gebaseerd op een query.
In dit doorlopend formulier heb ik een filter staan, in een keuzelijst

Private Sub Keuzelijst_rij_AfterUpdate()
If IsNull(Me.Keuzelijst_rij) Then
    Me.FilterOn = False
Else
    Me.Filter = "Rij = """ & Me.Keuzelijst_rij & """"
    Me.FilterOn = True

End If
End Sub

In dit zelfde doorlopend formulier heb ik een checkbox (selectievakje) staan genaamd LabelsPrint.
Is het mogelijk als ik in de keuzelijst een optie kies, dat dan de checkbox (LabelsPrint) van alle records de waarde False krijgen.
Ik wil dus eigenlijk dat de checkbox (labelsPrint) van alle records wordt gereset.

ik wil eigenlijk bereiken, dat ik eerst d.m.v. de filterkeuze de records bepaal.
En daarna aanvink welke record ik wil printen.
Het printen zal dan gebeuren op basis van dezelfde query.
Als ik dan een andere selectie maak d.m.v. de filterkeuze, moeten wel alle vinkjes worden uitgeschakeld om daarna weer de keuze van printen te hebben.


M.v.g

 

[wacco]

Is nu gelukt, na lang zoeken op het internet.
Op een engels talige site, een code gevonden.
Deze code werkte, na wat aanpassingen, tot volle tevredenheid.
Hieronder de code :

On Error GoTo Error_routine
Dim strSQL As String

strSQL = "update [TBL-labels] set [TBL-labels].[labelprint]=False"
strlSQL = strSQL & "Where[TBL-labels].[labelprint]=false" & ";"
CurrentDb.Execute strSQL, dbFailOnError
Me.Refresh

Exit_continue:
Exit Sub

Error_routine:
MsgBox "error#" & Err.Number & " " & Err.Description
Resume Exit_continue

Zet de vraag op opgelost.

Gr,

 

[OctaFish]

Niet om het een of ander, maar dit is een rare oplossing, want hij doet helemaal niks! Ik heb je regel even gefatsoeneerd voor de leesbaarheid:

strSQL = "UPDATE [TBL-labels] SET [labelprint]=FALSE WHERE [labelprint]=FALSE"

Je zet hier dus het veld [labelprint] op False voor díe records waar [labelprint] al False is! Niet echt nuttig, lijkt mij

 

[wacco]

@octafish,

Dankje voor de reactie,

Ik pas de code aan, want inderdaad is het een dubbele ontkenning.

Gr,