Case statement

[jaycee]

I have a Form "FrmFocus" which contains a combo box "CmbProduct" which has several lines of text, each line corresponds to a seperate form, What I need to happen is to set up a case statement that will do the following:
Save the record on FrmFocus.
Open up the correct form as per the text in the combo box.
Close Frmfocus.

Using Access 2003

Many thanks <!-- / message --><!-- Adsense inside first post-->

 

[xenou]

Something like this should work, I think:

Sub Foo()

Me.Dirty = False                                   '//Save current record
DoCmd.MoveSize 0, 0, 0, 0                     '//Get this form out of sight
DoCmd.OpenForm Me.Combo0.Value            '//Open the other form
DoCmd.Close acForm, Me.Name, acSaveNo    '//Close this form (acSaveNo refers to form design, not the record)

End Sub

 

[jaycee]

Many thanks for the reply

I will try this later.

Cheers