Open form from combo box

[aceoftrades]

I'm new to access and trying to make a combo box that gets it's data from a category table (Form 1, Form 2, Form 3). When the user selects Form 1 frm1 opens - Form 2 frm2 opens - Form 3 frm3 opens. The combo box is populated with the table info but not sure how to open the corresponding form when clicked on. This seems like it should be a simple task but I have spent hours trying to figure it out and cant. Thank you in advance.

[RuralGuy]

You would use the AfterUpdate event of the ComboBox to open the form.

[aceoftrades]

Thanks but can you be more specific as I said I'm new to access.

[RuralGuy]

Use the Command Button wizard to create a button that opens a form. Then move the code in the Click event to the cbo and change it to use the cbo instead.

[aceoftrades]

Ok...I made 3 buttons with the Command Button wizzard that each open one of the 3 forms with a macro...not sure how i should move it to the Click event on the cbo???

[RuralGuy]

My Internet is going up and down right now so pardon me if I don;t get back right away.

[RuralGuy]

Do you know how to convert the macros to code?

[RuralGuy]

http://www.btabdevelopment.com/ts/de...aspx?PageId=91

[aceoftrades]

Thanks...no i didn't ... i converted and have the codes for each button...now what do i do with each code?

[RuralGuy]

Instead of the Form name in the Command, put Me.ComboBoxName. (using YOUR ComboBox Name of course) If your cbo is bound to the column that contains the Form you want then it should open THAT form.

[ssanfu]

If the combo box has the name of the forms in the bound column, your code might look like:

Private Sub YourComboBoxName_AfterUpdate()
'change YourComboBoxName to the actual combo box name

   DoCmd.OpenForm Me.YourComboBoxName

End Sub

[aceoftrades]

Ok...now i'm lost again... I have code that looks like this:


Private Sub cmdForm1_Click ()
DoCmd.OpenForm "frm1", acNormal, "", "", , acNormal
End Sub

... and one for Form 2 and Form 3
Combo Box Name is cboForms

[RuralGuy]

Steve showed you the code that would go in the AfterUpdate event of the ComboBox.

[aceoftrades]

I switched to AfterUpdate and I kept getting a run-time error "The form name "2" is misspelled or refers to a form that doesn't exist." The "2" refers to the FormID so I renamed the forms from frm1, frm2, frm3 to 1, 2, 3, and it worked. I would rather not rename them so is there a way to have it look at a field FormName rather than FormID which is the PrimaryKey and autonumbered and open the form based on that instead?

[ssanfu]

I switched to AfterUpdate and I kept getting a run-time error "The form name "2" is misspelled or refers to a form that doesn't exist." The "2" refers to the FormID so I renamed the forms from frm1, frm2, frm3 to 1, 2, 3, and it worked. I would rather not rename them so is there a way to have it look at a field FormName rather than FormID which is the PrimaryKey and autonumbered and open the form based on that instead?

The row source for the combo box should be a query.

The query would look like "SELECT FormName FROM TableName ORDER BY FormName" (change "TableName" to your table name- without quotes.)


That is all you need.

Or you could use:

DoCmd.OpenForm Me.YourComboBoxName.Column(1)

(column count is zero based)