boas
estou a bater com a cabeça no Protatil...
reparem, tenho uma combo-box baseada numa tabela,no separador da combo-box separador outro tenho o seguinte código ao receber o foco :
Private Sub cboLista_GotFocus()
Dim mysql As String
mysql = "SELECT * FROM tbl_menu_secretaria_2 ORDER BY Descricao;"
Me!cboLista.RowSource = mysql
End Sub
No separador Acontecimento ao receber o foco :
Private Sub cboLista_GotFocus()
Dim mysql As String
mysql = "SELECT * FROM tbl_menu_secretaria_2 ORDER BY Descricao;"
Me!cboLista.RowSource = mysql
End Sub
e se eu tiver apenas um registo na tabela ele abre o Form se colocar 2, ou mais registos ele abra a combo-box mostra os registo mas abre sempre o mesmo Form...
Depois tenho um botão que após escolher o que pretendo abrir botão - ir com o seguinte Código :
Isto no separador Acontecimento ao fazer clique :
Private Sub btImprimir2_Click()
If IsNull(Me!cboLista.Value) Then
MsgBox "...", vbInformation, "..."
Exit Sub
End If
DoCmd.OpenForm Me.cboLista.Column(2)
End Sub
Help . . .Obrigado
estou a bater com a cabeça no Protatil...
reparem, tenho uma combo-box baseada numa tabela,no separador da combo-box separador outro tenho o seguinte código ao receber o foco :
Private Sub cboLista_GotFocus()
Dim mysql As String
mysql = "SELECT * FROM tbl_menu_secretaria_2 ORDER BY Descricao;"
Me!cboLista.RowSource = mysql
End Sub
No separador Acontecimento ao receber o foco :
Private Sub cboLista_GotFocus()
Dim mysql As String
mysql = "SELECT * FROM tbl_menu_secretaria_2 ORDER BY Descricao;"
Me!cboLista.RowSource = mysql
End Sub
e se eu tiver apenas um registo na tabela ele abre o Form se colocar 2, ou mais registos ele abra a combo-box mostra os registo mas abre sempre o mesmo Form...
Depois tenho um botão que após escolher o que pretendo abrir botão - ir com o seguinte Código :
Isto no separador Acontecimento ao fazer clique :
Private Sub btImprimir2_Click()
If IsNull(Me!cboLista.Value) Then
MsgBox "...", vbInformation, "..."
Exit Sub
End If
DoCmd.OpenForm Me.cboLista.Column(2)
End Sub
Help . . .Obrigado