[Resolvido]Não deixar repetir Dados em campo tabela

Boa tarde Amigos

Estou aqui a tentar algo e não estou a conseguir

No Exemplo que anexo, abre um Form continuo com taxas de IVA.

Clikar em baixo no botão "Nova Taxa" vai abri outro form para inserir um valor (Por exemplo se inserir 23, ou outro valor qualquer diz que já está na tabela mas não está).

A ideia é não deixar repetir valores de "IVA" na tabela.

Obrigado

Ola;

Falta o nome da tabela no DCount, como tem o On Error Resume Next vai para a sua mensagem.

If DCount("iva", "IVA", "iva=" & Me.txtIVA) > 0 Then

A instrução correta e melhorada;

Código:

Private Sub txtIVA_BeforeUpdate(Cancel As Integer)
If DCount("iva", "IVA", "iva=" & Me.txtIVA) > 0 Then
 If MsgBox("A Taxa de Iva " & Me.txtIVA & " inserida já existe na Tabela do IVA ." & vbNewLine & "Deseja voltar a inserir ?", vbOKCancel + vbInformation, "Valor IVA Já Registado") = vbOK Then
    Me.Undo
    Cancel = True
    Else
    DoCmd.Close
 End If
End If
End Sub


Boas amigo JPaulo

Não testou
Obrigado

Olá a todos,

Verifiquei que além do problema da falta do dominio da função o problema parece estar no tipo de dados (pois tem uma virgula)

Acho que se resolve conforme abaixo, utilizando a dica do nosso Mestre JPaulo deste tópico: http://maximoaccess.forumeiros.com/t15448-resolvidofuncao-dcount-com-numero-duplo?highlight=DCount

Código:

If DCount("iva", "IVA", "iva=" & Replace(Me.txtIVA, ",", ".") & "") > 0 Then

Abraço

Obrigado
Teixeira e
JPaulo