Como proteger o cabeçalho e o rodapé no Excel?

No Excel, podemos proteger as células rapidamente e facilmente, mas você já tentou proteger o cabeçalho e o rodapé para evitar que outras pessoas os modifiquem? Normalmente, não há uma maneira direta de resolver essa tarefa na planilha, mas o seguinte código VBA pode ajudá-lo.

Proteger cabeçalho e rodapé com código VBA

Proteger cabeçalho e rodapé com código VBA

O cabeçalho e o rodapé são úteis para nós ao imprimir uma planilha. Para evitar que sejam alterados por outras pessoas, siga os passos abaixo:

1. Pressione e segure as teclas ALT + F11 para abrir a janela do Microsoft Visual Basic for Applications.

2. Em seguida, clique duas vezes em ThisWorkbook na seção VBAProject para abrir um módulo em branco e depois copie e cole o seguinte código no módulo:

Código VBA: Proteger cabeçalho e rodapé

Option Explicit
Private Sub Workbook_BeforePrint(Cancel As Boolean)
    Call ProtectHF
End Sub
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
    Call ProtectHF
End Sub
Private Sub Workbook_Open()
    Call ProtectHF
End Sub
Private Sub ProtectHF()
'Updateby Extendoffice
    Application.ScreenUpdating = False
    ThisWorkbook.ActiveSheet.PageSetup.RightHeader = ""
    ThisWorkbook.ActiveSheet.PageSetup.RightFooter = ""
    ThisWorkbook.ActiveSheet.PageSetup.CenterFooter = "KTE-Sale-Report"
    ThisWorkbook.ActiveSheet.PageSetup.CenterHeader = "Created by Skyyang"
    ThisWorkbook.ActiveSheet.PageSetup.LeftHeader = ""
    ThisWorkbook.ActiveSheet.PageSetup.LeftFooter = ""
    Application.ScreenUpdating = True
End Sub

Observação: Você pode inserir o conteúdo do cabeçalho ou rodapé no local correspondente no código acima.

3. Depois, salve e feche este código. Agora, ao clicar no botão Salvar para salvar esta pasta de trabalho, o conteúdo modificado do cabeçalho ou rodapé voltará automaticamente ao original se você tentar alterar o cabeçalho ou rodapé, veja a captura de tela:

Desbloqueie a Magia do Excel com o Kutools AI

• Execução Inteligente: Realize operações de células, analise dados e crie gráficos — tudo impulsionado por comandos simples.
• Fórmulas Personalizadas: Gere fórmulas sob medida para otimizar seus fluxos de trabalho.
• Codificação VBA: Escreva e implemente código VBA sem esforço.
• Interpretação de Fórmulas: Compreenda fórmulas complexas com facilidade.
• Tradução de Texto: Supere barreiras linguísticas dentro de suas planilhas.

Potencialize suas capacidades no Excel com ferramentas alimentadas por IA. Baixe Agora e experimente uma eficiência como nunca antes!