Ir para o conteúdo principal

Como especificar o formato de data ou data e hora no cabeçalho ou rodapé?

Autor: Xiao Yang Última modificação: 2024-09-12

Normalmente, quando você insere data ou hora no cabeçalho ou rodapé com o &[Encontro] or &[Tempo] código, o formato de data ou hora é baseado nas configurações regionais controladas pelo Windows. Nesse caso, como você poderia alterar o formato de data ou hora conforme sua necessidade no cabeçalho ou rodapé, conforme mostrado a seguir?

formatar data no cabeçalho

Especifique o formato de data ou hora no cabeçalho ou rodapé com o código VBA


seta azul bolha direita Especifique o formato de data ou hora no cabeçalho ou rodapé com o código VBA

Aqui, vou apresentar alguns códigos VBA simples para você resolver essa tarefa no Excel, faça o seguinte:

1. Ative a planilha que deseja inserir e formate a data no cabeçalho ou rodapé e clique em layout de página botão no canto inferior direito da pasta de trabalho para habilitar a visualização do layout da página, veja a captura de tela:

clique no botão Layout da página para habilitar a visualização do layout da página

2. Segure o ALT + F11 chaves no Excel para abrir o Microsoft Visual Basic para Aplicações janela.

3. Clique inserção > Móduloe cole o seguinte código no Módulo Janela.

Código VBA: insira e formate a data no cabeçalho ou rodapé:

Sub add_date_header()
ActiveSheet.PageSetup.CenterHeader = Format(Date, "mmmm dd, yyyy")
End Sub

Note: No código acima, você pode alterar o Cabeçalho central para Cabeçalho esquerdo, CentroRodapé…, E o formato da data mmmm dd, aaaa também pode ser alterado conforme necessário.

4. E, em seguida, pressione F5 para executar este código, e seu formato de data especificado foi inserido no cabeçalho ou rodapé de uma vez. Veja a imagem:

execute o código para obter o formato de data especificado no cabeçalho ou rodapé

Tips: Se você deseja inserir seu próprio formato de data e hora no cabeçalho ou rodapé, aplique o código a seguir:

Sub Change_Format()
  ActiveSheet.PageSetup.CenterHeader = Format(Now, "MMMM DD, YYYY HH:MM:SS")
End Sub

E você obterá o seguinte resultado:

execute o código para obter o formato de data e hora especificado no cabeçalho ou rodapé

uma captura de tela do kutools para excel ai

Desbloqueie o Excel Magic com Kutools AI

  • Execução Inteligente: execute operações em células, analise dados e crie gráficos, tudo orientado por comandos simples.
  • Fórmulas personalizadas: gere fórmulas personalizadas para agilizar seus fluxos de trabalho.
  • Codificação VBA: Escreva e implemente código VBA sem esforço.
  • Interpretação de Fórmula: Entenda fórmulas complexas com facilidade.
  • Tradução do texto: Quebre as barreiras linguísticas nas suas planilhas.
Aprimore seus recursos do Excel com ferramentas baseadas em IA. Faça o download e experimente eficiência como nunca antes!

Melhores ferramentas de produtividade de escritório

🤖 Assistente de IA do Kutools: Revolucionar a análise de dados com base em: Execução Inteligente   |  Gerar Código  |  Crie fórmulas personalizadas  |  Analise dados e gere gráficos  |  Invocar funções do Kutools...
Recursos mais comuns: Encontre, destaque ou identifique duplicatas   |  Excluir linhas em branco   |  Combine colunas ou células sem perder dados   |   Rodada sem Fórmula ...
Super pesquisa: VLookup de múltiplos critérios    VLookup de múltiplos valores  |   VLookup em várias planilhas   |   Pesquisa Difusa ....
Lista suspensa avançada: Crie rapidamente uma lista suspensa   |  Lista suspensa de dependentes   |  Lista suspensa de seleção múltipla ....
Gerenciador de colunas: Adicione um número específico de colunas  |  Mover colunas  |  Alternar status de visibilidade de colunas ocultas  |  Compare intervalos e colunas ...
Recursos em destaque: Foco da Grade   |  Vista de Design   |   Grande Barra de Fórmula    Gerenciador de pastas de trabalho e planilhas   |  Biblioteca (Auto texto)   |  Data Picker   |  Combinar planilhas   |  Criptografar/Descriptografar Células    Enviar e-mails por lista   |  Super Filtro   |   Filtro Especial (filtro negrito/itálico/tachado...) ...
15 principais conjuntos de ferramentas12 Texto Ferramentas (Adicionar texto, Remover Personagens, ...)   |   50+ de cores Tipos (Gráfico de Gantt, ...)   |   Mais de 40 práticos Fórmulas (Calcule a idade com base no aniversário, ...)   |   19 Inclusão Ferramentas (Insira o código QR, Inserir imagem do caminho, ...)   |   12 Conversão Ferramentas (Números para Palavras, Conversão de moedas, ...)   |   7 Unir e dividir Ferramentas (Combinar linhas avançadas, Dividir células, ...)   |   ... e mais

Aprimore suas habilidades de Excel com o Kutools para Excel e experimente uma eficiência como nunca antes. Kutools para Excel oferece mais de 300 recursos avançados para aumentar a produtividade e economizar tempo.  Clique aqui para obter o recurso que você mais precisa...


Office Tab traz interface com guias para o Office e torna seu trabalho muito mais fácil

  • Habilite a edição e leitura com guias em Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
  • Abra e crie vários documentos em novas guias da mesma janela, em vez de em novas janelas.
  • Aumenta sua produtividade em 50% e reduz centenas de cliques do mouse para você todos os dias!