boa tarde!
Estou montando um formulário para gerenciar chamados. e estou com problema para faltar um subform usando como base uma caixa de listagem.
Segue abaixo o código que estou tentando
Dim filtro As String
filtro = Me.lista_teste.Column(0)
Me.filho_chamado.Form.Filter = "id_chamado = filtro"
Me.filho_chamado.Form.FilterOn = True
Me.filho_chamado.Form.Requery
Me.filho_chamado.Visible = True
Esta dando "Tipos incompatíveis"
Ele ate aparece o filtro dentro do formulário.. mas não funciona.
Obrigado.
Estou montando um formulário para gerenciar chamados. e estou com problema para faltar um subform usando como base uma caixa de listagem.
Segue abaixo o código que estou tentando
Dim filtro As String
filtro = Me.lista_teste.Column(0)
Me.filho_chamado.Form.Filter = "id_chamado = filtro"
Me.filho_chamado.Form.FilterOn = True
Me.filho_chamado.Form.Requery
Me.filho_chamado.Visible = True
Esta dando "Tipos incompatíveis"
Ele ate aparece o filtro dentro do formulário.. mas não funciona.
Obrigado.