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

    Exibir no relatorio data inicial e final de consulta parametrizada

    avatar
    leorjsantos
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 6
    Registrado : 14/10/2011

    Exibir no relatorio data inicial e final de consulta parametrizada Empty Exibir no relatorio data inicial e final de consulta parametrizada

    Mensagem  leorjsantos 24/1/2014, 13:27

    Prezados bom dia,

    Tenho um relatorio que e baseado em uma tabela, e gostaria que neste relatorio aparecesse a data inicial e final de uma consulta que criação de tabela!!

    Ja tentei de tudo mais não consegui!!!




    obrigado
    criquio
    criquio
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 11229
    Registrado : 30/12/2009

    Exibir no relatorio data inicial e final de consulta parametrizada Empty Re: Exibir no relatorio data inicial e final de consulta parametrizada

    Mensagem  criquio 24/1/2014, 13:35

    O mais prático seria substituir os parâmetros por campos de um formulário. Acredito que esteja abrindo o relatório com parâmetros do tipo ENTRE [Digite a data inicial] E [Digite a data final], certo? Eu colocaria dois campos em um formulário para digitar a data e um botão para abrir o relatório. Vamos supor o formulário de nome frmFiltrar com os campos txtDataInicial e txtDataFinal. No lugar do parâmetro, colocaria:

    Código:
    ENTRE Forms!frmFiltro!txtDataInicial E Forms!frmFiltro!txtDataFinal

    E nos campos do relatório aonde quer que apareça essas datas, basta passar os campos do formulário:

    Código:
    = "Período: " & Forms!frmFiltro!txtDataInicial & " à " & Forms!frmFiltro!txtDataFinal


    .................................................................................
    Meu novo site: www.vcssistemas.com.br

    Clique aqui e veja um vídeo que explica como fazer pesquisas no forum.


    DICA: Quando precisar inserir um exemplo do seu aplicativo, siga os procedimentos abaixo:
    1 - faça uma cópia do aplicativo
    2 - retire tudo que não for necessário à solução do problema, exceto o que o aplicativo precisar para funcionar
    3 - use o Compactar/Reparar
    4 - compacte o aplicativo em zip ou rar (zip para postagem como anexo na mensagem)


    Agradeça a quem lhe ajudou, clicando no joinha de uma das mensagens do usuário.
    Positive as mensagens que achar útil, no canto superior direito delas.

    avatar
    leorjsantos
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 6
    Registrado : 14/10/2011

    Exibir no relatorio data inicial e final de consulta parametrizada Empty Re: Exibir no relatorio data inicial e final de consulta parametrizada

    Mensagem  leorjsantos 24/1/2014, 16:42

    Vou testar aqui!!!


    Obrigado
    Avelino Sampaio
    Avelino Sampaio
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3883
    Registrado : 04/04/2010

    Exibir no relatorio data inicial e final de consulta parametrizada Empty Re: Exibir no relatorio data inicial e final de consulta parametrizada

    Mensagem  Avelino Sampaio 26/1/2014, 12:37

    Olá!

    Uma outra alternativa é usar um pouco de programação no relatório. Use o evento "Ao carregar"

    Private Sub Report_Load()
    Dim rs As DAO.Recordset
    Dim df As Date
    Dim di As Date
    Set rs = CurrentDb.OpenRecordset(Me.RecordSource, 4, 4)
    rs.MoveFirst: di = rs!NomeCampoData
    rs.MoveLast: df = rs!NomeCampoData
    Me!CampoDoRelatório = "Entre " & di & " e " & df
    Set rs = Nothing
    End Sub


    Considerando que a consulta, origem do relatório, esteja ordenada de forma crescente pelo campo data.

    Bom estudo!




    .................................................................................
    Vídeos, livros, kit MontaRibbons e acesso vitalício ao site UsandoAcces  
    Clique AQUI e analise o custo beneficio do material oferecido.

    Conteúdo patrocinado


    Exibir no relatorio data inicial e final de consulta parametrizada Empty Re: Exibir no relatorio data inicial e final de consulta parametrizada

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 8/5/2024, 04:14