How to Close the "Find" form

[Sidewalk_Cowboy]

I can use the following vba to Open the Find form (dialog?):

DoCmd.RunCommand acCmdFind



Many of our users click Ctrl + F to also open the Find form; unfortunately, after finding the desired record, they click on another command button without closing the opened Find form. Later, they often find it still open when they close a form. I'd like to add vba to the command button that closes the opened Find form.

Can anyone provide me with the vba to Close this command form?

Thanks in advance.

[Welshgasman]

Perhaps cycle through all open forms and debug.print form name, and see what it is called?

[Sidewalk_Cowboy]

I tried:

Sub AllForms()
Dim obj As AccessObject, dbs AsObject
Set dbs = Application.CurrentProject

' Search for open AccessObject objects in AllForms collection.
For Each obj In dbs.AllForms
If obj.IsLoaded = True Then
' Print name of obj.
Debug.Print obj.Name
End If
Next obj
End Sub

It returned the name of the opened form but not the Find form. So it apparently isn't a "form", not sure exactly what it is. If it's a dialog, I don't know how to cycle dialog objects to discover which are open.

[Micron]

You must not be opening it as dialog as you questioned, otherwise you would not be able to open any other object until that one is closed. In fact, the calling code would 'hang' until that happens. You could open form in design and set modal property to True (yes) also.

[Sidewalk_Cowboy]

Micron,

Now that I try it, I the find dialog appears to close when we click a commond button on the form that opens another form?

I know I've worked with users where we found the Find dialog open after we clicked on the button to open another form ... but I can't get it to do it again!

I guess, I'll forget about it unless it reoccurs. It does stay open once it finds a record but now disappears when we click the command button to open another form.

Feel like I must be smoking something

Thanks. I don't know how to show your response as an answer, but for now it is.

[Welshgasman]

Thanks. I don't know how to show your response as an answer, but for now it is.

Thread Tools in the menu bar on the top right of the thread.

[Gicu]

Just a side note, you might want to consider replacing the built in Find and Replace dialog you're currently using with a custom pop-up and \or modal form that you can easily control. Here is an older discussion on the topic:
https://bytes.com/topic/access/answe...blem-accmdfind

Cheers,

[Micron]

Well it seems I misinterpreted this

they click on another command button without closing the opened Find form.

to mean you were using a form. If you mean it's what you get when you use a context menu or ribbon menu (or keyboard shortcut for the same), then I don't know. I think you were more accurate to call it a dialog. I don't suppose it really matters if it remains open, but your form close code could probably take care of it.