Open form using variable 1

[mphayesuk]

Hi want I want to do is open a form using vba with the form name being a variable. eg

formnameopen$ = "form1"

DoCmd.OpenForm formnameopen$

And also use it in the code eg

Forms![formnameopen$]![EquipmentID] = selectrecord

My attempts at making this work have failed so any help would be great.

Thanks

 

[dRahme]

Hi, how about this for the first part:

Dim formnameopen As String
formnameopen = Me.txtFrmName
DoCmd.OpenForm formnameopen, acNormal

Didn't quite understand the second part.

 

[Remou]

mphayesuk
For the second part, do you mean something like:
[tt]Forms(formnameopen$).TextBoxName = "Hello"[/tt]

 

[mphayesuk]

Yes Remou that is what I was getting at, but instead of "hello" it can equal a variable.... But the sticking point was using a variable for the form name.

Can you or anyone help with this.

Thanks

 

[Remou]

Yes. Use brackets as above:
[tt]formnameopen$="Form1"
strString = "Hello"
Forms(formnameopen$).TextBoxName = strString[/tt]

This works for controls too:
[tt]strFrm = "Form1"
strCtl = "Text1"
strVal = "Hello"
Forms(strFrm).Controls(strCtl) = strVal[/tt]

 

[Remou]

I should have included:

http://msdn.microsoft.com/library/d...y/en-us/vbaac11/html/acobjForm_HV05186308.asp

For more detail.