NewfieSarah
Registered User.
- Local time
- Today, 13:28
- Joined
- Feb 11, 2005
- Messages
- 193
I need help my filter will not clear, after i use my filter I want to clear it out so there is nothing in the field when I go to filter again, I have tryed different code, and nothing seem to be working. Can anyone help me!
Code I tryed:
ReApplyFilter= Me.filter= true
Me.Filter= ""
Me.FilterOn=False
Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
Select Case KeyCode
Case vbKeyF9
' Clear Filter.
Me.FilterOn = False
Case Else
End Select
End Sub
Private Sub Form_Load()
Me.KeyPreview = True
End Sub
Code I tryed:
ReApplyFilter= Me.filter= true
Me.Filter= ""
Me.FilterOn=False
Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
Select Case KeyCode
Case vbKeyF9
' Clear Filter.
Me.FilterOn = False
Case Else
End Select
End Sub
Private Sub Form_Load()
Me.KeyPreview = True
End Sub