Comment enregistrer un document Word avec la date actuelle dans le nom de fichier ?
Author: Xiaoyang Last Modified: 2025-05-27
Si vous devez ajouter automatiquement la date actuelle dans le nom de fichier lors de l'enregistrement d'un document Word, comment pourriez-vous gérer cette tâche dans un fichier Word ?
Enregistrer un document Word avec la date actuelle dans le nom de fichier à l'aide d'un code VBA
Enregistrer un document Word avec la date actuelle dans le nom de fichier à l'aide d'un code VBA
Pour ajouter automatiquement la date actuelle dans le nom de fichier lors de l'enregistrement du document Word, veuillez suivre les étapes ci-dessous :
1. Maintenez les touches ALT + F11 enfoncées pour ouvrir la fenêtre Microsoft Visual Basic for Applications.
2. Ensuite, cliquez sur Insérer > Module, copiez et collez le code ci-dessous dans le module vide ouvert :
Code VBA : Enregistrer un document Word avec la date actuelle dans le nom de fichier
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. Après avoir collé le code dans le module, appuyez sur la touche F5 pour exécuter ce code, et une fenêtre Enregistrer sous s'affiche avec la date actuelle automatiquement insérée dans la zone de texte Nom du fichier, voir capture d'écran :
4. Ensuite, il vous suffit de taper votre propre nom de fichier selon vos besoins, voir capture d'écran :
Faites plus en moins de temps avec Kutools pour Word amélioré par l'IA
Kutools pour Word n'est pas seulement un ensemble d'outils - c'est une solution intelligente conçue pour augmenter votre productivité. Avec des fonctionnalités pilotées par l'IA et les fonctionnalités les plus essentielles, Kutools vous aide à accomplir plus en moins de temps :
- Résumez, réécrivez, composez et traduisez du contenu instantanément.
- Relisez le texte en temps réel avec des suggestions de grammaire, de ponctuation et de style pendant que vous écrivez.
- Reformulez et traduisez du contenu tout en conservant la mise en page, le style et la structure intacts.
- Traduisez votre contenu dans plus de 40 langues facilement, élargissant ainsi votre portée mondiale.
- Recevez une aide instantanée et des informations intelligentes basées sur le contenu de votre document actuel.
- Demandez comment effectuer une tâche - comme supprimer des sauts de section - et l'IA vous guidera ou le fera pour vous.
- Expurgez des informations sensibles ou confidentielles en quelques secondes pour assurer une confidentialité totale.
- Tous les outils fonctionnent de manière transparente dans Word, toujours à portée de main.
- Créez, affinez, traduisez, résumez et sécurisez des documents sans effort.
- Améliorez la grammaire, la clarté et le ton en temps réel pendant que vous écrivez.
- Reformulez et traduisez du contenu sans changer la mise en page ou la mise en forme.
- Demandez comment effectuer une tâche - comme supprimer des sauts de section - et l'IA vous guidera ou le fera pour vous.
- Tous les outils fonctionnent de manière transparente dans Word, toujours à portée de main.
En savoir plus sur Kutools for Word Télécharger maintenant
Meilleurs outils de productivité pour Office
Kutools pour Word - 100+ outils pour Word
