[Resolvido]Dlookup e erro de tipo incompatível

Boa tarde à todos
Estou iniciando minhas explorações no Access, meu conhecimento é bem básico. “Herdei” um BD usado para controle de audiências e estou tentando adaptá-lo, para melhorar seu desempenho e facilitar a utilização. Para tanto, usei e abusei de inúmeros exemplos deste fórum. Contudo, ao tentar adaptar uma função que corrige duplicidade encontrei um problema.
O caso é o seguinte – tenho que impedir que se marquem audiências no mesmo dia e horário. Minha tabela tem o campo “DATA DA AUDIÊNCIA” formatado como data/hora e o campo HORÁRIO formatado da mesma maneira. Meu formulário tem os dois campos para alimentar o BD e, no evento BeforeUpdate do campo horário estou tentando adaptar uma função DLOOKUP com duas condições, que encontrei aqui no fórum. Ocorre que, ao colocar a função desta maneira:

If Not IsNull(DLookup("[DATA DA AUDIÊNCIA]", "TABREGISTRO", "[DATA DA AUDIÊNCIA]=#" & Me.DATAAUD & "#")) Or Not IsNull(DLookup("[HORÁRIO]", "TABREGISTRO", "[HORÁRIO]=#" & Me.HORARIO & "#")) Then

Ela funciona, porém não me serve porque pesquisa separadamente os dois campos, resultando em erro.
Ao tentar adaptar para uso de duas condições, desta maneira:

If Not IsNull(DLookup("[DATA DA AUDIÊNCIA]", "TABREGISTRO", "[DATA DA AUDIÊNCIA]=#" & Me.DATAAUD & "#" AND "[HORÁRIO]=#" & Me.HORARIO & "#")) Then

Ela me retorna ERRO EM TEMPO DE EXECUÇÃO 13 – TIPOS INCOMPATÍVEIS

Acho que já li todas as respostas relativas à duplicidade do fórum, mas não consegui descobrir o que acontece. Será que algum dos mestres do fórum poderia me dar uma luz?

Boa noite, walter, e bem-vindo ao fórum
If Not IsNull(DLookup("[DATA DA AUDIÊNCIA]", "TABREGISTRO", "[DATA DA AUDIÊNCIA]=#" & Me.DATAAUD & "#" AND [HORÁRIO]=#" & Me.HORARIO & "#")) Then

Boa tarde, Alexandre.
Testei a função como vc passou e deu o mesmo erro (Erro em tempo de execução 13 - tipos incompatíveis).

Private Sub HORARIO_BeforeUpdate(Cancel As Integer)
If Not IsNull(DLookup("[DATA DA AUDIÊNCIA]", "TABREGISTRO", "[DATA DA AUDIÊNCIA]=#" & Me.DATAAUD & "#" AND [HORÁRIO]=#" & Me.HORARIO & "#")) Then
Cancel = True
MsgBox "Já existe Audiência marcada para este mesmo dia e horário.", vbCritical
Me.HORARIO.Undo
Else
Exit Sub
End If
End Sub

If Not IsNull(DLookup("[DATA DA AUDIÊNCIA]", "TABREGISTRO", "[DATA DA AUDIÊNCIA]=#" & Me.DATAAUD & "# AND [HORÁRIO]=#" & Me.HORARIO & "#")) Then

Testei com essa outra sintaxe, não deu o erro, porém não fez a filtragem e deixou passar a duplicidade.

If Len(DLookup("[DATA DA AUDIÊNCIA]", "TABREGISTRO", "[DATA DA AUDIÊNCIA]=#" & Me.DATAAUD & "# AND [HORÁRIO]=#" & Me.HORARIO & "#")&""=0 Then

Com o uso do If Len, agora o formulário não aceita nenhuma marcação de hora, ou seja, não importa qual horário eu coloque, ele dá a msg de que já existe audi~encia marcada.

Devia ser assim
If Len(DLookup("[DATA DA AUDIÊNCIA]", "TABREGISTRO", "[DATA DA AUDIÊNCIA]=#" & Me.DATAAUD & "# AND [HORÁRIO]=#" & Me.HORARIO & "#") & "" > 0 Then

Continua não aceitando nenhuma marcação de hora. Me parece que faltou um parenteses ali no final da instrução, para fechar o Dlookup - estava dando erro de sintaxe aqui, coloquei depois do "0" final. POde ser isso?

Se não for pedir demais, estou mandando o BD para vc dar uma olhada...

Não tenho tempo para verificar mas colocou o código no acontecimento AntesDeActualizar quando deve ser DepoisDeActualizar!!!

TEstei aqui agora e o erro acontece independentemente do evento associado.

Boa tarde,
Devia ser a melhor prática em nomenclaturas
Veja se é isto

Acabei de testar. Mesma coisa. Não impede a duplicidade de registros. Agradeço a sua ajuda, mas acho que esta função não dá certo aqui...

Testou com que data e hora?

Com todas as constantes da tabela TABREGISTRO, para ver se detetava a duplicidade.

Testei com 28/08/2013 17h30m00ss e não aceita

Realmente, parece que o problema estava ocorrendo com a tabela que eu estava usando. Apaguei a tabela do BD e importei a mesma de um backup da semana passada e aparentemente resolveu o problema. Vou fazer uns mil e tantos testes aqui pra ver como a função se comporta.
Agradeço muito a sua ajuda Alexandre. Quem sabe daqui a um tempo eu estou no seu nível e possa ajudar algum novato também.
De novo, Muito Obrigado! Você foi muito paciente comigo, valeu!