Amigos mestres,
me deparei numa situação em que possuo um campo consulta que busca o registro de acordo com o nome pesquisado:
E em paralelo abre a msg de erro no centro da tela com a seguinte informação:
Erro de sintaxe (operador faltando) na expressão de consulta '[Codigo]='
Alguém sabe me dizer qual o operador que está faltando? tentei o tratamento "On Error Resume Next", resolveu a questão do erro mas em compensação não executa o fechamento do formulário, mas sim o comando minimizar. É preciso restaurar para clicar novamente no "FECHAR" para executar finalmente a macro.
Certo que terei a orientação de corrigir este incômodo, fico no aguardo!!!
AMarcos
me deparei numa situação em que possuo um campo consulta que busca o registro de acordo com o nome pesquisado:
- Código:
Private Sub comb_ConsultaMotora_AfterUpdate()
Dim strCriterio
strCriterio = "[Codigo]=" & Me.comb_ConsultaMotora.Column(0) 'Onde 0 é a coluna da Código (PK)
DoCmd.Minimize
DoCmd.OpenForm "Cadastro_Motoristas", , , strCriterio
End Sub
- Código:
DoCmd.OpenForm "Cadastro_Motoristas", , , strCriterio
E em paralelo abre a msg de erro no centro da tela com a seguinte informação:
Erro de sintaxe (operador faltando) na expressão de consulta '[Codigo]='
Alguém sabe me dizer qual o operador que está faltando? tentei o tratamento "On Error Resume Next", resolveu a questão do erro mas em compensação não executa o fechamento do formulário, mas sim o comando minimizar. É preciso restaurar para clicar novamente no "FECHAR" para executar finalmente a macro.
Certo que terei a orientação de corrigir este incômodo, fico no aguardo!!!
AMarcos