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


    [Resolvido]Botão de Relatório com Consultas Diferentes

    gumz
    gumz
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 103
    Registrado : 30/07/2011

    [Resolvido]Botão de Relatório com Consultas Diferentes Empty Relatório com Consultas Diferentes

    Mensagem  gumz 7/8/2011, 04:50

    Boa noite a todos!

    Em meu projeto tenho um formulário de filtrar por datas pelo mesmo período - ótimo exemplo enviado pelo caro vieirasoft.

    Adaptei-o às minhas necessidades inserindo mais um par de campos para buscar por número de registro.

    Minha dúvida é a seguinte: Como procedo para utilizar o mesmo relatório com consultas diferentes, já que os critérios mudam?

    avatar
    Convidado
    Convidado


    [Resolvido]Botão de Relatório com Consultas Diferentes Empty Re: [Resolvido]Botão de Relatório com Consultas Diferentes

    Mensagem  Convidado 7/8/2011, 10:06

    Voce poderia carregar o RecordSource do relatório por consultas SQL, cada consulta com o critério que pretende...
    gumz
    gumz
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 103
    Registrado : 30/07/2011

    [Resolvido]Botão de Relatório com Consultas Diferentes Empty Re: [Resolvido]Botão de Relatório com Consultas Diferentes

    Mensagem  gumz 7/8/2011, 17:00

    Harysohn, muito obrigado pela dica - funciona exatamente como eu precisava.

    Como amostra, posto o código que estou usando, prevendo o erro de não haver registro a apresentar:


    Private Sub Comando13_Click()

    If IsNull(Me!Texto7) Then Exit Sub

    DoCmd.OpenReport "rpt_envelopes", acViewDesign, , , acHidden

    Reports!rpt_envelopes.RecordSource = "consulta_por_contrato"
    On Error Resume Next
    If Err = 2501 Then Err.Clear

    DoCmd.Close acReport, "rpt_envelopes", acSaveYes
    DoCmd.OpenReport "rpt_envelopes", acViewPreview

    End Sub


    Saudações e até a próxima!
    avatar
    Convidado
    Convidado


    [Resolvido]Botão de Relatório com Consultas Diferentes Empty Re: [Resolvido]Botão de Relatório com Consultas Diferentes

    Mensagem  Convidado 7/8/2011, 17:25

    O Fórum agradece o retorno.
    Bom trabalho

    Conteúdo patrocinado


    [Resolvido]Botão de Relatório com Consultas Diferentes Empty Re: [Resolvido]Botão de Relatório com Consultas Diferentes

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 9/5/2024, 13:26