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]Ao clicar no botão novo salva dados na tabela

    Compartilhe

    IsmaelSilva
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 188
    Registrado : 11/12/2017

    [Resolvido]Ao clicar no botão novo salva dados na tabela

    Mensagem  IsmaelSilva em Qua 18 Abr 2018, 20:50

    Amigos, mais uma dúvida aqui.

    No meu formulário criei um botão novo, porém inseri alguns comandos do tipo, se tem algum dado nas caixas de texto, limpa tudo e coloca o foco em um determinado campo, até aí funciona certo, mas o problema é que ao fazer essa rotina ao limpar as caixas de texto, acaba salvando na tabela, os campos que são calculados, ou seja, salva os zeros na minha tabela, como se fosse um novo registro, e salva também a data, pois em uma das caixas eu coloquei como valor padrão a data atual, para que eu não tenha que ficar informando a cada novo lançamento.

    Se alguém tiver uma dica, agradeço!




    akk_pain
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 9
    Registrado : 27/11/2017

    Re: [Resolvido]Ao clicar no botão novo salva dados na tabela

    Mensagem  akk_pain em Qui 19 Abr 2018, 00:00

    Boa noite,

    Imagino que você tenha feito algo como nomedocontrole.value="", no entanto o ideal é usar:
    Macro:
    ExecutarComandodeMenu
    Comando DesfazerRegistro

    VBA: DoCmd.RunCommand acCmdUndo

    IsmaelSilva
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 188
    Registrado : 11/12/2017

    Re: [Resolvido]Ao clicar no botão novo salva dados na tabela

    Mensagem  IsmaelSilva em Qui 19 Abr 2018, 00:41


    Ricardo

    Obrigado pela sugestão, apenas com o comando Me.Undo, eu consegui resolver. cheers

      Data/hora atual: Qua 23 Maio 2018, 02:26