MaximoAccess

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

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração


Participe do fórum, é rápido e fácil

MaximoAccess

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

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração

MaximoAccess

Gostaria de reagir a esta mensagem? Crie uma conta em poucos cliques ou inicie sessão para continuar.

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


2 participantes

    [Resolvido]Chekbox marcada com Sim/Não alterar campo DataRec - Data atual quando é Sim

    avatar
    JIR
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 139
    Registrado : 28/08/2016

    [Resolvido]Chekbox marcada com Sim/Não alterar campo DataRec - Data atual quando é Sim Empty [Resolvido]Chekbox marcada com Sim/Não alterar campo DataRec - Data atual quando é Sim

    Mensagem  JIR 3/7/2018, 10:41

    Bom Dia,

    tenho um formulário frmContratos e nele uma caixa de verificação sim/não com o nome CT
    queria que ao marcar sim, o campo DataRec passaria à data atual e a mesma data registada na tabela do formulário tbContratos

    fiz assim

    na Origem do controlo DataRec
    =Ise([CT]=Falso;[DataRec];Data())

    acontece que, aparece a data atual no formulário mas não fica registada na tabela e quando a caixa de verificação não está marcada, dá #ERR no formulário

    Alguma luz e seguirei meu caminho

    José Silva
    avatar
    JIR
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 139
    Registrado : 28/08/2016

    [Resolvido]Chekbox marcada com Sim/Não alterar campo DataRec - Data atual quando é Sim Empty Re: [Resolvido]Chekbox marcada com Sim/Não alterar campo DataRec - Data atual quando é Sim

    Mensagem  JIR 3/7/2018, 10:56

    Olá

    tentei de outra forma e já atualiza na tabela, mas quando volto a desmarcar a caixa de verificação, a data mantem no formulário e na tabela, falta só esse pormenor


    Private Sub CT_AfterUpdate()
    Me.DataRec = Date
    End Sub
    Alvaro Teixeira
    Alvaro Teixeira
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 7919
    Registrado : 15/03/2013

    [Resolvido]Chekbox marcada com Sim/Não alterar campo DataRec - Data atual quando é Sim Empty Re: [Resolvido]Chekbox marcada com Sim/Não alterar campo DataRec - Data atual quando é Sim

    Mensagem  Alvaro Teixeira 3/7/2018, 11:32

    Olá, o evento que usa será o mais apropriado.
    E quando clica no Não , pretende colocar outra data ou limpar a data?

    Abraço
    avatar
    JIR
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 139
    Registrado : 28/08/2016

    [Resolvido]Chekbox marcada com Sim/Não alterar campo DataRec - Data atual quando é Sim Empty Re: [Resolvido]Chekbox marcada com Sim/Não alterar campo DataRec - Data atual quando é Sim

    Mensagem  JIR 3/7/2018, 11:39

    Olá

    a ideia seria, Sim coloca a data atual e Não limpar a data


    Atentamente

    José Silva
    Alvaro Teixeira
    Alvaro Teixeira
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 7919
    Registrado : 15/03/2013

    [Resolvido]Chekbox marcada com Sim/Não alterar campo DataRec - Data atual quando é Sim Empty Re: [Resolvido]Chekbox marcada com Sim/Não alterar campo DataRec - Data atual quando é Sim

    Mensagem  Alvaro Teixeira 3/7/2018, 11:51

    Olá José Silva,

    Também pode ser no evento "Ao fazer clique", com o seguinte código:

    Código:
    Private Sub CT_Click()
        If Me.CT = True Then   ' se verdadeiro
            Me.dataRec = Date  ' data atual
        Else                   ' se não verdadeiro
            Me.dataRec = Null  ' limpa
        End If
    End Sub

    Abraço
    avatar
    JIR
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 139
    Registrado : 28/08/2016

    [Resolvido]Chekbox marcada com Sim/Não alterar campo DataRec - Data atual quando é Sim Empty Re: [Resolvido]Chekbox marcada com Sim/Não alterar campo DataRec - Data atual quando é Sim

    Mensagem  JIR 3/7/2018, 12:26

    Olá

    muito obrigado é isto mesmo


    Atentamente

    José Silva
    Alvaro Teixeira
    Alvaro Teixeira
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 7919
    Registrado : 15/03/2013

    [Resolvido]Chekbox marcada com Sim/Não alterar campo DataRec - Data atual quando é Sim Empty Re: [Resolvido]Chekbox marcada com Sim/Não alterar campo DataRec - Data atual quando é Sim

    Mensagem  Alvaro Teixeira 3/7/2018, 13:22

    Olá José Silva,

    Obrigado pelo retorno, o fórum agradece.

    cheers

    Conteúdo patrocinado


    [Resolvido]Chekbox marcada com Sim/Não alterar campo DataRec - Data atual quando é Sim Empty Re: [Resolvido]Chekbox marcada com Sim/Não alterar campo DataRec - Data atual quando é Sim

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 28/4/2024, 14:18