Hi,
I have a form where I need to apply two filters one at the time, using two cbo box: cbo_State for the field State and cbo_Status for the field Status.
I tried this, but doesn't work:
For State:
Private Sub cbo_State_AfterUpdate()
If Me.FilterOn = True Then
Me.Filter = "State= " & Me.cbo_State & " AND Status= " & Me.cbo_Status
Else
Me.Filter = "[State]='" & Me![cbo_State] & "'"
Me.FilterOn = True
End If
End Sub
and similar for the Status:
Private Sub cbo_Status_AfterUpdate()
If Me.FilterOn = True Then
Me.Filter = "State= " & Me.cbo_State & " AND Status= " & Me.cbo_Status
Else
Me.Filter = "[Status]='" & Me![cbo_Status] & "'"
Me.FilterOn = True
End If
End Sub
Can you help me please?
Thanks!
I have a form where I need to apply two filters one at the time, using two cbo box: cbo_State for the field State and cbo_Status for the field Status.
I tried this, but doesn't work:
For State:
Private Sub cbo_State_AfterUpdate()
If Me.FilterOn = True Then
Me.Filter = "State= " & Me.cbo_State & " AND Status= " & Me.cbo_Status
Else
Me.Filter = "[State]='" & Me![cbo_State] & "'"
Me.FilterOn = True
End If
End Sub
and similar for the Status:
Private Sub cbo_Status_AfterUpdate()
If Me.FilterOn = True Then
Me.Filter = "State= " & Me.cbo_State & " AND Status= " & Me.cbo_Status
Else
Me.Filter = "[Status]='" & Me![cbo_Status] & "'"
Me.FilterOn = True
End If
End Sub
Can you help me please?
Thanks!