Solved Search in Sub Form by SetFilter Macro Action (1 Viewer)

Sarah.M

Member
Local time
Today, 07:56
Joined
Oct 28, 2021
Messages
335
Hi, Plz note, My VBA is blocked by IT for security reason (Cybersecurity).
I can use only Expression builder, Macros, Queries, Tables, Forms and Reports only.
----------------------------------------------
I want to make advanced Search by using SetFilter Macro Action
I have [UserName] as text and [IDNumber] as Number
I use this Where Condition
=[CombList].[column](1) Like "*" & Str(Nz([Screen].[ActiveControl],0)) & "*"
=[CombList].[column](1) Like "*" & [Screen].[ActiveControl] & "*"
=[CombList].[column](1) Like "*" & Str([Screen].[ActiveControl]) & "*"
=[CombList].[column](1) Like "*" & Nz([Screen].[ActiveControl],0) & "*"

=[CombList].[column](1) Like "*" & Str(Nz([TextSearch],0)) & "*"
=[CombList].[column](1) Like "*" & [TextSearch] & "*"
=[CombList].[column](1) Like "*" & Str([TextSearch]) & "*"
=[CombList].[column](1) Like "*" & Nz([TextSearch],0) & "*"

Searching not working I did not get result, plz help me to fix it 🙏 😒
Of if you have suggestions plz let me know

Sample attached
 

Attachments

  • ListSearch.accdb
    752 KB · Views: 145

theDBguy

I’m here to help
Staff member
Local time
Yesterday, 21:56
Joined
Oct 29, 2018
Messages
21,358
Give this a try...

I used:
Code:
=[CombList] & " Like '*" & [TextSearch] & "*'"
 

Attachments

  • ListSearch.zip
    25.6 KB · Views: 143

Users who are viewing this thread

Top Bottom