Bom dia!!

Eu entendi parte do que você quer, seria melhor postar seu arquivo modelo, compactado!!

Att

Boa noite!

Eu até tentei compactar minha planilha mas fica ruim por que ela já é naturalmente muito grande.

Mas a princípio é o seguinte:

- Tenho uma aba chamada "relatório" onde filtro o cpf de uma pessoa;
- Ela filtra esse cpf e busca um monte de informações dessa pessoa que estão em outra aba da planilha;
- É feito uma espécie de relatório com diversas páginas, que pode variar de acordo com o cpf escolhido;
- Segue um exemplo do relatório que é emitido. Na última folha dele coloquei o campo "assinatura" à mão... gostaria que fosse automático independente do número de folhas (no exemplo são 4 páginas). https://www.sendspace.com/file/hkwkso

Obrigado!

Tente esse código do Excel MVP Ron de Bruin, eu uso para imprimir rodapé somente na ultima página.

Sub test()
Dim TotPages As Long
TotPages = Application.ExecuteExcel4Macro("GET.DOCUMENT(50)")
With ActiveSheet.PageSetup
.RightFooter = ""
ActiveSheet.PrintOut From:=1, To:=TotPages - 1
.RightFooter = "Your Header info" '<== Coloque aqui as informações que vc deseja imprimir no rodapé.
ActiveSheet.PrintOut From:=TotPages, To:=TotPages
End With
End Sub

Doni