[Resolvido]Rodapé do relatório fixo no final da página

Senhores, desculpem minha ignorância, mas alguém pode me informar como configurar para que o rodapé do relatório (com mais de uma página) fique sempre no final da página, visto que dependendo da quantidade de dados o rodapé fica no meio da página.

Grato a todos

Olá


Utilize Rodapé da página

Prezado mestre Nois, eu usei no rodapé do relatório sim, o problema é que dependendo da quantidade de dados na seção detalhe o rodapé do relatório pode ficar (em cima, no meio ou em qualquer parte da folha). Eu preciso que o rodapé do relatório fique sempre no final da folha independente da quantidade de dados na seção detalhe.

Coloquei uma caixa de texto (visible = False) no rodapé da página e quando for a página 2 ela seja exibida quando eu tiver apenas duas páginas, mas quando eu tiver várias páginas por exemplo?

queria alguma função tipo:


Private Sub PageFooterSection_Format(Cancel As Integer, FormatCount As Integer)
Dim pagina As String
'se a minha página for de num 2 imprima o texto no rodapé
pagina = 2
If Me.Page = pagina Then
Me.txagora.Visible = True
'Me.Section(4).Visible = True
End If
End Sub



Tem como me ajudar nisso
Sou novo em VBA e preciso de ajuda

Poste uma parte do seu Bd para que eu possa dar uma olhada, por gentileza.

De uma verificada se o seu relatório esta parecido com este formato



ultilizando esse padrão ficará sempre no final

Algum avanço?

Não mestre ainda naum..
Tentando...

Amigo, posso estar enganado mas Rodapé da Página sempre estará no Final da Pagina... Independente da qndt de Registro...


Rodapé do Relatorio é que sera impresso no Final do Relatorio... Esse sim fica no meio, onde acabar o texto...

posta um exemplo com a duvida para vermos o que esta acontecendo.

Ok mestre FabioPaes esa é a grande questão.

Eu tenho uma determinada quantidade de dados e que acaba por exemplo no meio da página.
eu sei que o rodapé da página fica no final da página, o que eu queria é que independente da quantidade de dados o rodapé do relatório ficasse fixo sempre no final da página (independente da quantidade de dados)

pois eu preciso que tenha a assinatura de um gerente que deve sempre ficar no final do relatório na parte inferior da folha
Ex:

____________________________
Antonio Carlos da Silva
Diretor Geral do DETRAN/ES
Vitória 29 de Setembro de 2016

Este é o rodapé do relatório e deve ficar no fical (parte inferior da página)

Estou tentando algo assim

Me.Section(4).Visible = (Me.Page < Me.Pages)

ou

Me.total_final_Footer.Visible=(Count(*)>1)

Se alguém puder ajudar agradeço

Posta o Exemplo com os Registros e o Relatorio criado...

Agora monte uma Imagem de Onde gostaria que ficasse essa Assinatura... Pode montar no Paint...

Segue o modelo do sistema.
Vc deve abrir o form. FRM_PESQUISA_CNH e escolher as CNHs que devem ser impressas

O texto abaixo deve ficar na ultima página (rodapé do relatório) na parte inferior da folha.

Atenciosamente,

JOSÉ MARIA CASAGRANDE JUNIOR 2º TEN QOC PM – RG 21.956-1
Subcomandante da 5º Cia do 9ºBPM

Ao Senhor
ROMEU SCHEIBE NETO,
Diretor Geral do Detran - ES

e abaixo o rodapé da página

Amigo, ja posto a Solução ta... momento so

OK, no aguardo mestre.

Agora sim eu entendi o que precisa amigo...


Na verdade seu problema é que:

Vc precisa do Rodapé da Pagina... e Também precisa do Rodapé especifico no Final da Ultima Pagina!




Dessa Forma o que foi feito foi:

Coloquei o Rodapé do Relatório Junto do Rodapé da Pagina... Porem eu coloquei umas instruçoes, para identificar a ultima página... e somente exibir o Texto que seria pro rodapé da Ultima folha quando estiver nela... 

Codigo que está na Seçao Rodapé do Relatório:

Código:

Private Sub RodapéDoRelatório_Format(Cancel As Integer, FormatCount As Integer)
'Se for a ultima Pagina ele faz...
If Me.Pages = Me.Pages Then

'Sobe o Rodapé la pra cima (Aumentando o Tamanho do RODAPÉ DA PÁGINA)
Me.PageFooterSection.Height = 3500

'Torna o Campo com Aten... Visivel
Me.aten.Visible = True

'Aumenta a Altura do Campo Aten (Tamanho do Campo)
Me.aten.Height = 1900
End If
End Sub

Baixe o exemplo aqui:
https://www.dropbox.com/s/epm3a7iub0r6okc/Rodap%C3%A9%20Especifico%20Ultima%20Pagina.zip?dl=0

boa! so aprendendo a cada dia mais, parabens!

Mestre FabioPaes não consegui fazer o download pelo dropbox, eu trabalho dentro de uma rede privada com servidor de Domínio.

Poderia me mandar pelko meu email pessoal?

mandei uma mensagem privada para vc mestre Fabio

Vish, chegou não amigo...

ok

A menagem anterior foi mau Redigida por mim... Eu ja Havia encaminhado a vc o Arquivo... rererererererere

Vlw mestre

Grato a todos neste problema.
Posto Resovido

Te devo mais uma mestre Fábio
Obrigado tbm mestre Nois

Grato pelo Retorno, até a próxima se Deus quiser!