[Resolvido]Como corrigir Erro em tempo de execução 2501

Amigos, boa noite!!!

Novamente venho pedir socorro a vocês...

Quando eu clico em "Não" na tela de salvar meu formulário, está ocorrendo a mensagem Erro em tempo de execução 2501... alguém pode me ajudar a corrigir isso?

Encaminho alguns prints para demonstrar a ocorrência.

Desde já agradeço o auxílio...

Forte abraço a todos!

Faça o tratamento do erro;

Código:

Private Sub SeuBotão_Click()
'se tiver erro vai direto para o 1
On Error GoTo 1

Seu codigo aqui...

1:
'se o erro for o 2501, pára aqui
If Err.Number = 2501 Then
  Exit Sub
End If
End Sub

Bom dia!!!

Mestre JPaulo, perfeito!!! Muito obrigado!!!

Obrigado pelo retorno o forum agradece.