Home » ワードマクロ・Word VBAの使い方 » 今日の日付を入力するWordマクロ

今日の日付を入力するWordマクロ

動作検証バージョン：Windows 11 Home + 64bit Word バージョン 2402（ビルド17328.20000クイック実行）ベータチャネル

「word マクロ 例 今日の日付」
といった検索でアクセスがありました。

文書の先頭に今日の日付を入力するサンプル

さまざまな書き方が考えられますが、応用しやすい例をあげるなら、以下のマクロでしょう。

Sub 今日の日付を入力する_基本()
　ActiveDocument.Range(0, 0).Text = Date
End Sub

上記のマクロを実行すると、アクティブ文書の先頭に「2024/02/08」といった形式の日付が入力されます。

拙著『Excel VBAユーザーのためのWord VBA入門（1）』の、「3-2. Document.RangeメソッドでRangeを取得する」でも解説している、アクティブなWord文書の先頭を表すWord.Rangeオブジェクトを「ActiveDocument.Range(0, 0)」で取得して、

ActiveDocument.Range(0, 0).Text = Date

Range.Textプロパティを経由して今日の日付を入力しています。

ActiveDocument.Range(0, 0).Text = Date

今日の日付を取得しているのは、代入文の右辺で使っているVBAのDate関数です。

文書の末尾に今日の日付を入力するサンプル

上記のコードを応用した例もご紹介しておきましょう。
アクティブ文書の末尾に「令和6年2月8日」といった書式で今日の日付を入力するWordマクロです。

Sub 今日の日付を文書の末尾に入力する_書式も設定して()
　ActiveDocument.Bookmarks("\EndOfDoc").Range.Text _
　　　= Format(Date, "ggge年m月d日")
End Sub

入力箇所を指定するRangeは、「.Bookmarks("\EndOfDoc").Range」で取得しています。

代入文の右辺で、VBAのFormat関数の第1引数に、

先ほどのシンプルな例でも使ったDate関数を指定し、第2引数にはどのような書式にするかを指示する文字列「"ggge年m月d日"」を指定しています。

Excel VBAユーザーのためのWord VBA入門（1）: Document・Range・Selectionの基本編
伊藤潔人 2021-02-17
Amazon


最終更新日時：2024-02-14 08:58

［スポンサードリンク］

Home » ワードマクロ・Word VBAの使い方 » 今日の日付を入力するWordマクロ

『インストラクターのネタ帳』では、2003年10月から平日のほぼ毎日、Microsoft Officeの使い方などを紹介し続けています。
日経BP社から出版された、Excel VBAユーザー向けのPython超入門書です↓↓ 上記の『Excel VBAユーザーのためのPythonプログラミング』の元になったキンドル本です↓↓ 小数とPythonのdecimalモジュールの基本をキンドル本としてまとめました↓↓ Pythonの文字列フォーマットの基本をキンドル本としてまとめました↓↓ 『インストラクターのネタ帳』を運営する伊藤潔人が、初めて書かせていただいた書籍です↓↓ PowerPoint VBA本は、実はオブジェクトブラウザーの使い方を徹底的に解説した本です↓↓ 図形を操作するExcel VBAの基本を解説したキンドル本を出しました↓↓ グラフを操作するExcel VBAの基本を解説したキンドル本です↓↓ Excel VBAユーザーを対象とした、Word VBAの入門書をキンドル本として出しました↓↓ 数式を使った条件付き書式設定が苦手な方に向けたKindle本を書きました↓↓ Pythonの外部ライブラリOpenPyXL（オープンパイエクセル）の入門書を、Excel VBAユーザーに向けに書きました↓↓
3年前(2021年4月)の
人気記事
1位:Windows 10で手書き入力するIMEパッドを表示するには
2位:IF関数で○○以上××以下という条件を指定する
3位:右から（後から・末尾から）n文字を削除したい
4位:IF関数で空白なら空白にする
5位:COUNTIF関数で「○○以上」「○○以下」の指定
6位:IF関数で空白でない場合・空白でなければの書き方
7位:左から（前から・先頭から）n文字削除する方法



「ワードマクロ・Word VBAの使い方」の記事一覧

検索


Copyright © インストラクターのネタ帳 All Rights Reserved.

.