[Resolvido]Erro botão Excluir

Olá Pessoal, estou tendo problemas com o botão de excluir do Form, no evento, criei um script com MsgBox que no momento em que eu clico no botão excluir, retorna a mensagem informando se, desejo excluir o registro, quando clico em sim, abre a tela padrão do Access, perguntando se tenho certeza da exclusão, se novamente eu clicar em sim, ele exclui o registro normalmente, porém se clico em não na segunda tela, ele da erro, estou postando link abaixo do banco, para melhor visualização, desde já agradeço.


https://drive.google.com/file/d/0ByOnIRK3_8Brb0JrQ1lSSkxwUUU/view?usp=sharing

Meu amigo, testei aqui e nao vi em qual formulario apresenta a mensagem... mas Deve resolver com essas duas linhas:

If MsgBox("Deseja excluir a HQ " & HQ & "?", _
             vbQuestion + vbYesNo, "Excluir HQ") = vbYes Then
    DoCmd.SetWarnings False
   DoCmd.RunCommand acCmdSelectRecord
   DoCmd.RunCommand acCmdDeleteRecord
      Refresh
      DoCmd.SetWarnings True
     
   
 End If


DoCmd.SetWarnings False Desativa aquela mensagem Do access Avisando que esta prestes a excluir um registro e tal...

Amigo,

Testei aqui e não observei nenhum erro ...

Mude o seu código:

Código:

If MsgBox("Deseja excluir a HQ " & HQ & "?", vbQuestion + vbYesNo, "Excluir HQ") = vbYes Then
    DoCmd.SetWarnings False
    DoCmd.RunCommand acCmdDeleteRecord
    DoCmd.SetWarnings True
    Recalc
End If

Show de Bola Fabião, como sempre me ajudando, muito obrigado pela ajuda e, também quero agradecer ao Uilson Brasil pela disponibilidade na ajuda do código, valeu pessoal por aumentar meu conhecimento no Access, que Deus continue abençoando grandemente a vocês e, suas famílias.

O erro que estava dando era quando clicava em Sim na primeira mensagem (MsgBox criado) e, depois em Não (Mensagem do Access) aí retornava o erro " A ação Runcommand foi cancelada" aí quando depurava, selecionava a linha: DoCmd.RunCommand acCmdDeleteRecord, mas agora está rodando certinho, eu até acho bom confirmar duas vezes a mensagem de exclusão, pois evita o cancelamento sem querer hehe, porém dava aquele erro; valeu pessoal.