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
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