[Resolvido]Criar MsgBox para registro duplicado

Galera boa noite!

Preciso da ajuda de vocês para o seguinte problema:

Tenho uma tabela onde registro todos os chamados diários da minha empresa, e estou tendo sérios problemas com chamados duplicados, gostaria de saber como criar um alerta de chamado duplicado se no mesmo dia um determinado cliente chamar mais de uma vez.

O nome da tabela é chamados, e pode ser feito pelo campo cliente, assim se no mesmo dia o cliente ligar mais de uma vez o access alerta da duplicidade

Já tentou utilizar o DCount ou o DLookup? Temos vários tópicos sobre, com diversas formas para diversos fins. Dê uma pesquisada para ver se encontra conforme precisa.

Olá boa noite, obrigado pela atenção!
Eu ainda não conheço muito módulos poderia me ajudar como fazer?

Dê uma pesquisada conforme mencionei na mensagem anterior. Vai ser melhor porque você vê as diferentes formas de se usar essas instruções e a que melhor se adaptar.

Boa tarde!
Fiz uma pesquisa e notei qua a DCount serve para contagens de registro não vi relação de como utiliza - la agora talvez a DLookup funcione melhor mais como não conheço bem as funções não consigo escrever este código.
Veja os links que pesquisei:
DCount

DLookup

Ambos podem ser utilizados. Com o DCount, você vai contar os registros que contenham um determinado dado. No seu caso, acredito que você tenha um campo aonde tem a data do chamado e tambem a ID da pessoa que chamou, certo? Supondo que sim, você pode contar os registros que contenham a mesma data e o mesmo ID da pessoa que chamou:

Código:

If DCount("*", "NomeDaTabela", "CampoDataDaTabela=#" & Format(CampoDataDoFormulário, "mm/dd/yyyy") & "#" And CampoIDDaTabela=" & CampoIDDoFormulário & "") > 0 Then
    MsgBox "Já existe um chamado para esse cliente", vbInformation + vbOKOnly, "Atenção"
End If

Nesse exemplo, a função DCount avalia os campos da data e da ID da pessoa na tabela e confronte com os do formulário. Se a contagem for maior que 0, envia uma mensagem avisando.

Ola boa tarde!
Sim tenho a tabela é chamados e o campo id é cliente no caso do campo data ta como data mesmo, por gentileza me informe se fica assim?

If DCount("*", "chamados", "cliente=#" & Format(data, "mm/dd/yyyy") & "#" And cliente=" & cliente & "") > 0 Then
MsgBox "Já existe um chamado para esse cliente", vbInformation + vbOKOnly, "Atenção"End If

Se for eu coloco no evento ao atualizar?

No primeiro cliente tem que ser o nome do campo da data na tabela. E o evento é o que melhor atender. Aí você que tem que ver. "Após atualizar" do campo ou "Ao clicar" de um botão...

OK ficou assim então:
If DCount("*", "cliente", "data=#" & Format(data, "mm/dd/yyyy") & "#" And cliente=" & cliente & "")> 0 Then
MsgBox "Já existe um chamado para esse cliente", vbInformation + vbOKOnly, "Atenção"

Porém ao salvar o código ele alega o seguinte:
Erro esperado separador de lista ou )

Ai fazendo um teste colocando no evento após atualizar no campo cliente do formulário nada acontece ao cadastrar o mesmo cliente 2 vezes

Lembrando que na tabela chamados e no formulário id esta como cliente e data.

Tente colocar Me. antes dos nomes dos controles do formulário para que o Access possa entender a diferença entre ambos. uma vez que os campos tem o mesmo nome da tabela. E se código for tipo texto, precisa tambem adicionar aspas simples no critério:

If DCount("*", "chamados", "data=#" & Format(Me.data, "mm/dd/yyyy") & "#" And cliente='" & Me.cliente & "'") > 0 Then

Ainda da erro posso postar o bd para dar uma olhada?
Ainda ta acusando erro de compilação, eu tenho uma listbox vinculada a uma tabela de cadastro de clientes onde ela preenche automaticamente os dados do cliente cadastrado, acho que pode ser isso.

Bom dia mestre criquio, e bom dia flasbc, posta o bd!

Bom dia Mestre Criquio e Lupercio agradeço pela atenção.

Postei o BD nele esta postado o problema espero que possam me ajudar
Embora ele esteja como 2003 eu uso o access 2007

Olá bom dia amigo.

Veja se é isso!

Grande Lupércio funcionou direitinho.
Agora é possível deixar o campo fregues como cliente mesmo, pq eu tenho muitas consultas e formulários com o campo cliente.

Aqui eu fiz as alterações mais ai o código não funciona, mesmo assim ja vai quebrar um galhão

Alterei para fregues o nome do campo, pq o seu controle era não acoplado, e ai vc ve a melhor maneira de funcionar, para mudar os outros forms e tabelas para fregues é jogo rápido! Uma humilde opnião, se fosse você eu deixava como eu fiz, porque se não, não funcionará.

Qualquer coisa da um grito que o ajudaremos.
Um abraço!

Sim com certeza, vai ficar como vc fez já ta show de bola

Valeu mesmo ao mestre Criquio também agradeço muito pela atenção, acredito que por falta de conhecimento não consegui entender sua mensagem

Agradecemos o retorno!
O forum agradece!
Lembrando e agradecendo que usei a função confirmar do "Grande e amavel" Norberto!

Um abraço Norberto!