Filter

[sir_dan_mitchell]

hi I want to filter records in my database,

I know what I want to do, I want to filter by form. I can however only find 2 buttons that will filter in the wizard. One is apply and one is edit. The edit code is posted below, can someone ammend it so that when I click the button, it gives me the option to filter by form!!

Private Sub Command305_Click()
On Error GoTo Err_Command305_Click


DoCmd.DoMenuItem acFormBar, acRecordsMenu, 0, 2, acMenuVer70

Exit_Command305_Click:
Exit Sub

Err_Command305_Click:
MsgBox Err.Description
Resume Exit_Command305_Click

End Sub




Thanks guys

 

[dgm]

DoCmd.DoMenuItem acFormBar, acRecordsMenu, 0, 0, acMenuVer70