Currently i have a form and an event that traps Ctrl+F or
the shortcut to the find command. The problem is when ever
the F is pressed the find dalogue appears. How can i trap
the Ctrl+F together.

Thanks

My code is below:

Private Sub Form_KeyDown(KeyCode As Integer, Shift As
Integer)

If (KeyCode = 17) And (bolCtrl = False) Then
bolCtrl = True
End If

If (bolCtrl = True) And (KeyCode = 70) Then

DoCmd.GoToControl "txtSurname"
DoCmd.DoMenuItem acFormBar, acEditMenu, 9

End If

End Sub

"David Mc" <(E-Mail Removed)> wrote in
news:020901c37ba3$8d6e5610$(E-Mail Removed):

> If (bolCtrl = True) And (KeyCode = 70) Then
>
> DoCmd.GoToControl "txtSurname"
> DoCmd.DoMenuItem acFormBar, acEditMenu, 9
>
> End If
>
>

I have no idea what bolCtrl means, but the normal way to do this would be

If (Shift And acCtrlMask) and (KeyCode = 70) Then



and don't forget to set KeyCode to zero when exiting the procedure, to
prevent the default seach box appearing anyway.

Hope that helps



Tim F