[Resolvido]Não repetir 2 campos em form desvinculado

Bom dia Amigos

Em formulário desvinculado não deixar repetir os campos. " Tipo " e " Ndoc "

Por exemplo .... tenho o Tipo "VD" nº "285" e posso ter o Tipo "PE" também com o nº "285"

Por exemplo .... tenho o Tipo "PE" nº "300" e posso ter o Tipo "VD" também com o nº "300"


Tipo -----> é texto

Ndoc -----> é numero

Estou a usar este código mas não está a resultar, no botão de gravar


If Not IsNull(DLookup("[Tipo]", "TabRecebimentos", "[Tipo] = '" & Me.Tipo & "' And Ndoc = " & Doc & "")) Then
MsgBox "Tipo Já Registada neste Documento", vbInformation, "Aviso"
Me.Undo
End If


Obrigado

Deixo o exemplo


Obrigado

Assis essa verificação está correta e Funcionando: (DLookup("[Tipo]", "TabRecebimentos", "[Tipo] = '" & Me.Tipo & "' And Ndoc = " & Doc & "")) Observe que esta dizendo aqui que tanto o Tipo quando o Ndoc tem que ser iguais "AND" Se nao quer isso, mude para "OR".

Fabio
Obrigado por responder.

Eu queria por:

VD 300 e não deixa, ou

PE  285 e também não deixa.
Aguardo.

Olá Assis, veja na sua tabela TabRecebimentos que não tem um campo chamado Tipo, Na verdade esse campo se chama TipoMov


Mude o Codigo para:

If Not IsNull(DLookup("TipoMov", "TabRecebimentos", "TipoMov = '" & Me.Tipo & "' And Ndoc = " & Doc & "")) Then
MsgBox "Tipo Já Registada neste Documento", vbInformation, "Aviso"
Me.Undo
End If

Faça um Teste!

Fabio
Estou no telemóvel .... depois retorno.

Obrigado

Obrigado Fabio

E desculpe a minha distração

Bacana meu amigo! Que bom que deu certo! Por favor, marque o tópico como resolvido!!! Até a próxima se Deus quiser!

Obrigado Fabio