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


3 participantes

    [Resolvido]Código para referenciar duas datas.

    OLDRIVG
    OLDRIVG
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 374
    Registrado : 20/07/2010

    [Resolvido]Código para referenciar duas datas. Empty [Resolvido]Código para referenciar duas datas.

    Mensagem  OLDRIVG 7/12/2018, 11:36

    Prezados, bom dia.

    Qual o código para criar uma condição em um campo Data na qual o usuário somente poderá digitar uma data entre 01012013 e a data atual.

    Tentei com o código
    Me.DataRecebimento1 >= #01/01/2013# And Me.DataRecebimento1 <= Date, mas não funcionou, deu erro de compilação.

    Se alguém tiver alguma sugestão, agradeço.
    avatar
    thiagonsilvaa
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 384
    Registrado : 12/01/2017

    [Resolvido]Código para referenciar duas datas. Empty Re: [Resolvido]Código para referenciar duas datas.

    Mensagem  thiagonsilvaa 7/12/2018, 11:46

    Bom dia !
    Uma dica seria criar um campo texto no qual informará a data e no evento "antes de atualizar" inserir o código:
    Código:
    If campotexto.Value < #1/1/2013# Then
        MsgBox "Erro, a data não pode ser menor que 01/01/2013"
        DoCmd.CancelEvent
        Exit Sub
             else
        msgbox "A data está de acordo !"
    End If

    Teste e retorne.
    Abraços.
    DamascenoJr.
    DamascenoJr.
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3845
    Registrado : 22/11/2016

    [Resolvido]Código para referenciar duas datas. Empty Re: [Resolvido]Código para referenciar duas datas.

    Mensagem  DamascenoJr. 7/12/2018, 11:53

    Uma alternativa seria usar a regra de validação do campo, que fica na guia dados da folha de propriedades do mesmo. Copie e cole nele
    Código:
    >=#01/01/2013# E <=Data()

    E bem abaixo, texto de validação, coloque a mensagem a ser exibida caso a data informada não esteja dentro do intervalo de validação
    OLDRIVG
    OLDRIVG
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 374
    Registrado : 20/07/2010

    [Resolvido]Código para referenciar duas datas. Empty Re: [Resolvido]Código para referenciar duas datas.

    Mensagem  OLDRIVG 7/12/2018, 12:38

    Bom dia, senhores.


    ThiagoSilvaa, obrigado pela a atenção e ajuda. Funcionou. Fiz da forma abaixo:


    If Me.DataDocumento.value >= #1/1/2013# And Me.DataDocumento.value <= Date Then


    IvanJr.

    Agradeço-lhe, também, pela a atenção e a ajuda. A sua sugestão (a qual somente visualizei quando estava a responder este tópico) também funcionou. É bom termos opções de escolha.

    Agradecido a ambos.
    avatar
    thiagonsilvaa
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 384
    Registrado : 12/01/2017

    [Resolvido]Código para referenciar duas datas. Empty Re: [Resolvido]Código para referenciar duas datas.

    Mensagem  thiagonsilvaa 7/12/2018, 12:57

    O fórum agradece pelo retorno !
    Abraços.

    Conteúdo patrocinado


    [Resolvido]Código para referenciar duas datas. Empty Re: [Resolvido]Código para referenciar duas datas.

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 28/3/2024, 18:12