メインコンテンツへスキップ

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

Author: Xiaoyang Last Modified: 2025-08-06

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キーを押してこのコードを実行すると、「名前を付けて保存」ウィンドウが表示され、現在の日付が自動的に「ファイル名」テキストボックスに入力されます(スクリーンショット参照):

Save As window with the current date in the File name text box

4. その後、必要なファイル名を自分で入力するだけです(スクリーンショット参照):

Edit the file name as needed

AI強化されたKutools for Wordで短時間でより多くの作業を実現

Kutools for Wordは単なるツールの集合ではなく、生産性を向上させるために設計されたスマートなソリューションです。AI駆動の機能と最も重要な特徴により、Kutoolsを使えば短時間でより多くの作業を達成できます。

  • コンテンツの要約、書き直し、作成、翻訳を瞬時に実行します。
  • 執筆中に文法、句読点、スタイルに関する提案をリアルタイムで校正します。
  • レイアウト、スタイル、構造を維持しながら、文章を再構成および翻訳します。
  • 40以上の言語に簡単に翻訳でき、グローバルに影響力を広げます。
  • 現在の文書内容に基づいて即時のヘルプとインテリジェントな洞察を受け取ります。
  • セクション区切りを削除する方法など、タスクの完了方法を尋ねると、AIがガイドまたは代行して処理します。
  • 機密情報やプライバシーに関わる情報を数秒で編集し、完全なプライバシーを確保します。
  • すべてのツールはWord内でシームレスに動作し、常に手の届く場所にあります。
  • ドキュメントの作成、改善、翻訳、要約、保護を簡単に行います。
  • リアルタイムで執筆しながら、文法、明瞭さ、トーンを改善します。
  • レイアウトやフォーマットを変更せずに、コンテンツを再構成および翻訳します。
  • セクション区切りを削除する方法など、タスクの完了方法を尋ねると、AIがガイドまたは代行して処理します。
  • すべてのツールはWord内でシームレスに動作し、常に手の届く場所にあります。
Kutools for Wordについてさらに詳しく 今すぐダウンロード
Kutools for Word features

最高のオフィス生産性ツール

Kutools for Word - 100以上の優れた機能でWordの操作をさらに向上!

🤖 Kutools AI FeaturesAIアシスタント / リアルタイムアシスタント / スーパー ポリッシュ(形式を保持) / スーパー トランスレート(形式を保持) / AI編集 / AI校正...

📘 文書マスターページの分割 / 文書の結合 / 選択範囲を各種形式(PDF/TXT/DOC/HTMLなど)でエクスポート / 一括PDF変換...

内容編集複数ファイルにわたる一括検索と置換 /すべての画像のリサイズ / 表の行と列の転置 / 表をテキストに変換...

🧹 簡単クリーン:余分なスペース / セクション区切り / テキストボックス / ハイパーリンクを一掃します。その他の削除ツールは削除グループでご覧いただけます...

クリエイティブ挿入:千位区切りの挿入 / チェックボックスの挿入 / ラジオボタンの挿入 / QRコード / バーコード / 複数画像の挿入 / 他にも挿入グループにて発見...

🔍 高精度選択特定のページ / / 図形 / 見出し段落をピンポイントで選択。さらに多くの 選択 機能でナビゲーションを強化...

スター強化任意の場所へ移動 / 繰り返しテキストの自動挿入 / 複数文書ウィンドウ間の切替 /11 種類の変換ツール...

🌍 40以上の言語に対応:Kutoolsはお好みの言語でお使いいただけます―英語、スペイン語、ドイツ語、フランス語、中国語など40以上の言語をサポート!

Kutools and Kutools Plus tabs on the Word Ribbon
👉これらの機能を体験してみませんか?今すぐKutools for Wordをダウンロード!🚀
 

最高のオフィス生産性ツール

Kutools for Word - 100+ のWord用ツール