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

    IIF em campo com data

    Compartilhe

    victorvilar
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 10
    Registrado : 07/12/2017

    IIF em campo com data

    Mensagem  victorvilar em 14/12/2017, 19:30

    Boa tarde,
    estou criando um filtro em um formulário para despesas pagas. Mas gostaria que se o campo da "data inicial" fosse vazio a consulta me mostra-se todos os resultados, e se não, mostra-se apenas os registros com as datas que estão entre os campos.
    Coloquei o seguinte código na consulta:


    Como SeImed(ÉNulo([Formulários]![FrmDespesas]![txtVencIn]);"*";Entre [Formulários]![FrmDespesas]![txtVencIn] E [Formulários]![FrmDespesas]![txtVencFim])

    Esse critério esta em um campo data de nome "Vencimento" onde coloco apenas datas.
    A consulta funciona se eu não colocar nada no campo, mas caso eu coloque a consulta não funciona.
    Como eu poderia estar realizando esse filtro ?

    avatar
    caiosouza
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 309
    Registrado : 05/12/2016

    Re: IIF em campo com data

    Mensagem  caiosouza em 14/12/2017, 19:42

    Teste os dois códigos abaixo e escolha qual se adequada a sua necessidade:

    Como SeImed(ÉNulo([Formulários]![FrmDespesas]![txtVencIn]);ÉNegadoNulo;Entre [Formulários]![FrmDespesas]![txtVencIn] E [Formulários]![FrmDespesas]![txtVencFim])
    Como SeImed(ÉNulo([Formulários]![FrmDespesas]![txtVencIn]);#1/1/1920#;Entre [Formulários]![FrmDespesas]![txtVencIn] E [Formulários]![FrmDespesas]![txtVencFim])


    .................................................................................
    A persistência leva ao sucesso!

    victorvilar
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 10
    Registrado : 07/12/2017

    Re: IIF em campo com data

    Mensagem  victorvilar em 15/12/2017, 10:52

    Bom dia,
    Caio infelizmente nenhuma das opções funcionou, até tentei fazer uma pequena alteração mas tambem nao foi.
    Como SeImed(ÉNulo([Formulários]![FrmDespesas]![txtVencIn]);>#1/1/1920#;Entre [Formulários]![FrmDespesas]![txtVencIn] E [Formulários]![FrmDespesas]![txtVencFim])' tentei colocar um sinal de maior.



    Simplesmente não aparece nada e nem pede  os critérios dos outros campos.
    avatar
    caiosouza
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 309
    Registrado : 05/12/2016

    Re: IIF em campo com data

    Mensagem  caiosouza em 15/12/2017, 11:34

    Teste:

    Código:
    Como SeImed(ÉNulo([Formulários]![FrmDespesas]![txtVencIn]);Entre #1/1/1920# E Data();Entre [Formulários]![FrmDespesas]![txtVencIn] E [Formulários]![FrmDespesas]![txtVencFim])


    .................................................................................
    A persistência leva ao sucesso!

    victorvilar
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 10
    Registrado : 07/12/2017

    Re: IIF em campo com data

    Mensagem  victorvilar em 15/12/2017, 11:58

    Bom caio mais uma vez não funcionou,
    Estou disponibilizando a parte necessário para consulta, caso você tenha tempo de me ajudar.
    Anexos
    Consulta.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (269 Kb) Baixado 4 vez(es)
    avatar
    caiosouza
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 309
    Registrado : 05/12/2016

    Re: IIF em campo com data

    Mensagem  caiosouza em 15/12/2017, 12:00

    Bom dia,

    Favor enviar o arquivo zip no email: [Você precisa estar registrado e conectado para ver este link.]


    .................................................................................
    A persistência leva ao sucesso!

      Data/hora atual: 16/11/2018, 10:15