Boa tarde pessoal estou com dificuldades para verificar se o registro codProduto já existe na tabela.
Alguém da um uma ajuda?
foto da tabela
Brigado
Alguém da um uma ajuda?
foto da tabela
Brigado
If (Not IsNull(DLookup("[EAN]", "Produtos", ("[EAN] ='" & Me.EAN & "'")))) Then
MsgBox "O código " & EAN & " já é cadastrado.", vbInformation, "SIG v1.0 (Gerencial)"
Cancel = True
Me.EAN.Undo
End If