Varios Critérios para AfterUpdate

Boa Tarde!

Estou com um problema para retornar uma data, pois o afterupdate apresenta um erro em tempo de execução '3464" tipo de dados incompatíveis na expressão de critérios.

Já pesquisei em todos os lugares e não encontrei uma solução, e mexi no código abaixo de varias formas e não obtive resultado.

Bom tenho um formulário que retorna a informação para mim da Data de Expedição de um determinado documento de um prestador de serviço, porém, a data.

Os meus documentos são cadastrados em outra tabela "Tbl_Cadastro_de_Documento" pelo Tipo de Documento "ASO", Prestador de Serviço "ID Prestador" e o Status Ativado/Desativado, porém, usarei o Ativado "-1"

Ou seja, o meu afterupdate retorna a data de Expedição da tabela baseando, ID Prestador, Tipo de Documento e Status.

Código:

Me.Data_de_Expedição10 = Nz(DLookup("[Data de Emissão]", "[Tbl_Cadastro_de_Documento]", "[ID Prestador]='" & Me.txt_n_doc & "' And [Documento] = '" & "ASO" & "' And [STATUS] = '" & "-1" & "'"), "")


Gostaria de uma direção para entender onde o meu código esta incorreto.

Desde já agradeço a atenção e ajuda.

Fiquei confuso, se os dados são necessarios porque esta usando no "nz" antes da expressao?

Boa noite!
Id prestador deve ser um campo numérico e status booleano, eu presumo. Por que coloca-los no critério como texto?

Será que assim da certo?

Código:


Me.Data_de_Expedição10 = Nz(DLookup("[Data de Emissão]", "[Tbl_Cadastro_de_Documento]", "[ID Prestador]=" & Me.txt_n_doc & " And [Documento] = '" & "ASO" & "' And [STATUS] = " & 1 & ""), "")



ja tentou esse codigo sem o "nz" antes do dlookup?

philipp.moreira / tauron,

Primeiramente agradeço pela atenção, porém, tentei as duas maneiras que vcs me passarão e não funcionou.

Posta seu BD, assim, podemos analisar e fazer uma sugestão melhor a você! ;)

Ao cadastrar um prestador, a Id, status sao armazenados na tabelaA e os documentos na tabelaB como se fosse uma tabela auxiliar eh isso?

Poste seu bd assim poderemos ver sua estrutura e sermos mais objetivos ao invez de "chutarmos" solucoes.