Goedendag,
Ik ben inmiddels een dankbaar gebruiker van dit forum. Er al veel hulp op gevonden maar nu zit ik met een vraag waar ik het antwoord niet op kan vinden deze vraag heeft betrekking op een eerder geplaatste vraag nl http://www.helpmij.nl/forum/showthread.php/552084-Dynamisch-filteren-in-Access. Daarin wordt gesproken over dynamisch filteren eerst een enkel filter en daarna een veel uitgebreider filter. De uitgebreide heb ik inmiddels ook al gebruik van gemaakt en werkzaam gekregen maar nu zit ik in een formulier waar in ik het enkele filter wil gebruiken. Deze werkt niet als er in het zoekscherm een spatie getikt wordt in dit item wordt er gezegd dat dat gerepareerd is, maar dat is alleen in het uitgebreide filter op meerdere zoekvelden maar dat heb ik nu eigenlijk niet nodig. Wat moet er nog toegevoegd worden om dat hier te kunnen gebruiken.
Het gaat om deze code:
Hopelijk kunnen jullie me helpen
Ik ben inmiddels een dankbaar gebruiker van dit forum. Er al veel hulp op gevonden maar nu zit ik met een vraag waar ik het antwoord niet op kan vinden deze vraag heeft betrekking op een eerder geplaatste vraag nl http://www.helpmij.nl/forum/showthread.php/552084-Dynamisch-filteren-in-Access. Daarin wordt gesproken over dynamisch filteren eerst een enkel filter en daarna een veel uitgebreider filter. De uitgebreide heb ik inmiddels ook al gebruik van gemaakt en werkzaam gekregen maar nu zit ik in een formulier waar in ik het enkele filter wil gebruiken. Deze werkt niet als er in het zoekscherm een spatie getikt wordt in dit item wordt er gezegd dat dat gerepareerd is, maar dat is alleen in het uitgebreide filter op meerdere zoekvelden maar dat heb ik nu eigenlijk niet nodig. Wat moet er nog toegevoegd worden om dat hier te kunnen gebruiken.
Het gaat om deze code:
Code:
Private Sub txtFilter_Change()
Dim sFilter
sFilter = "[Instelling] Like ""*" & Me.txtFilter.Text & "*"""
Me.Filter = sFilter
Me.FilterOn = True
Me.txtFilter.SelStart = Me.txtFilter.SelLength
End Sub
Hopelijk kunnen jullie me helpen