Como colocar o valor da célula no cabeçalho/rodapé no Excel?

No Microsoft Excel, é simples inserir informações como o caminho do arquivo, nome do arquivo, data atual ou outros detalhes integrados nos cabeçalhos ou rodapés usando recursos nativos do Excel. No entanto, há cenários em que você precisa usar o conteúdo real de uma célula específica como cabeçalho ou rodapé. Essa capacidade não é fornecida diretamente pela interface padrão do Excel, levando à pergunta: como você pode inserir um valor de célula em um cabeçalho ou rodapé na sua planilha? Muitos usuários encontram essa necessidade ao preparar relatórios, formulários ou exportações de dados onde informações dinâmicas, como o nome de um cliente ou uma data personalizada, devem ser refletidas no cabeçalho ou rodapé de impressão, para que cada impressão contenha o contexto mais atualizado da própria planilha. As soluções abaixo abordam essa necessidade, mostrando tanto abordagens VBA quanto de terceiros e discutindo quando cada método é mais adequado.

Coloque o valor da célula no cabeçalho ou rodapé de uma planilha com código VBA

Coloque o valor da célula no cabeçalho ou rodapé de todas as planilhas com código VBA

Insira informações do arquivo no cabeçalho/rodapé com Kutools para Excel

Copiando manualmente os conteúdos da célula para a caixa de diálogo de cabeçalho ou rodapé

Coloque o valor da célula no cabeçalho ou rodapé de uma planilha com código VBA

Se você deseja exibir o conteúdo de uma célula específica no cabeçalho ou rodapé da sua planilha atual, isso não é possível por meio da interface padrão de cabeçalho/rodapé do Excel. No entanto, você pode alcançar isso usando uma macro VBA simples.

Primeiro, certifique-se de salvar sua pasta de trabalho antes de executar qualquer código VBA, pois as macros modificam objetos e não podem ser desfeitas. Além disso, verifique se suas configurações do Excel permitem a execução de macros.

1. Ative a planilha onde deseja colocar um valor de célula no cabeçalho ou rodapé. Pressione ALT + F11 para abrir a janela Microsoft Visual Basic for Applications.

2. Clique em Inserir > Módulo e cole o seguinte código na nova janela Módulo.

Código VBA: coloque o valor de uma célula especificada no cabeçalho de uma planilha

Sub HeaderFrom()
'Update 20140318
Dim WorkRng As Range
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection.Range("A1")
Set WorkRng = Application.InputBox("Range (single cell)", xTitleId, WorkRng.Address, Type:=8)
Application.ActiveSheet.PageSetup.LeftHeader = WorkRng.Range("A1").Value
End Sub

3Pressione F5 (ou clique no botão Executar) para executar esta macro. Uma caixa de diálogo aparecerá solicitando que você selecione a célula cujo valor deseja usar no cabeçalho.

4Depois de selecionar a célula e clicar OK, o valor da célula escolhida será inserido no cabeçalho esquerdo da sua planilha ativa. Para visualizar o cabeçalho, vá para Arquivo > Imprimir (ou use Layout da Página visualização). Veja o exemplo abaixo:

Notas:

• Se você deseja exibir o conteúdo da célula no rodapé em vez do cabeçalho, use o seguinte código. Os passos operacionais são os mesmos — basta colar este código em um módulo e executá-lo.

Código VBA: coloque o valor de uma célula especificada no rodapé de uma planilha

Sub FooterFrom()
'Update 20140318
Dim WorkRng As Range
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection.Range("A1")
Set WorkRng = Application.InputBox("Range (single cell)", xTitleId, WorkRng.Address, Type:=8)
Application.ActiveSheet.PageSetup.LeftFooter = WorkRng.Range("A1").Value
End Sub

• Para alterar a posição, substitua CabeçalhoEsquerdo ou RodapéEsquerdo no código por CabeçalhoCentral, CabeçalhoDireito, RodapéCentral ou RodapéDireito conforme necessário. Por exemplo, para inserir o valor no cabeçalho central, altere CabeçalhoEsquerdo para CabeçalhoCentral.
• Sempre certifique-se de que a referência da célula seja válida antes de executar o script. Se você tentar referenciar uma célula em branco, o cabeçalho/rodapé ficará em branco.
• Após executar a macro, se você modificar a célula de origem, o cabeçalho/rodapé não será atualizado automaticamente; será necessário executar novamente a macro para atualizar as informações exibidas.
• Este método VBA é recomendado quando você deseja automatizar ações de célula para cabeçalho sem precisar de atualizações frequentes, ou ao trabalhar em modelos com conteúdo dinâmico por impressão.
• Se você encontrar um aviso de “Macros estão desativadas”, certifique-se de que as configurações de macro estejam habilitadas em Arquivo > Opções > Central de Confiabilidade.

Coloque o valor da célula no cabeçalho ou rodapé de todas as planilhas com código VBA

Quando você precisa aplicar o valor de uma célula específica como cabeçalho ou rodapé em todas as planilhas da sua pasta de trabalho, seria demorado executar o código anterior para cada planilha individualmente. Nesses casos, você pode usar outra macro VBA projetada para inserir o conteúdo de uma célula escolhida no cabeçalho ou rodapé de todas as planilhas da sua pasta de trabalho em uma única operação. Isso é comum ao distribuir relatórios que devem conter informações consistentes de cabeçalho/rodapé em todos os documentos.

1. Abra a pasta de trabalho onde deseja aplicar a mudança e pressione ALT + F11 para iniciar a janela Visual Basic for Applications.

2. No editor VBA, clique em Inserir > Módulo, depois copie e cole a seguinte macro na janela do módulo.

Código VBA: coloque o valor de uma célula especificada no rodapé de todas as planilhas

Sub AddFooterToAll()
'Update 20140318
Dim WorkRng As Range
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection.Range("A1")
Set WorkRng = Application.InputBox("Range (single cell)", xTitleId, WorkRng.Address, Type:=8)
For Each ws In Application.ActiveWorkbook.Worksheets
    ws.PageSetup.LeftFooter = WorkRng.Range("A1").Value
Next
End Sub

3. Pressione F5 para executar esta macro. Uma caixa de diálogo aparecerá para você selecionar a célula-alvo cujo valor deve aparecer no rodapé de cada planilha.

4Uma vez que você selecione a célula e clique OK, esse valor da célula será inserido no rodapé esquerdo de cada planilha na pasta de trabalho. Você pode verificar a atribuição do rodapé navegando até Arquivo > Imprimir.

Notas:

• Para usar o valor da célula no cabeçalho em todas as planilhas, aplique o seguinte código. O processo para inserir e executar o código é idêntico:

Código VBA: coloque o valor de uma célula especificada no cabeçalho de todas as planilhas

Sub AddHeaderToAll()
'Update 20140318
Dim WorkRng As Range
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection.Range("A1")
Set WorkRng = Application.InputBox("Range (single cell)", xTitleId, WorkRng.Address, Type:=8)
For Each ws In Application.ActiveWorkbook.Worksheets
    ws.PageSetup.LeftHeader = WorkRng.Range("A1").Value
Next
End Sub

• Para inserir o valor na posição direita ou central do cabeçalho/rodapé, basta substituir CabeçalhoEsquerdo/RodapéEsquerdo por CabeçalhoCentral/RodapéCentral ou CabeçalhoDireito/RodapéDireito no script.
• Esteja ciente de que ações de desfazer não se aplicam às mudanças feitas usando macros VBA. Salve seu documento antes para evitar perder dados se o resultado for inesperado.
• Essa abordagem é melhor para pastas de trabalho onde todas as planilhas compartilham requisitos comuns de cabeçalho/rodapé. Quando as planilhas precisam de conteúdo diferente, considere executar a macro de planilha única separadamente em cada uma delas.
• Se você encontrar problemas onde os cabeçalhos/rodapés não são atualizados conforme o esperado, certifique-se de que você não tenha Planilhas Protegidas ou Proteção de Pasta de Trabalho ativadas.

Insira informações do arquivo no cabeçalho/rodapé com Kutools para Excel

Nos casos em que você deseja inserir rapidamente e de forma flexível informações relacionadas ao arquivo — como o nome da planilha, nome da pasta de trabalho ou caminho do arquivo — no cabeçalho ou rodapé, Kutools para Excel fornece uma ferramenta dedicada chamada Inserir Informações da Pasta de Trabalho. Esta ferramenta é especialmente adequada se você preferir uma solução sem código, exigir processamento em lote ou quiser inserir várias propriedades de documento integradas sem entrada manual ou risco de erro. Kutools torna o processo acessível para usuários que não desejam interagir com o VBA ou que precisam regularmente atualizar cabeçalhos/rodapés com base nos metadados da pasta de trabalho.

Após instalar gratuitamente o Kutools para Excel, siga estes passos:

1. Vá para a aba Kutools Plus e selecione Pasta de Trabalho > Inserir Informações da Pasta de Trabalho.

2. Na caixa de diálogo Inserir Informações da Pasta de Trabalho, selecione as informações específicas que deseja inserir (por exemplo, caminho da pasta de trabalho, nome do arquivo, nome da planilha, etc.) na seção Informação. Em seguida, especifique se deseja inseri-la no cabeçalho ou no rodapé marcando Cabeçalho ou Rodapé.

Dica: Você pode escolher a posição dentro do cabeçalho ou rodapé — centro, esquerda ou direita — usando as opções de localização. Isso é útil para layouts estruturados, como colocar o caminho do arquivo à esquerda e o nome da planilha no centro.

3. Clique OK para aplicar suas configurações. Para revisar os resultados, vá para Visualizar > Layout da Página ou use Arquivo > Visualização de Impressão.

Com o recurso Inserir Informações da Pasta de Trabalho, você também pode inserir essas informações diretamente nas células ou em um intervalo de células — permitindo que você use tais detalhes para fórmulas, exibição ou tarefas adicionais de automação. Clique aqui para saber mais sobre este utilitário.

Este método funciona particularmente bem para usuários que desejam acesso fácil às propriedades do documento sem interagir com macros ou fórmulas. Comparado à edição manual, Kutools garante consistência e economiza tempo considerável, especialmente para aqueles que precisam regularmente atualizar referências de documentos.

Se as informações no seu cabeçalho ou rodapé não parecem ser atualizadas automaticamente, verifique se a pasta de trabalho está configurada para Cálculo Manual, já que alguns cabeçalhos/rodapés requerem uma atualização do documento para exibir os dados mais recentes.

Copiando manualmente os conteúdos da célula para a caixa de diálogo de cabeçalho ou rodapé

Se você só precisa atualizar o cabeçalho ou rodapé com o conteúdo da célula ocasionalmente e quer evitar VBA e add-ins, você pode copiar o valor da célula e colá-lo manualmente na caixa de diálogo de cabeçalho/rodapé. Dê dois cliques na seção de cabeçalho/rodapé na visualização Layout da Página e cole o valor da célula usando Ctrl+V. A desvantagem é que isso é manual — você precisa atualizar o valor sempre que ele mudar.

Ao usar abordagens manuais ou de título de impressão, lembre-se de que elas são menos dinâmicas para a colocação "verdadeira" de cabeçalho/rodapé e exigem ação toda vez que as informações subjacentes mudam. Por outro lado, macros VBA e ferramentas como Kutools oferecem fluxos de trabalho simplificados e repetíveis, especialmente úteis para grandes pastas de trabalho ou geração automática de relatórios. Se você encontrar comportamento inesperado ou erros com VBA, sempre verifique suas configurações de segurança de macro e inspecione se há planilhas bloqueadas ou protegidas. Antes de usar add-ins de terceiros, verifique se eles são de fontes confiáveis e compatíveis com sua versão do Excel. Ao trabalhar com arquivos sensíveis ou críticos, é uma boa prática salvar um backup antes de executar macros.

Demonstração: Inserir informações da pasta de trabalho na célula/cabeçalho/rodapé

Artigos relacionados:

Como inserir o nome do arquivo ou caminho na célula / cabeçalho ou rodapé no Excel?

Como inserir e excluir cabeçalho, rodapé e imagem de cabeçalho no Excel?