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]Criar filtros de datas - dados importados do Excel

    avatar
    WS_Lima
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 29
    Registrado : 23/01/2018

    [Resolvido]Criar filtros de datas - dados importados do Excel Empty [Resolvido]Criar filtros de datas - dados importados do Excel

    Mensagem  WS_Lima 19/12/2019, 01:29

    Senhores (as), boa noite!

    Preciso de um auxílio, pois não consegui encontrar o erro mesmo pesquisando bastante. rs
    Segue:
    Tenho uma tabela, que preciso importar os dados do Excel, e nestes dados, possui um campo com datas.
    Quando efetuo a importação do campo com formato "data" o Access apresenta erro. Então converti para o formato texto, e assim consigo importar a planilha (Excel). Porém, a partir daí encontrei um problema...

    Mesmo quando executo uma 'Consulta de Atualização' para converter o formato da data, quando utilizo filtros para visualizar a tabela através de uma caixa de 'Caixa de Combinação', ele só reconhece o dia.
    Por exemplo:

    -Se coloco o critério para o período 01/12/2019 até 15/12/2019, ele aparece todos os registros que tiverem datas entre 02 e 15 de qualquer mês e ano.

    Gostaria de restringir a consulta apenas ao período referenciado.

    Seguem anexos para auxílio.

    Desde já, agradeço o apoio.
    Anexos
    [Resolvido]Criar filtros de datas - dados importados do Excel AttachmentfiltroParaDatas.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (950 Kb) Baixado 11 vez(es)
    Alexandre Neves
    Alexandre Neves
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 8449
    Registrado : 05/11/2009

    [Resolvido]Criar filtros de datas - dados importados do Excel Empty Re: [Resolvido]Criar filtros de datas - dados importados do Excel

    Mensagem  Alexandre Neves 19/12/2019, 09:18

    Bom dia
    Na origem da caixa de listagem, coloque
    SELECT [00000000import_Gifs teste].Data_Fiscalizacao, [00000000import_Gifs teste].Nota_Projeto, [00000000import_Gifs teste].N_Gifs, [00000000import_Gifs teste].Tipo, [00000000import_Gifs teste].Estagio, [00000000import_Gifs teste].EPS, [00000000import_Gifs teste].Municipio, [00000000import_Gifs teste].Inconforme, [00000000import_Gifs teste].Ag_Responsavel, [00000000import_Gifs teste].Observacoes, [00000000import_Gifs teste].Data_Envio FROM [00000000import_Gifs teste] WHERE CDate([00000000import_Gifs teste].Data_Fiscalizacao)>=CDate([Formulários]![0000000000000000000000000000]![DataInicial]) And CDate([00000000import_Gifs teste].Data_Fiscalizacao) <=CDate([Formulários]![0000000000000000000000000000]![DataFinal]);


    .................................................................................
    Access 2010. Mande bd que dê para testar (indique a versão). Não peça para fazer o que já tem feito. Dê todos os detalhes.
    Não coloquem entraves como senhas, esconder controlos, etc. Disponibilizem o mais limpo possível
    Só respondo a mensagens privadas, se forem de assunto privado; às outras não respondo.
    Quem trabalha e mata a fome não come o pão de ninguém; mas quem não trabalha e come, come sempre o pão de alguém. António Aleixo
    avatar
    WS_Lima
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 29
    Registrado : 23/01/2018

    [Resolvido]Criar filtros de datas - dados importados do Excel Empty Re: [Resolvido]Criar filtros de datas - dados importados do Excel

    Mensagem  WS_Lima 20/12/2019, 01:39

    Deu certo! Muito obrigado pelo apoio Alexandre, assim como pela celeridade.

    Só mais uma coisa... quando clico para abrir o formulário, ele apresenta uma mensagem de erro. É possível ocultar a mensagem?

    Obs.: quando a mensagem aparece, basta fechá-la que os filtros funcionam perfeitamente.

    Segue mensagem de erro em anexo.
    Anexos
    [Resolvido]Criar filtros de datas - dados importados do Excel Attachmenterro.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (29 Kb) Baixado 0 vez(es)
    Alexandre Neves
    Alexandre Neves
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 8449
    Registrado : 05/11/2009

    [Resolvido]Criar filtros de datas - dados importados do Excel Empty Re: [Resolvido]Criar filtros de datas - dados importados do Excel

    Mensagem  Alexandre Neves 20/12/2019, 20:32

    Boa noite,
    Retire o código da caixa de listagem
    No acontecimento AoAbrir do formulário, coloque
    Código:
    Private Sub Form_Open(Cancel As Integer)
        Lista2.RowSource = "SELECT Data_Fiscalizacao, Nota_Projeto, N_Gifs, Tipo, Estagio, EPS, Municipio, Inconforme, Ag_Responsavel, Observacoes, Data_Envio FROM [00000000import_Gifs teste] WHERE CDate(Data_Fiscalizacao)>=CDate([Formulários]![0000000000000000000000000000]![DataInicial]) And CDate(Data_Fiscalizacao) <=CDate([Formulários]![0000000000000000000000000000]![DataFinal]); "
    End Sub


    .................................................................................
    Access 2010. Mande bd que dê para testar (indique a versão). Não peça para fazer o que já tem feito. Dê todos os detalhes.
    Não coloquem entraves como senhas, esconder controlos, etc. Disponibilizem o mais limpo possível
    Só respondo a mensagens privadas, se forem de assunto privado; às outras não respondo.
    Quem trabalha e mata a fome não come o pão de ninguém; mas quem não trabalha e come, come sempre o pão de alguém. António Aleixo
    avatar
    WS_Lima
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 29
    Registrado : 23/01/2018

    [Resolvido]Criar filtros de datas - dados importados do Excel Empty Re: [Resolvido]Criar filtros de datas - dados importados do Excel

    Mensagem  WS_Lima 20/12/2019, 21:25

    cheers
    Funcionou perfeitamente! Muito obrigado mesmo, Alexandre! Não tenho palavras para agradecer a prestatividade!
    Só tenho a agradecer!
    avatar
    WS_Lima
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 29
    Registrado : 23/01/2018

    [Resolvido]Criar filtros de datas - dados importados do Excel Empty Re: [Resolvido]Criar filtros de datas - dados importados do Excel

    Mensagem  WS_Lima 21/12/2019, 16:03

    Alexandre, boa tarde!
    Desculpe o incômodo, só mais uma coisa:
    No exemplo que você me passou, funcionou perfeitamente, como já havia dito, porém, adaptei o código (conforme abaixo) mas não funcionou... não consegui encontrar onde está o erro...
    Poderia analisar uma vez mais, por gentileza? E se possível, me esclarecer o que houve, pois pretendo repassar estes filtros para outras tabelas.

    Segue código adaptado:

    listaDiaDia.RowSource = “SELECT CODIGO, CARTEIRA, AG_RESPONSAVEL, Equipe, Dia, Data, Escala, EST, PROJETO, TITULO_OBRA, MUNICIPIO, POSTE_AT, POSTE_BT, TOTAL, TIPO_OBRA, LINHA_VIVA, SI_LINHA VIVA, LIDER, DESLIGAMENTO, SI_DESLIG, DATA_DESLIG, INICIO, FIM, OBSERVACOES FROM [tbl_ProgramacaoObras-DiaDia] WHERE CDate(Data)>=CDate([Formulários]![frm_ProgramacaoObras]![DataInicial] And CDate(Data)<=CDate(Formulários]![frm_programacaoObras]![DataFinal]);”

    O modelo adaptado segue anexo. Observe que mesmo quando o período é definido, a lista não se torna visível.
    Alexandre Neves
    Alexandre Neves
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 8449
    Registrado : 05/11/2009

    [Resolvido]Criar filtros de datas - dados importados do Excel Empty Re: [Resolvido]Criar filtros de datas - dados importados do Excel

    Mensagem  Alexandre Neves 26/12/2019, 23:14

    Boa noite
    Acompanhe o fórum e aprenda todas as lições contidas
    Respeite os nomes reservados (Data, Dia, etc), nomeie campos de forma normalizada SiLinhaViva em vez de SI_LINHA VIVA

    Código:
    Private Sub Form_Open(Cancel As Integer)
        listaDiaDia.RowSource = "SELECT CODIGO, CARTEIRA, AG_RESPONSAVEL, Equipe, Dia, Data, Escala, EST, PROJETO, TITULO_OBRA, MUNICIPIO, POSTE_AT, POSTE_BT, TOTAL, TIPO_OBRA, LINHA_VIVA, [SI_LINHA VIVA], LIDER, DESLIGAMENTO, SI_DESLIG, DATA_DESLIG, INICIO, FIM, OBSERVACOES FROM [tbl_ProgramacaoObras-DiaDia] WHERE CDate(Data)>=CDate([Formulários]![frm_ProgramacaoObras]![DataInicial]) And CDate(Data)<=CDate([Formulários]![frm_programacaoObras]![DataFinal]);"
    End Sub


    .................................................................................
    Access 2010. Mande bd que dê para testar (indique a versão). Não peça para fazer o que já tem feito. Dê todos os detalhes.
    Não coloquem entraves como senhas, esconder controlos, etc. Disponibilizem o mais limpo possível
    Só respondo a mensagens privadas, se forem de assunto privado; às outras não respondo.
    Quem trabalha e mata a fome não come o pão de ninguém; mas quem não trabalha e come, come sempre o pão de alguém. António Aleixo
    Alexandre Neves
    Alexandre Neves
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 8449
    Registrado : 05/11/2009

    [Resolvido]Criar filtros de datas - dados importados do Excel Empty Re: [Resolvido]Criar filtros de datas - dados importados do Excel

    Mensagem  Alexandre Neves 26/12/2019, 23:18

    Leia e respeite as regras do fórum
    Eliminei-lhe o tema aberto por si, com conteúdo sobre este tema. Não pode repetir dúvidas


    .................................................................................
    Access 2010. Mande bd que dê para testar (indique a versão). Não peça para fazer o que já tem feito. Dê todos os detalhes.
    Não coloquem entraves como senhas, esconder controlos, etc. Disponibilizem o mais limpo possível
    Só respondo a mensagens privadas, se forem de assunto privado; às outras não respondo.
    Quem trabalha e mata a fome não come o pão de ninguém; mas quem não trabalha e come, come sempre o pão de alguém. António Aleixo
    avatar
    WS_Lima
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 29
    Registrado : 23/01/2018

    [Resolvido]Criar filtros de datas - dados importados do Excel Empty Re: [Resolvido]Criar filtros de datas - dados importados do Excel

    Mensagem  WS_Lima 27/12/2019, 01:25

    Peço desculpas pelo erro, não foi intencional.

    Comparando com o código que me enviou, encontrei onde está o erro. Acabei deixando faltar alguns colchetes e parênteses. Muito obrigado pelo retorno.

    Uma medida paliativa que encontrei, foi abrir o formulário através de outro, que a mensagem já não é exibida. Mesmo com os critérios inseridos na consulta.

    Mas ainda assim, estou optando pela alternativa que você deu. Muito obrigado mesmo!

    Vou seguir sua dica, e criar todas as tabelas sem o uso de espaços ou caracteres especiais.
    avatar
    WS_Lima
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 29
    Registrado : 23/01/2018

    [Resolvido]Criar filtros de datas - dados importados do Excel Empty Re: [Resolvido]Criar filtros de datas - dados importados do Excel

    Mensagem  WS_Lima 30/12/2019, 21:36

    Olá pessoal!

    Eu aqui, mais uma vez...

    Estou com outro campo que tentei aplicar os mesmos critérios de filtro, mas nenhum dos métodos está funcionando... Preciso filtrar o campo DATA_ENERG da consulta na aba Desligamentos.

    Já tentei o método CData (diretamente na consulta, e também no formulário) já tentei através do critério "Entre",já tentei o método ">= e <=" e também tentei a função DataDesligamento: SeImed([DATA_DESLIG] É Negado Nulo;CData(Format([DATA_DESLIG]))) mas nenhum está funcionando...

    Poderiam me ceder mais este auxílio?

    Obs.: quando utilizo o método "Entre" exibe os dados de qualquer mês ou ano. Ex.: Se for inserido o período 01/12/2019 a 31/12/2019 a consulta exibe todos os resultados do mês 10 (apenas na aba Desligamentos - as outras duas já funcionam normalmente).

    Se utilizo o método CData, não exibe nenhum resultado (na aba Desligamentos).

    Já tentei aplicar os mesmos critérios das outras duas abas (Dia-a-Dia e Energização), mas por algum motivo não está funcionando.

    Segue modelo anexo.
    Anexos
    [Resolvido]Criar filtros de datas - dados importados do Excel AttachmentverificarFiltroDatas.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (991 Kb) Baixado 9 vez(es)
    avatar
    WS_Lima
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 29
    Registrado : 23/01/2018

    [Resolvido]Criar filtros de datas - dados importados do Excel Empty Re: [Resolvido]Criar filtros de datas - dados importados do Excel

    Mensagem  WS_Lima 1/2/2020, 21:09

    Senhores, gostaria de compartilhar o que acabei fazendo para resolver a situação.

    Criei uma nova tabela com os campos de de data já formatados como DATA/HORA e através desta nova tabela que coloquei os critérios com filtro de datas. Pois com os campos formatados como "data/hora" a função ENTRE funciona perfeitamente.

    Não é a forma mais técnica de resolver, mas foi o que consegui que deu certo... rsrs

    Conteúdo patrocinado


    [Resolvido]Criar filtros de datas - dados importados do Excel Empty Re: [Resolvido]Criar filtros de datas - dados importados do Excel

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 19/4/2024, 16:13