[Access]Zoekfunctie verfijnen

[anoniem]

Ik heb via de wizard een button gemaakt waarmee je kunt zoeken in je formulier. De standaard window, om te zoeken, opent dan waarin je allerlei opties kunt selecteren en/of invullen. Ik wil graag direct kunnen zoeken in een specifiek veld (bv artikelen) liefst zonder window met allerlei opties om te zoeken. Kan dit en weet iemand hoe? Bijvoorbaat dank Grt Ako

[anoniem]

[code:1:67e1413616]Private Sub Verhuringen_Klantnummer_DblClick(Cancel As Integer) Dim klnt As Variant klnt = InputBox("Geef het klantnummer: ", "Zoeken", Me![Verhuringen.Klantnummer]) If klnt <> "" Then Me.Filter = "Verhuringen.klantnummer = " & klnt Me.FilterOn = True End If End Sub [/code:1:67e1413616] Mischien is deze makro iets. Verander wel eerst de veldnaam! (Verhuringen.klantnummer) Wim