applying filter to form

[cmartin1986]

What I'm trying to do is add a button to my "front" page which will open a form and filter excluding the words "installed" and "na" in the field declared by my combo box. I've pretty much got it figured out except I can get it to filter out more than one of the two words. Here is what I've got:

Private Sub Command82_Click()
On Error GoTo Err_Status_Click
 
    Dim stdocname As String
    Dim stlinkcriteria As String
 
    stdocname = "Workstatement Boilerplate"
 
    stlinkcriteria = "[" & Me![Combo65] & "] not like 'installed' and 'na'"
    DoCmd.OpenForm stdocname, , , stlinkcriteria
 
Exit_status_Click:
    Exit Sub
 
Err_Status_Click:
    MsgBox Err.Description
    Resume Exit_status_Click
 
 
 
End Sub
 

Thanks for your help.

[puppydogbuddy]

Try using Or instead of And in your criteria:

stlinkcriteria = "[" & Me![Combo65] & "] not like 'installed' Or 'na'"

[ADezii]

What I'm trying to do is add a button to my "front" page which will open a form and filter excluding the words "installed" and "na" in the field declared by my combo box. I've pretty much got it figured out except I can get it to filter out more than one of the two words. Here is what I've got:

Private Sub Command82_Click()
On Error GoTo Err_Status_Click
 
    Dim stdocname As String
    Dim stlinkcriteria As String
 
    stdocname = "Workstatement Boilerplate"
 
    stlinkcriteria = "[" & Me![Combo65] & "] not like 'installed' and 'na'"
    DoCmd.OpenForm stdocname, , , stlinkcriteria
 
Exit_status_Click:
    Exit Sub
 
Err_Status_Click:
    MsgBox Err.Description
    Resume Exit_status_Click
 
 
 
End Sub
 

Thanks for your help.

Try:

stlinkcriteria = "Me![Combo65] Not Like '*installed*' And Me![Combo65] Not Like '*na*';"

[cmartin1986]

I tried both the possible soloutions you guys provided and neither worked... They both just showed all records. Any other ideas would be great.

Thanks again.

[cmartin1986]

I tried both the possible soloutions you guys provided and neither worked... They both just showed all records. Any other ideas would be great.

Thanks again.

[puppydogbuddy]

I tried both the possible soloutions you guys provided and neither worked... They both just showed all records. Any other ideas would be great.

Thanks again.

Try changing this:

DoCmd.OpenForm stdocname, , , stlinkcriteria

To:

DoCmd.OpenForm stdocname, , stlinkcriteria

[cmartin1986]

Got it to work.. Thanks,