Zoekfunctie VBA

[Modag]

Hoi,

Ik ben bezig met een database. En ik zou graag iets willen weten hoe je een zoekfunctie kunt maken met behulp van een knop en tekstvak.

Dit wil ik op een formulier toepassen die een subformulier bevat. Uit die subformulier wil ik de informatie halen. Ik wil namelijk op Product zoeken door het hele database. En dat de db dan naar die specifieke Order gaat waar die product in staat.

Bij voorbaat dank voor jullie hulp.

Gr,

Modag

PS: Ik kan helaas niet de database als bijlage toevoegen. Hij is helaas te groot(ook ingepakt).

 

[FESTER]

Modag,

je vraag is niet echt duidelijk.
Als ik tussen de regel door lees, wil je zoeken naar alle orderregels die je hebt ingevoerd voor een bepaald produkt.
Juist?

FESTER

 

[Modag]

Fester,

Dit klopt. Ik wil op product zoeken.

Gr,

Modag

 

[FESTER]

Maak een formulier.
Zet in de kop een keuzelijst gebaseerd op je produkttabel.

Maak een query die alle orderregels ophaalt.
Voeg een konditie aan je query toe waarin je verwijst naar de gekozen waarde in de keuzelijst.
Stel, je formulier heet frmZoekprodukt en je keuzelijst heet lstProdukt.
Dan wordt je konditie op je kolom produkt:

=Forms!frmZoekprodukt!lstProdukt

Sla de query op.
Baseer je formulier op de query.
Zet een Na Bijwerken gebeurtenis op je keuzelijst met deze coderegel:

Me.Requery

FESTER