Olá pessoal, boa noite!
Estou usando o evento abaixo para verificar duplicidade através de uma chave no momento do registro e tenho um campo "status" que pode ser (Liberado, Devolvido, Recusado e Reentrega). Porém preciso que seja permitido lançar novamente somente as chaves que estejam com o status "devolvido", sendo que os demais continuam com o bloqueado.
Fiz alguns testes de acordo com alguns exemplos, mas não consegui, vocês possuem alguma dica?
If (Not IsNull(DLookup("[Chave]", "tblentrada", _
"[Chave] ='" & Me!Chave & "'"))) Then
MsgBox "Chave de Acesso já consta registrada. " & Chave.Text, _
vbInformation, "Duplicidade no lançamento"
Cancel = True 'cancela o evento.
Me!Chave.Undo 'desfaz a digitação.
End If
Estou usando o evento abaixo para verificar duplicidade através de uma chave no momento do registro e tenho um campo "status" que pode ser (Liberado, Devolvido, Recusado e Reentrega). Porém preciso que seja permitido lançar novamente somente as chaves que estejam com o status "devolvido", sendo que os demais continuam com o bloqueado.
Fiz alguns testes de acordo com alguns exemplos, mas não consegui, vocês possuem alguma dica?
If (Not IsNull(DLookup("[Chave]", "tblentrada", _
"[Chave] ='" & Me!Chave & "'"))) Then
MsgBox "Chave de Acesso já consta registrada. " & Chave.Text, _
vbInformation, "Duplicidade no lançamento"
Cancel = True 'cancela o evento.
Me!Chave.Undo 'desfaz a digitação.
End If