фильтр списка в форме доступа к msaccess - PullRequest
Новая
       57

фильтр списка в форме доступа к msaccess

0 голосов
/ 17 июня 2020

У меня есть список, добавленный в мою форму, который позволяет мне быстро переключаться между записями в моей базе данных. Он использует tblProjectCoreData в качестве источника и отображает только 4 строки: ProjectID, ProjectName, Product и Customer. Я хочу отфильтровать список и попытался использовать кнопку:

Private Sub butFilter() DoCmd.GoToControl "Product" DoCmd.RunCommand acCmdFilterMenu End Sub

Однако это не сработало. Может ли кто-нибудь помочь мне?

EDIT:

У меня был умеренный успех со следующей функцией: 

Private Sub FilterBy_Change()
    Dim sql As String
    sql = "SELECT listbox001 Product FROM tblProjectCoreData WHERE Product Like '" & Me.FilterBy.Text & "*' ORDER BY Product"
    Me.listbox001.RowSource = sql
End Sub

Это затем фильтрует записи в таблице на основе того, что я ввел в «FilterBy» Текстовое окно. Однако он не позволяет мне перейти к записи в базе данных и просто фильтрует список.

...