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

    Imprimir relatórios separados com a mesma consulta

    avatar
    berninirobs
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 151
    Registrado : 14/09/2012

    Imprimir relatórios separados com a mesma consulta Empty Imprimir relatórios separados com a mesma consulta

    Mensagem  berninirobs 23/5/2024, 19:30

    Boa tarde pessoal.

    Uma escola tem 10 turmas. Preciso imprimir um relatório com a lista dos alunos por cada turma.

    Sendo que o documento tem valor oficial, o relatório deve mostrar necessariamente na sequência:
    cabeçalho do relatório, cabeçalho da página e  detalhes.

    Através o clique do botão eu queria imprimir os 10 relatórios  todos quantos separados por turma [CodTurma].

    Meu problema é que agrupando pelo [CodTurma] o cabeçalho da página ficaria acima do agrupamento e é isso mesmo que eu queria evitar.

    Mais uma vez....Muito Obrigado !
    tauron
    tauron
    VIP
    VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1416
    Registrado : 07/12/2011

    Imprimir relatórios separados com a mesma consulta Empty Re: Imprimir relatórios separados com a mesma consulta

    Mensagem  tauron 23/5/2024, 23:44

    Posta o que você já tem para podermos dar uma ajuda melhor.
    avatar
    berninirobs
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 151
    Registrado : 14/09/2012

    Imprimir relatórios separados com a mesma consulta Empty Re: Imprimir relatórios separados com a mesma consulta

    Mensagem  berninirobs 24/5/2024, 18:59

    Boa Tarde Tauron.

    Muito obrigado pelo atendimento.

    Encaminho o exemplo em anexo....
    Anexos
    Imprimir relatórios separados com a mesma consulta AttachmentTESTE_relat.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (54 Kb) Baixado 4 vez(es)
    tauron
    tauron
    VIP
    VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1416
    Registrado : 07/12/2011

    Imprimir relatórios separados com a mesma consulta Empty Re: Imprimir relatórios separados com a mesma consulta

    Mensagem  tauron 25/5/2024, 00:06

    Vamos à labuta, veja se estamos no caminho certo.
    Anexos
    Imprimir relatórios separados com a mesma consulta AttachmentTESTE_relat1.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (41 Kb) Baixado 6 vez(es)
    avatar
    berninirobs
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 151
    Registrado : 14/09/2012

    Imprimir relatórios separados com a mesma consulta Empty Re: Imprimir relatórios separados com a mesma consulta

    Mensagem  berninirobs 25/5/2024, 03:47

    Boa noite Tauron.

    Obrigado pelo rápido retorno.

    Já tinha pensado em acrescentar o agrupamento da turma, mas isso não alcança meu objetivo.

    Estou querendo imprimir de uma vez só os dois relatórios gerados pelo banco de exemplo, mas cada um deles deve sair com o seu cabeçalho do relatório.
    Poderia resolver imprimindo os dois relatórios, um por cada vez, colocando um parâmetro na consulta no campo [IdTurma], mas o meu município tem 137 escolas, alguma delas com mais de 20 turmas.
    Assim minha ideia foi aquela de selecionar a escola e com um clique no botão, imprimir os 20 relatórios.

    Eu pensava de utilizar um procedimento evento com a instrução loop, mas apanhei pra caramba.

    Desta vez espero ter me explicado de uma forma mais decente. Valeu!
    avatar
    berninirobs
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 151
    Registrado : 14/09/2012

    Imprimir relatórios separados com a mesma consulta Empty Re: Imprimir relatórios separados com a mesma consulta

    Mensagem  berninirobs 30/5/2024, 15:24

    pale

    joaquimbras gosta desta mensagem

    avatar
    berninirobs
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 151
    Registrado : 14/09/2012

    Imprimir relatórios separados com a mesma consulta Empty Re: Imprimir relatórios separados com a mesma consulta

    Mensagem  berninirobs 31/5/2024, 15:20

    Bom dia Tauron.

    Avançamos! Ontem eu estava no desespero, mas hoje chegou um raio de luz e fiz algumas alterações no relatório.

    No cabeçalho IdTurma acrescentei a seção de rodapé com a propriedade “Força quebra da página” em “Depois da Seção” Sucessivamente recortei o conteúdo do rodapé do relatório e o-colei na seção de rodapé IdTurma.

    O código foi ótimo pelo fato que resolve o problema do cabeçalho da página sumir da Page 1 e isso era tudo aquilo que eu queria, mas agora, com certeza por causa destas minhas alterações, na página 2 de cada agrupamento o cabeçalho de página não fica visível.

    Muito obrigado !!!
    Anexos
    Imprimir relatórios separados com a mesma consulta AttachmentTESTE_relat2.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (71 Kb) Baixado 5 vez(es)
    avatar
    berninirobs
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 151
    Registrado : 14/09/2012

    Imprimir relatórios separados com a mesma consulta Empty Re: Imprimir relatórios separados com a mesma consulta

    Mensagem  berninirobs 4/6/2024, 02:09

    Boa noite pessoal.

    Meu problema do cabeçalho da página sumir da Page 1 continua a pesar o contador de paginas agora numera as paginas por agrupamento.

    Quero dizer:
    O agrupamento da turma 5A numera as paginas como pag.1 e pag. 2, neste caso o cabeçalho de pagina fica não visível na pag. 1 e visível na pag. 2. Beleza!
       
    O agrupamento da turma 5B  também numera as paginas como pag.1 e pag. 2, mas neste outro caso o cabeçalho de pagina 1 fica visível e não deveria.

    No agrupamento da turma 6A  tem somente a pagina pag.1, mas também neste outro caso o cabeçalho de pagina identificado como  pagina 1 fica visível e não deveria.

    Anexo a versão 3

    Obrigado!
    Anexos
    Imprimir relatórios separados com a mesma consulta AttachmentTESTE_relat3.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (75 Kb) Baixado 8 vez(es)
    avatar
    berninirobs
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 151
    Registrado : 14/09/2012

    Imprimir relatórios separados com a mesma consulta Empty Re: Imprimir relatórios separados com a mesma consulta

    Mensagem  berninirobs 5/7/2024, 15:52

    Código utilizado no relatório, se puder ajudar. Obrigado:

    Private Sub GroupHeader0_Format(Cancel As Integer, FormatCount As Integer)
    Page = 1
    End Sub

    ------------------------------------------------------------------------------------------------

    Private Sub CabeçalhoDoGrupo0_Print(Cancel As Integer, PrintCount As Integer)
    Page = 1
    End Sub

    ---------------------------------------------------------------------------------------

    Private Sub PageHeaderSection_Print(Cancel As Integer, PrintCount As Integer)
    If Me.Texto54 = 1 Then
    Me.txtCBC.Visible = True
    Me.Rótulo37.Visible = False
    Me.Rótulo38.Visible = False
    Else
    Me.txtCBC.Visible = True
    Me.Rótulo37.Visible = True
    Me.Rótulo38.Visible = True
    End If
    End Sub

    ----------------------------------------------------------

    Private Sub Report_load()
    If Me.Texto54 = 1 Then
    Me.txtCBC.Height = 0
    Me.txtCBC.Top = 0
    Me.Rótulo37.Top = 0
    Me.Rótulo37.Height = 0
    Me.Rótulo38.Top = 0
    Me.Rótulo38.Height = 0
    Me.PageHeaderSection.Height = 0
    Else
    Me.Rótulo37.Top = 567
    Me.Rótulo38.Top = 567
    End If
    End Sub

    Conteúdo patrocinado


    Imprimir relatórios separados com a mesma consulta Empty Re: Imprimir relatórios separados com a mesma consulta

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 23/10/2024, 04:30