[Resolvido]condição if

tenho um formulario de login que no envento ao clicar de um botão btnentrar faz uma verificação

If Me.txtidfuncional.Value = DLookup("[idfuncionalp]", "[tbaprovacao7dpsu]") Or Me.txtidfuncional.Value = DLookup("[idfuncionals]", "[tbaprovacao7dpsu]") _
Or Me.txtidfuncional.Value = DLookup("[idfuncionalp]", "[tbaprovacao8efaz]") Or Me.txtidfuncional.Value = DLookup("[idfuncionals]", "[tbaprovacao8efaz]") _
Or Me.txtidfuncional.Value = DLookup("[idfuncionalp]", "[tbaprovacao3crh]") Or Me.txtidfuncional.Value = DLookup("[idfuncionals]", "[tbaprovacao3crh]") _
Or Me.txtidfuncional.Value = DLookup("[idfuncionalp]", "[tbaprovacao4apg]") Or Me.txtidfuncional.Value = DLookup("[idfuncionals]", "[tbaprovacao4apg]") _
Or Me.txtidfuncional.Value = DLookup("[idfuncionalp]", "[tbaprovacao5cg]") Or Me.txtidfuncional.Value = DLookup("[idfuncionals]", "[tbaprovacao5cg]") _
Or Me.txtidfuncional.Value = DLookup("[idfuncionalp]", "[tbaprovacao6dgaf]") Or Me.txtidfuncional.Value = DLookup("[idfuncionals]", "[tbaprovacao6dgaf]") _
Or Me.txtidfuncional.Value = DLookup("[idfuncionalchefia]", "[tbchefiaimediata]") Or Me.txtidfuncional.Value = DLookup("[idfuncionalsubsec]", "[tbsubsecretario]") Then
DoCmd.Close
DoCmd.OpenForm "frmAprovacao", acNormal
Else
MsgBox "Você não tem permissão para acesso como Aprovador.", vbInformation + vbOKOnly, "Atenção!"
End If

mas mesmo o usuário tendo permissão ele cai no else, dizendo que não tem permissão.
o que estou fazendo de errado

Ivan

Sugiro que vá testando os critérios linha a linha, assim poderá descobrir onde está o erro.
Caso não consiga, coloque a tabela e formulário em questão em anexo, para análise.

[ ]'s

Noob

resolvido, fiz algumas mudanças. Obrigado

Que ótimo !

Boa sorte

Noob