Solved open different forms as per the selection in the list box

[ahmad_rmh]

I am trying to open different forms as per the selection in the list box. I have tried this which opens the same form on double click.

DoCmd.OpenForm "frmItemsDetail", acNormal, , "[MasterTablesPK] =1 " & Me.DynamicList.Column(0)

I want to open different forms as per the selection.

for example:

MasterTablesPK=1 , Items List Form
MasterTablesPK=2, Suppliers Form
MasterTablesPK=3, Locations Form

How to get this solution.

 

[ebs17]

An approach with a bit of systematics:

Dim sFormName As String
Select Case Me.lstSelection
   Case 1
      sFormName = "frmA1"
   Case 2
      sFormName = "frmBXY"
   Case 3
      sFormName = "frmByeBye"
   CaseElse
      ' unexpected happened
End Select

DoCmd.OpenForm sFormName

 

[arnelgp]

based the Rowsource of your listbox to a table, on the demo, it is FormNamesT table.
much systematic, i guess.

 

[ahmad_rmh]

thanks, both works, but more systematic with short code and proper management of master forms table as described by arnel.