Troubleshoot Find Button

[Guest]

Hi

I have placed a command button on my form using the wizard, which should
allow users to 'search all fields' of my query, but for some reason it's not
working.

If it's any help, when I click the button and the Find/Replace box comes up
the 'Look In' field is greyed out so I can't adjust it.

Code is as follows:

Private Sub Command30_Click()
On Error GoTo Err_Command30_Click


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

Exit_Command30_Click:
Exit Sub

Err_Command30_Click:
MsgBox Err.Description
Resume Exit_Command30_Click

End Sub

Any help most appreciated... the simpler the better, I'm not very
experienced with code yet.

Thanks

CastorandPollux

 

[Guest]

NEVER MIND! Finally figured one out for myself!