[Resolvido]Combo escolhe form a ser aberto

Gostaria que ao selecionar uma opção uma combo exemplo:
Form1, Form2, Form3....
Abrisse o respectivo form.
Seria utilizado esses form com subform.
Fiz a codoficação em VBA abaixo, só abrindo os dois ao mesmo tempo.
O que fiz de errado?
Obrigado


Private Sub Combinação1_BeforeUpdate(Cancel As Integer)
On Error GoTo Err_Combinação1_Click

Dim stDocName As String
Dim stLinkCriteria As String

stDocName = "Form1"
DoCmd.OpenForm stDocName, , , stLinkCriteria

stDocName = "Form2"
DoCmd.OpenForm stDocName, , , stLinkCriteria

Exit_Combinação1_Click:
Exit Sub

Err_Combinação1_Click:
MsgBox Err.Description
Resume Exit_Combinação1_Click
End Sub

Use um select:
Adápte este código:

Select Case Me.SuaCBO

Case "Form1"
Abra o forme um

Case "Form2"
Abra o forme dois

'E assim por diante
End Select

Oi Marcelo td bem?
O código ficaria assim?

Private Sub Combinação1_BeforeUpdate(Cancel As Integer)
On Error GoTo Err_Combinação1_Click

Case Select Me.Combinação1

Case "Form1"
DoCmd.OpenForm 1

Case "Form2"

DoCmd.OpenForm 2

End Select

Exit Sub

Err_Combinação1_Click:
MsgBox Err.Description
Resume Exit_Combinação1_Click
End Sub

Isso mesmo, teste aí!

Ok.Vou testar quando chegar em casa. o saindo do trabalho agora. Depois eu posto.

Ok, no aguardo

Acredite queimou minha placa mae. Vou trocar. Depois te digo. Abracos

Ok

Oi marcelo desculpe a demora

Deu erro na seguinte linha "Case Select Me.Combinação6"

Em anexo banco em 2003
http://dl.dropbox.com/u/26997422/bd1.zip

Private Sub Combinação6_BeforeUpdate(Cancel As Integer)
On Error GoTo Err_Combinação6_Click

Case Select Me.Combinação6

Case "form1"
DoCmd.OpenForm 1

Case "form2"

DoCmd.OpenForm 2

End Select

Exit Sub

Err_Combinação6_Click:
MsgBox Err.Description
Resume Exit_Combinação6_Click

End Sub

Quando eu chegar da facu, vejo para você!

Veja, eu na verdade te passei errado a instrução select...
Ao invés de usar Case Select, o correto é Select Case

Pois bem, além disso, você está fazendo referencias a seus objetos de forma errada, pondo os nomes dos controles diferentes do nomes que eles realmente tem...

Em tempo, vou editar minhas postagens para efeito didático.

Baixe o banco corrigido e veja as alteração:

Ok.
Desculpe a demora
Obrigado e abraços.

Mylton veja este exemplo também abre o formulário no própio formulário.

http://www.4shared.com/zip/wVmjAi1Z/Menu_personalizado.html

Resouveu?

Resolveu
Obrigado João e Marcelo
não estou conseguindo finalizar no botão resolvido. Pode ajudar?
Obrigado

Grato pelo retorno...
Sobre o botão, veja se você usar outro navegador não funciona...
Grato