MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

Obrigado

Administração do MaximoAccess

Dicas Ms Access, Exemplos Ms Access, Codigos VBA Ms Access, SQL Ms Access

    [Resolvido]Confirmar alteração do valor de um campo

    Compartilhe

    Chamon Consultoria
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 196
    Registrado : 31/08/2012

    [Resolvido]Confirmar alteração do valor de um campo

    Mensagem  Chamon Consultoria em 23/8/2017, 18:27

    Boa noite!

    Bd em Access 2010.

    O campo "Valor Unitário" está preenchido com um certo valor. Por exemplo R$ 0,30.

    Objetivo: ao alterar o campo "Valor Unitário" para R$ 0,32 ou para qualquer outro valor, seja solicitado a confirmação dessa alteração. Caso a resposta seja "sim" a alteração será feita, caso seja "não", o valor do campo deveria ser o valor original, ou seja, nesse exemplo, manter os R$ 0,30.

    Estou usando o código abaixo, porém, caso a resposta seja "não", ele não desfaz a digitação.
    Como posso resolver isso?

    Desde já agradeço!

    Código:
    Dim sResp
        sResp = MsgBox("Deseja alterar o Valor Unitário?", vbQuestion + vbYesNo)

        If sResp = 7 Then
            DoCmd.CancelEvent
         
            Exit Sub
        End If
    avatar
    Fernando Bueno
    Developer
    Developer

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1873
    Registrado : 12/04/2012

    Re: [Resolvido]Confirmar alteração do valor de um campo

    Mensagem  Fernando Bueno em 23/8/2017, 20:56

    Boa noite;
    Teste para vermos:

    Código:
    Dim sResp
        sResp = MsgBox("Deseja alterar o Valor Unitário?", vbQuestion + vbYesNo)

        If sResp = 7 Then
        Cancel = True
        SendKeys "{esc}"
           
        Exit Sub
        End If


    .................................................................................
    Um abraço
    Fernando Bueno


    O aumento do conhecimento é como uma esfera dilatando-se no espaço
    quanto maior a nossa compreensão,
    maior o nosso contacto com o desconhecido
    [Você precisa estar registrado e conectado para ver esta imagem.]

    Chamon Consultoria
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 196
    Registrado : 31/08/2012

    Re: [Resolvido]Confirmar alteração do valor de um campo

    Mensagem  Chamon Consultoria em 24/8/2017, 06:24

    Fernando Bueno, exatamente isso.

    Muito obrigado!

    Abraço
    avatar
    Fernando Bueno
    Developer
    Developer

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1873
    Registrado : 12/04/2012

    Re: [Resolvido]Confirmar alteração do valor de um campo

    Mensagem  Fernando Bueno em 24/8/2017, 13:15

    Por nada;

    Agradecemos o retorno!


    .................................................................................
    Um abraço
    Fernando Bueno


    O aumento do conhecimento é como uma esfera dilatando-se no espaço
    quanto maior a nossa compreensão,
    maior o nosso contacto com o desconhecido
    [Você precisa estar registrado e conectado para ver esta imagem.]

      Data/hora atual: 20/9/2017, 20:30