Word 文書を保存する際に、ファイル名に現在の日付を含めるにはどうすればよいですか？ Word 文書を保存する際にファイル名に自動的に現在の日付を追加したい場合、Word 内でこの処理をどのように行えばよいでしょうか？
VBA コードを使用してファイル名に現在の日付を含めてWord 文書を保存する
VBA コードを使用してファイル名に現在の日付を含めてWord 文書を保存する Word 文書を保存する際に、ファイル名に自動的に現在の日付を追加するには、以下の手順に従ってください。
1 ．次に、ALT + F11 キーを押して、Microsoft Visual Basic for Applications ウィンドウを開きます。
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 なら、短時間でより多くの成果を実現できます：
コンテンツを即座に要約、書き直し、作成、翻訳できます。 執筆中に、文法・句読点・文体に関する提案に基づき、テキストをリアルタイムで校正します。 レイアウト、スタイル、構造をそのまま維持しながら、コンテンツの言い換えや翻訳が可能です。 40 か国語以上への簡単な翻訳で、グローバルなリーチをさらに広げられます。 現在の文書のコンテンツに基づいた即時サポートとインテリジェントなインサイトをすぐにご利用いただけます。 「セクション区切りを削除する方法」など、タスクのやり方を尋ねると、AI が手順を案内したり、代わりに実行したりします。 機密情報やセンシティブなデータを数秒で赤字で塗りつぶし（レダクト）し、完全なプライバシーを実現します。 すべてのツールがWord 内でシームレスに動作し、いつでもすぐに使える場所にあります。 ドキュメントの作成、推敲、翻訳、要約、保護が簡単にこなせます。 執筆中に、文法・明瞭さ・トーンをリアルタイムで改善します。 レイアウトや書式をまったく変更することなく、コンテンツの言い換えや翻訳が可能です。 「セクション区切りを削除する方法」など、タスクのやり方を尋ねると、AI が手順を案内したり、代わりに実行したりします。 すべてのツールがWord 内でシームレスに動作し、いつでもすぐそばに。 詳細はこちら Kutools for Word について 今すぐダウンロード
Office Tab – Office にタブ付きインターフェースを導入し、作業を大幅に簡単に Word、Excel、PowerPoint、Publisher、Access、Visio、Project でタブを使った編集・閲覧機能を有効にします。 複数のドキュメントを、新しいウィンドウではなく、同じウィンドウ内の新しいタブで開いたり作成したりできます。 日々の生産性を50％も向上させ、毎日数百回のマウスクリックをカットします！
✨ Kutools for Office – 1 回のインストールで、5 つの強力なツールがすぐに使える！ 含まれるもの：Office Tab Pro ・Kutools for Excel ・Kutools for Outlook ・Kutools for Word ・Kutools for PowerPoint
📦 1 つのスイートですべての5 ツールを入手｜🔗 Microsoft Office とシームレスに連携｜⚡ 保存時間して、すぐに生産性を向上
最高のオフィス生産性ツール Kutools for Word – Word 向けの100+ツール
