[Resolvido] Como alterar as mensagens de aviso?

Tenho um botão que chama uma macro, ao clicar executa uma consulta.

Recebo dois avisos.

Recebo a mensagem de aviso da macro quando executa a consulta:

1º aviso
........."Optou por executar uma consulta Acrescentar que irá modificar dados em sua tabela.
.........Tem a certeza...?
.........Sim | Não | Ajuda"

2º aviso
........."Optou por acrescentar 1 linha(s).
.........Depois de clicar em Sim, não será possível utilizar o comando Anular...
.........Sim | Não"

Como controlar os avisos que recebo?

Como deixar de ver o 1º aviso mas receber a confirmação do 2º aviso?

ola bom dia tente assim:

No Click de um botão
On Error Resume Next
If MsgBox("aqui você coloca a mensagem ? ", vbYesNo + vbQuestion, "Aviso") = vbYes Then
DoCmd.SetWarnings False' este desliga a mensagem que vc queria
'aqui você coloca a consulta ou o que você quiser executar

Exit Sub
DoCmd.SetWarnings true
Else
Exit Sub
End If
Exit Sub

abraço

Obrigado Marcelo.

Está a funcionar.

Mas há 2 questões...

1 - Os avisos ficam desligados!

"DoCmd.SetWarnings true" parece que não volta ao estado original.

2 - O botão que estou a usar é um botão de alternar (ligar/desligar) que está ligado a um campo sim/não.

Quando escolho "não", não executar a ação o botão fica num estado ativo. Queria que ficasse num estado inativo, o campo ligado ficasse "não"!

[img][/img]

boa tarde eu ainda não havia usado este botão mais estava fazendo o teste aqui mais me parece que seria assim mesmo quando eu clico em sim ele fica com uma cor mais escura ele esta desativado e em não ele fica mais claro .

se voce quiser mandar seu bd pra eu dar uma olhada

aguardo

Marcelo, aqui está a bd, em Access 2016. Não deixa converter para outro formato.

Talvez se possa usar outro botão, mas que esteja ligado ao campo sim/não "tbFlxSelectPg"

boa noite Ad-minister tenta assim:vai na propriedade do botão na guia "Dados" muda estado triplo para "sim"

aguardo

Não, não funciona.

O formulário que é chamado é baseado numa consulta para o estado "sim" e neste caso com estado triplo o form aparece vazio!

ola caro amigo você esta mudando estado triplo somente no botão ne eu fiz o teste aqui ficou igual esta primeira imagem


abraço

Ao testar apercebi-me que talvez tenha de refazer o processo de recibos.

Fecho por agora o problema...

Grato pela ajuda Marcelo.

ola boa tarde dê uma olhada aqui no meu sistema veja em frm_pesquisa_parcela talvez da pra vc adaptar nesse seu

usuário: administrador
senha :123

para entrar no código fonte pressione a tecla shifit com a tecla pressionada abra o sistema e veja talvez te atenda

Obrigado Marcelo.

O meu sistema é Windows 10 64b

Dá-me este erro ao abrir a bd:





Abri um novo tópico para perceber como implementar o sistema de recibos
aqui - MaximoAccess>OutrosProjetos em Desenvolvimento>omo implementar recibos num sistema em uso?