現在の日付のWord文書をファイル名で保存するにはどうすればよいですか？

著者：シャオヤン最終更新日：2024年08月26日

Word文書を保存するときにファイル名に現在の日付を自動的に追加する必要がある場合、Wordファイルでこのタスクをどのように処理できますか？

VBAコードを使用してファイル名に現在の日付のWord文書を保存します

VBAコードを使用してファイル名に現在の日付のWord文書を保存します

Word文書を保存するときにファイル名に現在の日付を自動的に追加するには、次の手順を実行してください。

1。を押し続けます Alt + F11 キーを押して アプリケーション向け Microsoft Visual Basic 窓。

2。次に、をクリックします インセット > モジュール、以下のコードをコピーして、開いた空白のモジュールに貼り付けます。

VBAコード：ファイル名に現在の日付を含むWord文書を保存します

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。モジュールにコードを貼り付けた後、を押します F5 このコードを実行するためのキー、および 名前を付けて保存 ウィンドウが自動的に現在の日付で表示されます ファイル名 テキストボックス、スクリーンショットを参照：

ファイル名テキストボックスに現在の日付が入った「名前を付けて保存」ウィンドウ

4。次に、必要に応じて独自のファイル名を入力する必要があります。スクリーンショットを参照してください。

必要に応じてファイル名を編集します

AI 強化版 Kutools for Word でより短時間でより多くの作業を実行

Kutools for Word は単なるツールセットではありません。生産性を高めるために設計されたスマートなソリューションです。AI 駆動型機能と最も重要な機能を備えた Kutools は、より短時間でより多くのことを達成するのに役立ちます。

ニーズにぴったり合ったコンテンツを生成します。
20 種類以上のライティングスタイルで文章を変身させ、完璧な文章を実現します。
ワンクリックでドキュメントを要約します。
コンテンツを 40 以上の言語に簡単に翻訳し、世界規模でリーチを拡大します。
ドキュメントに関するヘルプと情報をすぐに受け取ります。
ドキュメント処理について尋ねると、Kutools にツールがある場合は、AI アシスタントがあなたの指示に従ってすぐにタスクを実行し、Word の全機能をすぐに利用できるようになります。
Word を離れることなく質問できます。シームレスに統合された AI アシスタントはいつでも利用できます。