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]Busca com Data Inicial e Final

    samuelbpereira
    samuelbpereira
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 38
    Registrado : 06/11/2011

    [Resolvido]Busca com Data Inicial e Final Empty Busca com Data Inicial e Final

    Mensagem  samuelbpereira 10/11/2011, 14:37

    Olá pessoal,

    Estou dificuldade de criar uma busca com data inicial e final.

    Gostaria do seguinte, no meu form ter um botão com o nome BUSCA e ao clicar abre um popup e quando insiro as datas, o relatório abre com o período informado.

    Já tentei e não consegui, teria como alguem anexar aqui um banco só com essa função ? Pois eu vendo a estrutura, tento fazer no meu BD olhando o exemplo.

    Desde já agradeço.
    Abraço a todos.
    JPaulo
    JPaulo
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

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

    [Resolvido]Busca com Data Inicial e Final Empty Re: [Resolvido]Busca com Data Inicial e Final

    Mensagem  JPaulo 10/11/2011, 14:45

    Samuel utilize a busca do fórum por favor.

    Existem 42.000 topicos, né.

    http://maximoaccess.forumeiros.com/t95-form-filtra-consulta-de-referencia-cruzada


    .................................................................................
    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]Busca com Data Inicial e Final Folder_announce_new Utilize o Sistema de Busca do Fórum...
    [Resolvido]Busca com Data Inicial e Final Folder_announce_new 102 Códigos VBA Gratuitos...
    [Resolvido]Busca com Data Inicial e Final Folder_announce_new Instruções SQL como utilizar...
    samuelbpereira
    samuelbpereira
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 38
    Registrado : 06/11/2011

    [Resolvido]Busca com Data Inicial e Final Empty Re: [Resolvido]Busca com Data Inicial e Final

    Mensagem  samuelbpereira 10/11/2011, 21:25

    JPaulo,

    Me desculpe, da proxima vez vou fazer uma busca mais detalhada.
    Mas o link que vc mandou e que tinha o exemplo foi ótimo.

    Deu certinho, já esta funcinando no meu BD.

    Obrigado mais uma vez.


    Última edição por samuelbpereira em 10/11/2011, 22:17, editado 1 vez(es)
    samuelbpereira
    samuelbpereira
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 38
    Registrado : 06/11/2011

    [Resolvido]Busca com Data Inicial e Final Empty Re: [Resolvido]Busca com Data Inicial e Final

    Mensagem  samuelbpereira 10/11/2011, 22:08

    JPaulo, esqueci de uma coisa, procurei aqui mas não achei.

    Na hora que clico no botão BUSCAR ele abre a consulta, como eu edito esse codigo para ele buscar a informação na consulta mas abrir um relatório em formato dialogo sem que a consulta apareça. Até consegui fazer no modo de edição que o Relatório apareca, mas quando entro mesmo no BD e clico para buscar o relatório não aparece.

    Obs: quando entro na O.S. o form abre em uma janela de dialogo e dentro desse mesmo form o botão de busca tmb é um form em janela diálogo, isso pode estar interferindo para abrir o relatório ?

    Option Compare Database

    Private Sub Command2_Click()
    On Error Resume Next

    Dim stDocName As String

    stDocName = "buscaros"
    DoCmd.OpenQuery stDocName, acNormal, acEdit
    End Sub


    Obrigado.
    JPaulo
    JPaulo
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

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

    [Resolvido]Busca com Data Inicial e Final Empty Re: [Resolvido]Busca com Data Inicial e Final

    Mensagem  JPaulo 11/11/2011, 10:44

    Veja o simples;

    http://dl.dropbox.com/u/771097/FormFiltraReport.rar


    .................................................................................
    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]Busca com Data Inicial e Final Folder_announce_new Utilize o Sistema de Busca do Fórum...
    [Resolvido]Busca com Data Inicial e Final Folder_announce_new 102 Códigos VBA Gratuitos...
    [Resolvido]Busca com Data Inicial e Final Folder_announce_new Instruções SQL como utilizar...
    samuelbpereira
    samuelbpereira
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 38
    Registrado : 06/11/2011

    [Resolvido]Busca com Data Inicial e Final Empty Re: [Resolvido]Busca com Data Inicial e Final

    Mensagem  samuelbpereira 11/11/2011, 11:43

    JPaulo,

    Ontem fiquei até tarde tentando, cheguei ate a colocar o codigo igual esse ultimo que vc mandou e nada. Tentei o seu aqui e nada tmb. O que acontece, quando eu testo no modo de edição do Access, o relatório abre, mas quando eu entro no BD eu clico e não acontece nada.

    Veja por favor o link
    youtube.com/watch?v=VzIZ3Lq3ApE

    Abraços
    JPaulo
    JPaulo
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

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

    [Resolvido]Busca com Data Inicial e Final Empty Re: [Resolvido]Busca com Data Inicial e Final

    Mensagem  JPaulo 11/11/2011, 12:43

    Primeiramente você ainda não tinha informado a versão do seu Access, agora vi, mas nas regras deste fórum está bem explicito e em alguns códigos isso tem muita influência.

    Para isso funfar, você tem de colocar o relatório com propriedades popup=sim e janela restrita=sim



    .................................................................................
    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]Busca com Data Inicial e Final Folder_announce_new Utilize o Sistema de Busca do Fórum...
    [Resolvido]Busca com Data Inicial e Final Folder_announce_new 102 Códigos VBA Gratuitos...
    [Resolvido]Busca com Data Inicial e Final Folder_announce_new Instruções SQL como utilizar...
    samuelbpereira
    samuelbpereira
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 38
    Registrado : 06/11/2011

    [Resolvido]Busca com Data Inicial e Final Empty Re: [Resolvido]Busca com Data Inicial e Final

    Mensagem  samuelbpereira 11/11/2011, 12:57

    Eu fiz já tinha feito isso JPaulo, mas continua não abrindo o relatório.
    Não sei mais o que fazer !
    JPaulo
    JPaulo
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

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

    [Resolvido]Busca com Data Inicial e Final Empty Re: [Resolvido]Busca com Data Inicial e Final

    Mensagem  JPaulo 11/11/2011, 13:24

    Vá testando, começando por colocar a janela restrita=No, no form das datas, deixando apenas popup=sim

    Vá tirando uns e colocando outros, mas apenas mexa nestes dois parametros (popup e janela restrita), o problema está ae.


    .................................................................................
    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]Busca com Data Inicial e Final Folder_announce_new Utilize o Sistema de Busca do Fórum...
    [Resolvido]Busca com Data Inicial e Final Folder_announce_new 102 Códigos VBA Gratuitos...
    [Resolvido]Busca com Data Inicial e Final Folder_announce_new Instruções SQL como utilizar...
    samuelbpereira
    samuelbpereira
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 38
    Registrado : 06/11/2011

    [Resolvido]Busca com Data Inicial e Final Empty Re: [Resolvido]Busca com Data Inicial e Final

    Mensagem  samuelbpereira 11/11/2011, 13:31

    Fiz aqui e nada, mudei as conf. no form data, mudei as conf. no relatorio e o botão buscar abre o relatorio somente quando estou no modo de edição do Access.

    Existe alguma restrição no Access que ele impede de abrir mais de duas janela popup no modo dialogo ?

    JPaulo
    JPaulo
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

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

    [Resolvido]Busca com Data Inicial e Final Empty Re: [Resolvido]Busca com Data Inicial e Final

    Mensagem  JPaulo 11/11/2011, 13:41

    Delete do código o On Error Resume Next e teste para se ver se devolve algum erro.

    No Relatorio a mesma coisa, mas delete todo o codigo.



    .................................................................................
    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]Busca com Data Inicial e Final Folder_announce_new Utilize o Sistema de Busca do Fórum...
    [Resolvido]Busca com Data Inicial e Final Folder_announce_new 102 Códigos VBA Gratuitos...
    [Resolvido]Busca com Data Inicial e Final Folder_announce_new Instruções SQL como utilizar...
    samuelbpereira
    samuelbpereira
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 38
    Registrado : 06/11/2011

    [Resolvido]Busca com Data Inicial e Final Empty Re: [Resolvido]Busca com Data Inicial e Final

    Mensagem  samuelbpereira 11/11/2011, 14:03

    Deletei o codigo On Error Resume Next e a mesma coisa, quando clico no botão nada acontece, não apareceu nenhum erro.

    Você pode me ajudar pelo Team Viewer ? samuelbpereira

    Abraços
    JPaulo
    JPaulo
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

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

    [Resolvido]Busca com Data Inicial e Final Empty Re: [Resolvido]Busca com Data Inicial e Final

    Mensagem  JPaulo 11/11/2011, 14:22

    Gostaria, mas aqui no trabalho não é permitido não.

    O seu relatório tem algum código no VBA ?

    Aparentemente é o simples, fazer esse relatorio aparecer, basta ele estar com popup=Sim e janle restrita=Sim


    .................................................................................
    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]Busca com Data Inicial e Final Folder_announce_new Utilize o Sistema de Busca do Fórum...
    [Resolvido]Busca com Data Inicial e Final Folder_announce_new 102 Códigos VBA Gratuitos...
    [Resolvido]Busca com Data Inicial e Final Folder_announce_new Instruções SQL como utilizar...
    samuelbpereira
    samuelbpereira
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 38
    Registrado : 06/11/2011

    [Resolvido]Busca com Data Inicial e Final Empty Re: [Resolvido]Busca com Data Inicial e Final

    Mensagem  samuelbpereira 11/11/2011, 18:33

    No relatório não tem nenhum VBA e mesmo colocando popu-sim e restrita-sim ele não abriu de jeito nenhum, ele só abre quando estou no modo de edição.

    Mas, quando nada esta dando certo, volte ao inicio e tente novamente.
    Deletei a consulta e o relatorio, fiz de novo e funcionou extamente como queria, só mudei para acViewReport para poder ver a janela do relatório antes de imprimir.

    Valew pela ajuda e até a proxima.
    samuelbpereira
    samuelbpereira
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 38
    Registrado : 06/11/2011

    [Resolvido]Busca com Data Inicial e Final Empty Re: [Resolvido]Busca com Data Inicial e Final

    Mensagem  samuelbpereira 11/11/2011, 23:25

    Resolvido

    Conteúdo patrocinado


    [Resolvido]Busca com Data Inicial e Final Empty Re: [Resolvido]Busca com Data Inicial e Final

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 2/5/2024, 07:39