MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

Obrigado

Administração do MaximoAccess

Dicas Ms Access, Exemplos Ms Access, Codigos VBA Ms Access, SQL Ms Access

    [Resolvido]DLookup - retornando erro de incompatibilidade

    Compartilhe

    betocac
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 21
    Registrado : 23/10/2016

    [Resolvido]DLookup - retornando erro de incompatibilidade

    Mensagem  betocac em Qua 24 Maio 2017 - 20:50

    Boa tarde senhores,

    Tenho uma rotina que gostaria de buscar um código em uma tabela conforme um determinado campo de um formulário.
    Estou tentando usar o DLookup conforme abaixo;

    Private Sub IdCliente_GotFocus()
    Dim varX As Variant

    If Not IsNull(Me.CNPJ_CPF) Then
    varX = DLookup("[Codigo]", "tb_Clientes", "[CNPJ] = " & (Me.CNPJ_CPF))
    Me.IdCliente = varX
    End If
    End Sub

    O problema é que recebo uma mensagem de erro em tempo de execução: 3464 (Tipo de dados incompatíveis na expressão critério).
    Fiz e refiz os testes, o nome da tabela e os tipos dos campos estão corretos, já vi vários exemplos e não consegui sucesso.

    Peço aqui a ajuda dos mestres.

    Obrigado!

    betocac
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 21
    Registrado : 23/10/2016

    Achei

    Mensagem  betocac em Qua 24 Maio 2017 - 20:59

    Obrigado Senhores.

    Encontrei uma resposta aqui mesmo no forum, tratava-se de um campo string e as aspas foram fundamentais para o retorno correto.

    Resultado = DLookup("[Linha]", "Combinação", "[Texto]='" & Forms!Formulário!Texto & "'")

    Obrigado aos que leram, compartilho a solução para futuras pesquisas.

    Como faço para encerrar os tópicos??
    avatar
    Alexandre Neves
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 6505
    Registrado : 05/11/2009

    Re: [Resolvido]DLookup - retornando erro de incompatibilidade

    Mensagem  Alexandre Neves em Seg 12 Jun 2017 - 19:10

    Para dar o tema por concluído, prima o botão "Resolvido" na zona inferior direita do fórum
    Não utilize o título para mensagem, mantenha-o como título


    .................................................................................
    Access 2010. Mande bd que dê para testar (indique a versão). Não peça para fazer o que já tem feito. Dê todos os detalhes.
    Não coloquem entraves como senhas, esconder controlos, etc. Disponibilizem o mais limpo possível
    Só respondo a mensagens privadas, se forem de assunto privado; às outras não respondo.
    Quem trabalha e mata a fome não come o pão de ninguém; mas quem não trabalha e come, come sempre o pão de alguém. António Aleixo

    betocac
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 21
    Registrado : 23/10/2016

    Resolvido ???

    Mensagem  betocac em Seg 12 Jun 2017 - 19:17

    Oi Alexandre,

    Obrigado!
    avatar
    Alexandre Neves
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 6505
    Registrado : 05/11/2009

    Re: [Resolvido]DLookup - retornando erro de incompatibilidade

    Mensagem  Alexandre Neves em Seg 12 Jun 2017 - 21:32

    Tem de se manter atento e respeitar as orientações

    Informei para não manter o título, não utilizando como mensagem!
    O botão "Resolvido" encontra na zona inferior direita do formulário do fórum, ao lado direito da caixa de texto do título


    .................................................................................
    Access 2010. Mande bd que dê para testar (indique a versão). Não peça para fazer o que já tem feito. Dê todos os detalhes.
    Não coloquem entraves como senhas, esconder controlos, etc. Disponibilizem o mais limpo possível
    Só respondo a mensagens privadas, se forem de assunto privado; às outras não respondo.
    Quem trabalha e mata a fome não come o pão de ninguém; mas quem não trabalha e come, come sempre o pão de alguém. António Aleixo

      Data/hora atual: Ter 21 Nov 2017 - 10:11