Find button not working on Subform

G

Guest

Please, I put a find command button on my form, but it
wont find anything in the subform i have! It wont bring
up records that I know exist
..

Private Sub cmdFind_Click()
On Error GoTo Err_cmdFind_Click


Screen.PreviousControl.SetFocus
DoCmd.DoMenuItem acFormBar, acEditMenu, 10, ,
acMenuVer70

Exit_cmdFind_Click:
Exit Sub

Err_cmdFind_Click:
MsgBox Err.Description
Resume Exit_cmdFind_Click

End Sub
 
D

dennisg

I'm not an expert, so this is only a shot. It sounds like the same proble, that I am having with a recordset build from a table that does not support index so Find and Seek do not work

Dim bAns As Boolea
bAns = rst.Supports(adIndex

returns False
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Top