Combobox als filter wil niet werken

[LaurensAcces]

Beste Helpers,

Ik heb op een formulier een keuzelijst met invoervak geplaatst welke ik wil gebruiken als filter, alleen krijg ik deze niet goed aan het werken. Wie kan mij op weg helpen.

Ik wil de filter toepassen op het veld cboSoort. De waarde waarop gefilterd moet worden moet door de gebruiker worden op gegeven in het veld cboFilter.

Het veld cboSoort staat met de volgende eigenschappen op het formulier
Besturingselementbron: soort
Rijbron: Soort
Type rijbron: Tabel/query
Afhankelijke kolom: 1

Het veld cboFilter staat met de volgende eigenschappen op het formulier
Besturingselementbron:
Rijbron: SELECT [Soort].[Id], [Soort].[Soort] FROM Soort;
Type rijbron: Tabel/query
Afhankelijke kolom: 1

Daarnaast staat in vba de volgende code:

Private Sub cboFilter_Change()

Me.Filter = "cboSoort = " & Me.cboFilter & "'"
Me.FilterOn = True

End Sub

Wie kan mij op weg helpen?

Alvast bedankt.

Gr. Laurens

 

[OctaFish]

Je zou kunnen beginnen met de fout er uit te halen.

Me.Filter = "cboSoort = " & Me.cboFilter 
Me.FilterOn = True

 

[LaurensAcces]

Michel,

Ik heb de fout uit de code gehaald. Nu krijg ik op het moment dat ik cboFilter wijzig een popup scherm met de vraag om een parameterwaarde op te geven voor cboSoort

Laurens

 

[OctaFish]

Dat verbaast me eigenlijk niks, want ik vond het al een vreemde veldnaam. Ik vermoed dus dat je veld niet cboSoort heet, maar gewoon Soort.