Olá,
OBJETIVO: Fórmula que avisa que dados já foi registrado, mas que permita registrar em duplicidade.
No campo "Nome" tem uma fórmula que não permite registro Duplicado.
Como faço para escrever Sem Informação no campo "Nome" quando for necessário. Qual fórmula devo usar?
OBJETIVO: Fórmula que avisa que dados já foi registrado, mas que permita registrar em duplicidade.
No campo "Nome" tem uma fórmula que não permite registro Duplicado.
- Código:
Private Sub Nome_BeforeUpdate(Cancel As Integer)
On Error Resume Next
Dim Busca As String
Dim stLinkCriteria As String
Dim rsc As DAO.Recordset
Busca = Me!Nome.Value
stLinkCriteria = "Nome= '" & Busca & "'"
If DCount("Nome", "Cadastro", stLinkCriteria) > 0 Then
Cancel = True
MsgBox "Atenção" + vbCrLf & Busca & vbCrLf + " já existe.", vbInformation, "Duplicado"
End If
Set rsc = Nothing
End Sub
Como faço para escrever Sem Informação no campo "Nome" quando for necessário. Qual fórmula devo usar?
Última edição por tombr em 17/8/2021, 16:35, editado 2 vez(es)