Open form on empty with Data Entry = NO to allow searches

[MackMan]

Hi all. I'm sure this has been covered before, and I've searched with no luck for my specific problem.

I have 3 forms.

form 1 is just to contain the other two, as it's a popup (and it's totally unbound to anything).
form 2 to enter data, and Form 3 to show a summary of all data via a query.

On load I'd like form 2 (data entry) to show a blank record.

Currently, when clicking in form 3 (summary of data) I can load the record from it into Form 2 to view all data for that record.

However, I've ran into a problem, where by, if I set the forms property sheet to Data Entry = Yes (new record), I can no longer click on the summary and load the record into form two.

I'm currently using

Dim lngID As Long
lngID = Me.ID
 Forms!form1!form2.SetFocus
Forms!form1!form2.Form!ID.SetFocus
DoCmd.FindRecord lngID

to find the record and all works fine is Data Entry = No

If I set it to Yes, I run into error 2137, Can't use find and replace...

does anyone know of a work around?

As always, appreciate your help.

 

[JHB]

Set the form's property "Data Entry" to "No", do it in the code you already have.

 

[MackMan]

Awesome. did the job!
thanks JHB!

 

[JHB]

You're welcome, good luck.