Abaixo, veremos um programa em Excel VBA que cria um rodapé antes de imprimir uma pasta de trabalho.
Crie um Workbook BeforePrint Event. O código adicionado ao evento Workbook BeforePrint será executado pelo Excel VBA antes de você imprimir uma pasta de trabalho.
1. Abra o Editor do Visual Basic.
2. Clique duas vezes em This Workbook no Project Explorer.
3. Escolha Workbook na lista suspensa à esquerda. Escolha BeforePrint na lista suspensa à direita.
4. Para criar um rodapé, adicione a seguinte linha de código ao Workbook BeforePrint Event:
ActiveSheet.PageSetup.LeftFooter = ActiveWorkbook.FullName
Nota: O objeto PageSetup contém todos os atributos de configuração de página (rodapé esquerdo, margem inferior, tamanho do papel, margem esquerda e assim por diante) como propriedades.
5. Teste o programa imprimindo sua pasta de trabalho.
Resultado: