Como salvar um documento do Word com a data atual no nome do arquivo?
Author: Xiaoyang Last Modified: 2025-08-06
Se você precisar adicionar automaticamente a data atual ao nome do arquivo ao salvar um documento do Word, como você lidaria com essa tarefa no arquivo do Word?
Salvar um documento do Word com a data atual no nome do arquivo usando código VBA
Salvar um documento do Word com a data atual no nome do arquivo usando código VBA
Para adicionar automaticamente a data atual ao nome do arquivo ao salvar o documento do Word, 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 em Inserir > Módulo, copie e cole o código abaixo no módulo em branco aberto:
Código VBA: Salvar um documento do Word com a data atual no nome do arquivo
Public Sub FileSave1()
Dim xDlg As Dialog
Dim xTitle As String
On Error Resume Next
xTitle = ActiveDocument.BuiltInDocumentProperties("Title").Value
xTitle = xTitle & " " & Format((Year(Now() + 1) Mod 100), "20##") & "-" & _
Format((Month(Now() + 1) Mod 100), "0#") & "-" & _
Format((Day(Now()) Mod 100), "0#")
Set xDlg = Dialogs(wdDialogFileSaveAs)
xDlg.Name = xTitle
xDlg.Show
End Sub
3. Após colar o código no módulo, pressione a tecla F5 para executar este código, e uma janela Salvar Como será exibida com a data atual automaticamente inserida na caixa de texto Nome do Arquivo, veja a captura de tela:
4. Depois disso, basta digitar o nome do seu arquivo conforme necessário, veja a captura de tela:
Faça Mais em Menos Tempo com o Kutools para Word Aprimorado por IA
O Kutools para Word não é apenas um conjunto de ferramentas - é uma solução inteligente desenvolvida para aumentar sua produtividade. Com recursos impulsionados por IA e os recursos mais essenciais, o Kutools ajuda você a realizar mais em menos tempo:
- Resuma, reescreva, componha e traduza conteúdo instantaneamente.
- Corrija o texto em tempo real com sugestões de gramática, pontuação e estilo enquanto você escreve.
- Reformule e traduza o conteúdo mantendo o layout, estilo e estrutura intactos.
- Traduza seu conteúdo para mais de 40 idiomas facilmente, expandindo seu alcance globalmente.
- Receba ajuda instantânea e insights inteligentes com base no conteúdo do documento atual.
- Pergunte como concluir uma tarefa - como remover quebras de seção - e a IA irá guiá-lo ou fazer isso por você.
- Censure informações sensíveis ou confidenciais em segundos para garantir privacidade total.
- Todas as ferramentas funcionam perfeitamente dentro do Word, sempre ao alcance.
- Crie, refine, traduza, resuma e proteja documentos sem esforço.
- Melhore a gramática, clareza e tom enquanto escreve em tempo real.
- Reformule e traduza o conteúdo sem alterações no layout ou formatação.
- Pergunte como concluir uma tarefa - como remover quebras de seção - e a IA irá guiá-lo ou fazer isso por você.
- Todas as ferramentas funcionam perfeitamente dentro do Word, sempre ao alcance.
Saiba mais sobre o Kutools para Word Baixar Agora
Melhores Ferramentas de Produtividade para Escritório
Kutools para Word – 100+ ferramentas para Word
