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]Adicionar página em branco no final do relatório

    avatar
    zcarloslopes
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 393
    Registrado : 28/10/2010

    [Resolvido]Adicionar página em branco no final do relatório Empty [Resolvido]Adicionar página em branco no final do relatório

    Mensagem  zcarloslopes 29/1/2020, 10:54

    Bom dia a todos!

    Venho mais uma vez pedir a vossa ajuda...

    Tenho um relatório simples, com cabeçalho, detalhe e rodapé.

    Este relatório é para imprimir frente e verso.

    O que preciso é que, sempre que o número de páginas é ímpar, que seja impressa uma página extra em branco, apenas com cabeçalho e rodapé.

    Alguma dica?

    Obrigado


    Última edição por zcarloslopes em 30/1/2020, 14:27, editado 1 vez(es)
    Alvaro Teixeira
    Alvaro Teixeira
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 7970
    Registrado : 15/03/2013

    [Resolvido]Adicionar página em branco no final do relatório Empty Re: [Resolvido]Adicionar página em branco no final do relatório

    Mensagem  Alvaro Teixeira 29/1/2020, 11:31

    Olá Carlos,

    Partilhe pequeno exemplo a dar o numero impar para se testar.
    Tenho uma ideia para exeperimentar.

    Abraço
    avatar
    zcarloslopes
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 393
    Registrado : 28/10/2010

    [Resolvido]Adicionar página em branco no final do relatório Empty Re: [Resolvido]Adicionar página em branco no final do relatório

    Mensagem  zcarloslopes 30/1/2020, 09:46

    Bom dia!

    Obrigado ahteixeira pelo retorno.

    Segue então um exemplo do pretendido.

    No exemplo tem 3 Relatórios para simular o pretendido.

    O Relatório2 tem 2 páginas está correto.

    O Relatório1 tem 1 página, deveria ter 2 páginas, sendo a página 2 em branco, apenas com o cabeçalho e rodapé.

    O Relatório3 tem 3 páginas, deveria ter 4 páginas, sendo a página 4 em branco, apenas com o cabeçalho e rodapé.

    Obrigado
    Anexos
    [Resolvido]Adicionar página em branco no final do relatório AttachmentExtraPage.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (24 Kb) Baixado 3 vez(es)
    Alvaro Teixeira
    Alvaro Teixeira
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 7970
    Registrado : 15/03/2013

    [Resolvido]Adicionar página em branco no final do relatório Empty Re: [Resolvido]Adicionar página em branco no final do relatório

    Mensagem  Alvaro Teixeira 30/1/2020, 13:15

    Olá Carlos,

    Obrigado pela partilha, quando tiver com um tempinho e PC (agora estou no telemóvel), vou testar o seguinte:

    - Criar pagina no final do relatório invisível (para forçar pagina)
    - Verificar se numero de páginas é ímpar
    - Se for impar coloca visível a página do final do relatório.

    E é esta a ideia, se alguém quiser avançar com os testes.

    Abraço
    avatar
    zcarloslopes
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 393
    Registrado : 28/10/2010

    [Resolvido]Adicionar página em branco no final do relatório Empty Re: [Resolvido]Adicionar página em branco no final do relatório

    Mensagem  zcarloslopes 30/1/2020, 14:31

    Obrigado ahteixeira pela dica.

    Graças à sua dica resolvi da seguinte forma:

    Criei um cabeçalho e rodapé de grupo para inserir uma pagebreak e forçar uma página em branco no final do relatório.

    Inseri uma txtbox com o nome [Pages] e origem = Pages.

    No Evento Página:
    Código:
    Dim intTotalPages As Integer
     
    intTotalPages = Me.Pages

    If intTotalPages Mod 2 <> 0 Then

        Me.Section(6).Visible = False
        
    End If
    Perfeito

    Obrigado
    Alvaro Teixeira
    Alvaro Teixeira
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 7970
    Registrado : 15/03/2013

    [Resolvido]Adicionar página em branco no final do relatório Empty Re: [Resolvido]Adicionar página em branco no final do relatório

    Mensagem  Alvaro Teixeira 30/1/2020, 15:23

    Olá Carlos,

    Obrigado pela feedback!
    Se poder partilhar o exemplo da sua última mensagem com a solução que adotou, o fórum agradece.

    Abraço
    avatar
    zcarloslopes
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 393
    Registrado : 28/10/2010

    [Resolvido]Adicionar página em branco no final do relatório Empty Re: [Resolvido]Adicionar página em branco no final do relatório

    Mensagem  zcarloslopes 30/1/2020, 15:36

    Boa tarde ahteixeira,

    Com certeza,

    Anexo exemplo.

    Obrigado
    Anexos
    [Resolvido]Adicionar página em branco no final do relatório AttachmentExtraPage_v2.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (36 Kb) Baixado 9 vez(es)
    Alvaro Teixeira
    Alvaro Teixeira
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 7970
    Registrado : 15/03/2013

    [Resolvido]Adicionar página em branco no final do relatório Empty Re: [Resolvido]Adicionar página em branco no final do relatório

    Mensagem  Alvaro Teixeira 30/1/2020, 15:38

    Olá Carlos,

    Obrigado, isto é que é ser "MaximoAccess" Wink

    Abraço

    Conteúdo patrocinado


    [Resolvido]Adicionar página em branco no final do relatório Empty Re: [Resolvido]Adicionar página em branco no final do relatório

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 9/10/2024, 01:44