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]Preencher automático dois campos Data no formulário

    Assis
    Assis
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 4524
    Registrado : 06/11/2009

    [Resolvido]Preencher automático dois campos Data no formulário Empty [Resolvido]Preencher automático dois campos Data no formulário

    Mensagem  Assis 23/11/2021, 17:46

    Boa tarde Amigos

    Tenho um formulário que tem 2 campos data.

    - DataMenu

    - DataMenos

    Ao carregar (Load) insere automático no campo "DataMenu" a data do dia, até aqui sem problemas.

    Queria que o campo "DataMenus" inserisse automático o primeiro dia de dois meses antes ao mês atual.

    Exemplo

    Hoje 23-11-2021 o campo "DataMenos" abria com 01-09-2021

    Amanhã 24-11-2021 o campo "DataMenos" abria com 01-09-2021

    Dia 01-12-2021 o campo "DataMenos" abria com 01-10-2021

    Dia 01-01-2022 o campo "DataMenos" abria com 01-11-2021

    Dia 01-02-2022 o campo "DataMenos" abria com 01-12-2022

    Obrigado


    .................................................................................
    *** Só sei que nada sei ***
    Finformática
    Finformática
    Super Avançado
    Super Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 754
    Registrado : 23/03/2010

    [Resolvido]Preencher automático dois campos Data no formulário Empty Re: [Resolvido]Preencher automático dois campos Data no formulário

    Mensagem  Finformática 23/11/2021, 23:14

    Grande Assis,

    Tente assim: DataSerial(Ano(Data());Mês(Data())-2;1) . Primeiro dia da data de hoje menos dois meses.

    Espero ter ajudado.

    Abraços

    Assis
    Assis
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 4524
    Registrado : 06/11/2009

    [Resolvido]Preencher automático dois campos Data no formulário Empty Re: [Resolvido]Preencher automático dois campos Data no formulário

    Mensagem  Assis 24/11/2021, 09:12

    Bom dia Finformática

    Ajudou a sua dica

    DataSerial(Ano(Data());Mês(Data())-2;1)

    Ficou assim

    Datamenos = Format(DateSerial(Year(Date), Month(Date) - 2, 1), "dd/mm/yyyy")

    Obrigado


    .................................................................................
    *** Só sei que nada sei ***
    Finformática
    Finformática
    Super Avançado
    Super Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 754
    Registrado : 23/03/2010

    [Resolvido]Preencher automático dois campos Data no formulário Empty Re: [Resolvido]Preencher automático dois campos Data no formulário

    Mensagem  Finformática 24/11/2021, 12:13

    Assis, Bom dia!

    Obrigado pelo retorno.

    Abraços

      Data/hora atual: 30/11/2021, 00:02