Como inserir o valor de uma célula no cabeçalho ou rodapé do Excel?
No Microsoft Excel, é simples inserir informações como o caminho do ficheiro, o nome do ficheiro, a data atual ou outros detalhes diretamente nos cabeçalhos ou rodapés, utilizando funcionalidades nativas do programa. Contudo, há cenários em que precisa de usar o conteúdo real de uma célula específica como cabeçalho ou rodapé — uma capacidade que não está disponível diretamente na interface padrão do Excel. Isto levanta a seguinte questão: como inserir o valor de uma célula num cabeçalho ou rodapé da sua folha de cálculo? Muitos utilizadores enfrentam esta 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 aparecer no cabeçalho ou rodapé da impressão, garantindo que cada cópia reflita o contexto mais atualizado proveniente diretamente da folha. As soluções abaixo abordam precisamente esta necessidade, apresentando abordagens com VBA e com ferramentas externas, e explicando quando cada método é mais adequado.
Colocar o valor de uma célula no cabeçalho ou rodapé de uma folha de cálculo com código VBA
Colocar o valor de uma célula no cabeçalho ou rodapé de todas as folhas de cálculo com código VBA
Inserir Informações do Arquivo no cabeçalho/rodapé com Kutools para Excel 
Copiar manualmente o conteúdo da célula para a caixa de diálogo do cabeçalho ou rodapé
Colocar o valor de uma célula no cabeçalho ou rodapé de uma folha de cálculo com código VBA
Se pretender apresentar o conteúdo de uma célula específica no cabeçalho ou rodapé da sua folha de cálculo atual, saiba que isso não é possível através da interface padrão de cabeçalho e rodapé do Excel. No entanto, pode consegui-lo facilmente com uma macro VBA simples.
Em primeiro lugar, certifique-se de guardar o livro antes de executar qualquer código VBA, pois as macros modificam objetos e não podem ser anuladas. Além disso, confirme se as definições do Excel permitem a execução de macros.
1. Ative a folha de cálculo onde pretende inserir o valor de uma célula no cabeçalho ou rodapé. Prima ALT + F11 para abrir a janela do Microsoft Visual Basic for Applications.
2. Clique em Inserir > Módulo e cole o seguinte código na nova janela do módulo.
Código VBA: colocar o valor de uma célula especificada no cabeçalho de uma folha de cálculo
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
3. Prima F5 (ou clique no botão Executar) para executar esta macro. Aparecerá uma caixa de diálogo a solicitar que selecione a célula cujo valor pretende utilizar no cabeçalho.
4. Após selecionar a célula e clicar em OK, o valor da célula escolhida será inserido no Cabeçalho Esquerdo da sua folha ativa. Para visualizar o cabeçalho, aceda a Ficheiro > Imprimir(ou utilize a vista)Esquema da Página). Veja o exemplo abaixo:
Notas:
- Se pretender apresentar o conteúdo da célula no rodapé em vez do cabeçalho, utilize o seguinte código. Os passos operacionais são idênticos — basta colar este código num módulo e executá-lo.
Código VBA: colocar o valor de uma célula especificada no rodapé de uma folha de cálculo
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 LeftHeader ou LeftFooter no código por CenterHeader, RightHeader, CenterFooter ou RightFooter, conforme necessário. Por exemplo, para inserir o valor no Cabeçalho Central, altere
LeftHeaderparaCenterHeader. - Certifique-se sempre de que a referência da célula é válida antes de executar o script; caso contrário, ao tentar referenciar uma célula vazia, o cabeçalho ou rodapé ficará em branco.
- Após executar a macro, se modificar a célula de origem, o cabeçalho ou rodapé não será atualizado automaticamente; será necessário executar novamente a macro para atualizar a informação apresentada.
- Este método VBA é ideal para automatizar ações de célula para cabeçalho, especialmente quando não são necessárias atualizações frequentes ou ao utilizar modelos com conteúdo dinâmico em cada impressão.
- Se vir o aviso «As macros estão desativadas», certifique-se de que as definições de macros estão ativadas em Ficheiro > Opções > Centro de Confiança.
Colocar o valor de uma célula no cabeçalho ou rodapé de todas as folhas de cálculo com código VBA
Quando precisar de aplicar o valor de uma célula específica como cabeçalho ou rodapé em todas as folhas do seu livro, executar o código anterior individualmente em cada folha torna-se moroso. Nestes casos, pode utilizar outra macro VBA concebida para inserir, numa única operação, o conteúdo de uma célula escolhida no cabeçalho ou rodapé de todas as folhas do livro. Esta abordagem é especialmente útil ao distribuir relatórios que devem apresentar informação consistente no cabeçalho ou rodapé ao longo de todo o documento.
1. Abra o livro onde pretende aplicar a alteração e prima ALT + F11 para abrir a janela do Visual Basic for Applications.
2. No editor do VBA, clique em Inserir > Módulo e copie e cole a seguinte macro na janela do módulo.
Código VBA: colocar o valor de uma célula especificada no rodapé de todas as folhas de cálculo
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. Prima F5 para executar esta macro. Aparecerá uma caixa de diálogo para selecionar a célula-alvo cujo valor será exibido no rodapé de cada folha de cálculo.
4. Assim que selecionar a célula e clicar em OK, o valor dessa célula será inserido no rodapé esquerdo de todas as folhas de cálculo do livro. Para verificar se o rodapé foi atribuído, vá até Ficheiro > Imprimir.
Notas:
- Para utilizar um valor de célula no cabeçalho em todas as folhas de cálculo, utilize o seguinte código em vez disso. O processo para introduzir e executar o código é idêntico:
Código VBA: colocar o valor de uma célula especificada no cabeçalho de todas as folhas de cálculo
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 central ou direita do cabeçalho/rodapé, basta substituir LeftHeader/LeftFooter por CenterHeader/CenterFooter ou RightHeader/RightFooter no script.
- Tenha em atenção que as ações de anular (undo) não se aplicam às alterações efetuadas com macros VBA. Guarde o documento previamente para evitar a perda de dados caso o resultado seja inesperado.
- Esta abordagem é ideal para livros em que todas as folhas partilham os mesmos requisitos de cabeçalho e rodapé. Caso as folhas exijam conteúdos diferentes, execute separadamente a macro de folha única em cada uma.
- Se os cabeçalhos ou rodapés não se atualizarem conforme esperado, certifique-se de que nem as Folhas Protegidas nem a Proteção do Livro estão ativadas.
Inserir Informações do Arquivo no cabeçalho/rodapé com Kutools para Excel
Quando precisa de inserir rapidamente e com flexibilidade informações relacionadas com o ficheiro — como o nome da folha, o nome do livro ou o caminho do ficheiro — no cabeçalho ou rodapé, o Kutools para Excel oferece uma funcionalidade dedicada chamada Inserir Informações da Pasta de Trabalho. Esta ferramenta é ideal se preferir uma solução sem código, precisar de processamento em lote ou quiser inserir várias propriedades incorporadas do documento sem digitação manual nem risco de erro. Com o Kutools, o processo torna-se acessível até para utilizadores que não desejam lidar com VBA ou que frequentemente precisam de atualizar cabeçalhos e rodapés com base nos metadados do livro.
Após instalar gratuitamenteKutools para Excel, siga estes passos:
1. Aceda ao separador KUTOOLS PLUS e selecione Livro > Inserir Informações da Pasta de Trabalho.
2. Na caixa de diálogo Inserir Informações da Pasta de Trabalho, selecione a informação específica que pretende inserir (por exemplo, Caminho da Pasta de Trabalho, nome do ficheiro, Nome da Planilha, etc.) na secção Informação. Em seguida, indique se pretende inseri-la no cabeçalho ou no rodapé, marcando Cabeçalho ou Rodapé.
Dica: Pode escolher a posição dentro do cabeçalho ou do rodapé — à esquerda, ao centro ou à direita — utilizando as opções de localização. Isto é especialmente útil em esquemas estruturados, como colocar o caminho do ficheiro à esquerda e o nome da folha ao centro.
3. Clique em OK para aplicar as suas definições. Para rever os resultados, aceda a Ver > Esquema de Página ou utilize Ficheiro > Pré-visualização de Impressão.
Com a funcionalidade Inserir Informações da Pasta de Trabalho, também pode inserir esta informação diretamente em células ou num intervalo de células — permitindo-lhe utilizar esses dados em fórmulas, apresentações ou tarefas automatizadas adicionais.Clique aqui para saber mais sobre este utilitário.
Este método revela-se especialmente eficaz para utilizadores que pretendem aceder facilmente às propriedades do documento sem recorrer a macros ou fórmulas. Em comparação com a edição manual, o Kutools assegura consistência e poupa um tempo considerável, sobretudo para quem precisa de atualizar regularmente as referências do documento.
Se a informação no seu cabeçalho ou rodapé não parecer atualizar automaticamente, verifique se o livro está definido para Cálculo Manual, já que alguns cabeçalhos e rodapés exigem uma atualização do documento para exibir os dados mais recentes.
Copiar manualmente o conteúdo da célula para a caixa de diálogo do cabeçalho ou rodapé
Se precisar apenas de atualizar ocasionalmente o cabeçalho ou rodapé com o conteúdo de uma célula e quiser evitar VBA e extras, basta copiar o valor da célula e colá-lo manualmente na caixa de diálogo do cabeçalho/rodapé. Faça duplo clique na secção do cabeçalho/rodapé na vista Esquema de Página e cole o valor da célula utilizando Ctrl+V. A desvantagem é que este processo é manual — terá de atualizar o valor sempre que este mudar.
Ao optar por abordagens manuais ou baseadas em títulos de impressão, tenha em conta que estas são menos dinâmicas para uma inserção “verdadeira” de cabeçalho e rodapé, exigindo intervenção sempre que a informação subjacente for alterada. Por outro lado, macros VBA e ferramentas como o Kutools proporcionam fluxos de trabalho simplificados e repetíveis — especialmente valiosos em livros extensos ou na geração automatizada de relatórios. Caso encontre comportamentos inesperados ou erros ao utilizar VBA, verifique sempre as definições de segurança de macros e procure células bloqueadas ou folhas protegidas. Antes de instalar extras de terceiros, confirme que provêm de fontes fidedignas e são compatíveis com a sua versão do Excel. Ao trabalhar com ficheiros sensíveis ou críticos, guarde sempre uma cópia de segurança antes de executar macros.
Demonstração: Inserir Informações da Pasta de Trabalho para célula/cabeçalho/rodapé
Artigos relacionados:
Como inserir o nome ou o caminho do ficheiro numa célula, cabeçalho ou rodapé no Excel?
Como inserir e remover cabeçalho, rodapé e imagem de cabeçalho no Excel?
As Melhores Ferramentas de Produtividade para o Office
Potencie as suas competências no Excel com Kutools para Excel e experimente uma eficiência como nunca antes.Kutools para Excel Oferece mais de 300 funcionalidades avançadas para impulsionar a produtividade e Economizar Tempo.Clique aqui para obter a funcionalidade de que mais precisa...
Office Tab Traz uma interface com separadores para o Office e torna o seu trabalho muito mais fácil
- Ative a edição e leitura com separadores no Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
- Abra e crie vários documentos em novos separadores da mesma janela, em vez de em janelas separadas.
- Aumente a sua produtividade em 50 % e elimine centenas de cliques do rato todos os dias!
Todos os suplementos Kutools — num único instalador.
Kutools for Office reúne suplementos para Excel, Word, Outlook e PowerPoint, além do Office Tab Pro, sendo a solução ideal para equipas que trabalham em várias aplicações do Office.
- Pacote tudo-em-um— suplementos para Excel, Word, Outlook e PowerPoint + Office Tab Pro
- Um instalador, uma licença— configuração em minutos (pronto para MSI)
- Funciona melhor em conjunto— produtividade simplificada em todas as aplicações do Office
- Teste gratuito de 30 dias com todas as funcionalidades— sem registo, sem cartão de crédito
- Melhor relação qualidade-preço— poupe face à compra individual dos suplementos