Hur sparar jag Word-dokument med aktuellt datum i filnamn?
Författare: Xiaoyang Senast ändrad: 2024-08-26
Om du behöver lägga till det aktuella datumet i filnamnet automatiskt när du sparar ett Word-dokument, hur skulle du kunna hantera den här uppgiften i Word-filen?
Spara ett Word-dokument med aktuellt datum i filnamn med VBA-kod
Spara ett Word-dokument med aktuellt datum i filnamn med VBA-kod
För att automatiskt lägga till det aktuella datumet i filnamnet när du sparar Word-dokumentet, gör följande:
1. Håll ner ALT + F11 nycklar för att öppna Microsoft Visual Basic för applikationer fönster.
2. Och klicka sedan på Insert > Modulerna, kopiera och klistra in koden nedan i den öppnade tomma modulen:
VBA-kod: Spara ett Word-dokument med aktuellt datum i filnamnet
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. Efter att ha klistrat in koden i modulen, tryck F5 nyckel för att köra den här koden och en Spara som fönstret visas med det aktuella datumet automatiskt i Filnamn textruta, se skärmdump:
4. Och sedan behöver du bara skriva ditt eget filnamn som du behöver, se skärmdump:
Gör mer på kortare tid med AI-förbättrade Kutools för Word
Kutools för Word är inte bara en uppsättning verktyg - det är en smart lösning utformad för att öka din produktivitet. Med AI-drivna funktioner och de viktigaste funktionerna hjälper Kutools dig att åstadkomma mer på kortare tid:
- Sammanfatta, skriv om, komponera och översätt innehåll direkt.
- Korrekturläs text i realtid med grammatik, skiljetecken och stilförslag medan du skriver.
- Omformulera och översätt innehåll samtidigt som layout, stil och struktur hålls orörda.
- Översätt ditt innehåll till över 40 språk med lätthet och utöka din räckvidd globalt.
- Få omedelbar hjälp och intelligenta insikter baserat på ditt aktuella dokumentinnehåll.
- Fråga hur man slutför en uppgift - som att ta bort avsnittsbrytningar - så kommer AI:n att vägleda dig eller göra det åt dig.
- Redigera känslig eller konfidentiell information på några sekunder för att säkerställa fullständig integritet.
- Alla verktyg fungerar sömlöst i Word, alltid inom räckhåll.
- Skapa, förfina, översätt, sammanfatta och säkra dokument utan ansträngning.
- Förbättra grammatik, klarhet och ton när du skriver i realtid.
- Omformulera och översätt innehåll utan ändringar i layout eller format.
- Fråga hur man slutför en uppgift - som att ta bort avsnittsbrytningar - så kommer AI:n att vägleda dig eller göra det åt dig.
- Alla verktyg fungerar sömlöst i Word, alltid inom räckhåll.
Lär dig mer om Kutools för Word Hämta hem nu
Bästa kontorsproduktivitetsverktyg
Kutools för Word - 100+ verktyg för Word
