Reference the form that opened the current form

I have one form used for editing, that can be opened by two other forms.
Since this is not a parent child relationship, is there a way to reference
the form that opened the active form? Example of what I am searching for:

If opened by frm1 Then
Me.ID = Forms![frm1]![ID]
Else
If opened by frm2 Then
Me.ID = Forms![frm1]![ID]
End If
End If

Thank you in advance!
Renee

Typo, sorry, should be:
If opened by frm1 Then
Me.ID = Forms![frm1]![ID]
Else
If opened by frm2 Then
Me.ID = Forms![frm2]![ID]
End If
End If

"Renee" wrote:

I have one form used for editing, that can be opened by two other forms.
Since this is not a parent child relationship, is there a way to reference
the form that opened the active form? Example of what I am searching for:

If opened by frm1 Then
Me.ID = Forms![frm1]![ID]
Else
If opened by frm2 Then
Me.ID = Forms![frm1]![ID]
End If
End If

Thank you in advance!
Renee

"Renee" wrote in message
...
I have one form used for editing, that can be opened by two other forms.
Since this is not a parent child relationship, is there a way to reference
the form that opened the active form? Example of what I am searching for:

If opened by frm1 Then
Me.ID = Forms![frm1]![ID]
Else
If opened by frm2 Then
Me.ID = Forms![frm1]![ID]
End If
End If

Thank you in advance!
Renee



On the assumption that you are opening the form using OpenForm, use the
OpenArgs argument to pass in either the name of the opening form or (better)
the value of ID.

On Fri, 25 Feb 2005 10:31:04 -0800, Renee wrote:

Typo, sorry, should be:
If opened by frm1 Then
Me.ID = Forms![frm1]![ID]
Else
If opened by frm2 Then
Me.ID = Forms![frm2]![ID]
End If
End If

"Renee" wrote:

I have one form used for editing, that can be opened by two other forms.
Since this is not a parent child relationship, is there a way to reference
the form that opened the active form? Example of what I am searching for:

If opened by frm1 Then
Me.ID = Forms![frm1]![ID]
Else
If opened by frm2 Then
Me.ID = Forms![frm1]![ID]
End If
End If

Thank you in advance!
Renee



Use the OpenArgs argument when you open the form:
DoCmd.OpenForm "FormName", , , , , , Me.Name

Then in the "FormName" Load event:
If Me.OpenArgs = "Form1" Then
Me.ID = Forms![form1]![ID]
Elseif Me.OpenArgs = "Form2" Then
Me.ID = Forms![form2]![ID]
Else
' Do something else
End If

Why not just pass the form's [ID] field value instead of the name of
the form?

DoCmd.OpenForm "FormName", , , , , , Me![ID]

Then in the "FormName" Load event:

If Not IsNull(Me.OpenArgs) then
Me!ID = Me.OpenArgs
End If

--
Fred
Please only reply to this newsgroup.
I do not reply to personal email.

If you want to pass the calling form's name, and you're pulling the same
field (ID) from it, you don't need to use the if..then clause:
Me.ID=Forms(Me.OpenArgs)![ID]
this way, it won't matter what the calling form's name is. Sometimes I end
up changing form names, so I try to avoid hard-coding a name if possible.

As mentioned before, if all you're trying to do is come up with the value in
the ID field, then just pass that as the OpenArg.

"fredg" wrote in message
. ..
On Fri, 25 Feb 2005 10:31:04 -0800, Renee wrote:

Typo, sorry, should be:
If opened by frm1 Then
Me.ID = Forms![frm1]![ID]
Else
If opened by frm2 Then
Me.ID = Forms![frm2]![ID]
End If
End If

"Renee" wrote:

I have one form used for editing, that can be opened by two other forms.
Since this is not a parent child relationship, is there a way to
reference
the form that opened the active form? Example of what I am searching
for:

If opened by frm1 Then
Me.ID = Forms![frm1]![ID]
Else
If opened by frm2 Then
Me.ID = Forms![frm1]![ID]
End If
End If

Thank you in advance!
Renee



Use the OpenArgs argument when you open the form:
DoCmd.OpenForm "FormName", , , , , , Me.Name

Then in the "FormName" Load event:
If Me.OpenArgs = "Form1" Then
Me.ID = Forms![form1]![ID]
Elseif Me.OpenArgs = "Form2" Then
Me.ID = Forms![form2]![ID]
Else
' Do something else
End If

Why not just pass the form's [ID] field value instead of the name of
the form?

DoCmd.OpenForm "FormName", , , , , , Me![ID]

Then in the "FormName" Load event:

If Not IsNull(Me.OpenArgs) then
Me!ID = Me.OpenArgs
End If

--
Fred
Please only reply to this newsgroup.
I do not reply to personal email.

Thank you much, that worked perfectly!

Have a great weekend,
Renee

"fredg" wrote:

On Fri, 25 Feb 2005 10:31:04 -0800, Renee wrote:

Typo, sorry, should be:
If opened by frm1 Then
Me.ID = Forms![frm1]![ID]
Else
If opened by frm2 Then
Me.ID = Forms![frm2]![ID]
End If
End If

"Renee" wrote:

I have one form used for editing, that can be opened by two other forms.
Since this is not a parent child relationship, is there a way to reference
the form that opened the active form? Example of what I am searching for:

If opened by frm1 Then
Me.ID = Forms![frm1]![ID]
Else
If opened by frm2 Then
Me.ID = Forms![frm1]![ID]
End If
End If

Thank you in advance!
Renee



Use the OpenArgs argument when you open the form:
DoCmd.OpenForm "FormName", , , , , , Me.Name

Then in the "FormName" Load event:
If Me.OpenArgs = "Form1" Then
Me.ID = Forms![form1]![ID]
Elseif Me.OpenArgs = "Form2" Then
Me.ID = Forms![form2]![ID]
Else
' Do something else
End If

Why not just pass the form's [ID] field value instead of the name of
the form?

DoCmd.OpenForm "FormName", , , , , , Me![ID]

Then in the "FormName" Load event:

If Not IsNull(Me.OpenArgs) then
Me!ID = Me.OpenArgs
End If

--
Fred
Please only reply to this newsgroup.
I do not reply to personal email.