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]Atualiza campo data conclusão quando checkbox é pressionada

    black_wolf
    black_wolf
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 33
    Registrado : 02/04/2013

    [Resolvido]Atualiza campo data conclusão quando checkbox é pressionada Empty Atualiza campo data conclusão quando checkbox é pressionada

    Mensagem  black_wolf 5/6/2013, 17:39

    Boa tarde pessoal,

    Necessito da vossa ajuda pf no código VBA.

    Quando clico na checkbox "concluido" atualiza o campo "Data conclusão" com a data atual (Now()). O código não gera qualquer erro, mas também não faz o pretendido.

    Private Sub Concluidos_Click()
    Dim Concluido As Boolean
    Dim DataConclusão As Date
    Dim agora As Date
    agora = Now()
    Concluido = Me!Concluido.Value
    DataConclusão = Me!DataConclusão.Value
    If Concluido = 0 Then DataConclusão = agora
    Else
    DataConclusão = ""
    End If
    Requery
    End Sub

    Alguem me pode ajudar pf.
    Obrigado
    JPaulo
    JPaulo
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 10777
    Registrado : 04/11/2009

    [Resolvido]Atualiza campo data conclusão quando checkbox é pressionada Empty Re: [Resolvido]Atualiza campo data conclusão quando checkbox é pressionada

    Mensagem  JPaulo 5/6/2013, 17:46

    Para que é que você necessita dessas variaveis ?

    A checkbox marcada o valor é -1, desmarcada é 0

    Concluidos_Click() é a checkbox ?


    Private Sub Concluidos_Click()
    If Me!Concluido.Value = -1 Then
    Me.DataConclusão.Value = Now()
    Else
    Me.DataConclusão.Value = ""
    End If
    End Sub



    .................................................................................
    Contribua com o maximoaccess nos links abaixo, ajude a melhorar este que é o seu site na NET.

    Pay-Pal R$ Aqui
    Pay-Pal € Aqui

    Ou ainda: Aqui (Novo)

    Sucesso e Bons Estudos
    Success and Good Studies

    [Resolvido]Atualiza campo data conclusão quando checkbox é pressionada Folder_announce_new Utilize o Sistema de Busca do Fórum...
    [Resolvido]Atualiza campo data conclusão quando checkbox é pressionada Folder_announce_new 102 Códigos VBA Gratuitos...
    [Resolvido]Atualiza campo data conclusão quando checkbox é pressionada Folder_announce_new Instruções SQL como utilizar...
    black_wolf
    black_wolf
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 33
    Registrado : 02/04/2013

    [Resolvido]Atualiza campo data conclusão quando checkbox é pressionada Empty Re: [Resolvido]Atualiza campo data conclusão quando checkbox é pressionada

    Mensagem  black_wolf 5/6/2013, 18:05

    Mestre JPaulo

    Eu sou um principiante no VBA é possivel que o enquadramento e sintax não esteja bem.
    Agradeço desde já a sua ajuda.
    Mas respondendo à questão: Concluido é o nome da checkbox. LOL Já vi o erro Smile
    E acertou em cheio no código e no objetivo.

    Muito Obrigado JPAULO.

    JPaulo
    JPaulo
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 10777
    Registrado : 04/11/2009

    [Resolvido]Atualiza campo data conclusão quando checkbox é pressionada Empty Re: [Resolvido]Atualiza campo data conclusão quando checkbox é pressionada

    Mensagem  JPaulo 5/6/2013, 21:07

    Obrigado pelo retorno o forum agradece.


    .................................................................................
    Contribua com o maximoaccess nos links abaixo, ajude a melhorar este que é o seu site na NET.

    Pay-Pal R$ Aqui
    Pay-Pal € Aqui

    Ou ainda: Aqui (Novo)

    Sucesso e Bons Estudos
    Success and Good Studies

    [Resolvido]Atualiza campo data conclusão quando checkbox é pressionada Folder_announce_new Utilize o Sistema de Busca do Fórum...
    [Resolvido]Atualiza campo data conclusão quando checkbox é pressionada Folder_announce_new 102 Códigos VBA Gratuitos...
    [Resolvido]Atualiza campo data conclusão quando checkbox é pressionada Folder_announce_new Instruções SQL como utilizar...

      Data/hora atual: 5/12/2022, 18:42