Wordで書類を作成している際、「更新日」などの日付を毎回手入力するのが面倒だと感じたことはありませんか？
今回は、Word VBAを使って文書の2行目に今日の日付を「更新日 2024年5月1日」の形式で自動記入する方法をご紹介いたします。
目次
実現したいこと
- Word文書の2行目（2つ目の段落）に
「更新日 yyyy年m月d日」 という形で日付を挿入 - 日付は 今日の日付を自動で取得
- テキストは 右寄せ に整形
- 手動入力の手間をなくし、書類の更新日を常に正確に反映
使用するVBAコード
以下のコードを実行すると、文書内の2番目の段落を更新し、今日の日付を挿入します。
Sub ReplaceSecondParagraphWithDate()
Dim doc As Document
Set doc = ActiveDocument
' 文書に少なくとも2つの段落があるかを確認
If doc.Paragraphs.Count >= 2 Then
Dim secondParagraph As Paragraph
Set secondParagraph = doc.Paragraphs(2)
' 今日の日付を「yyyy年m月d日」の形式で取得
Dim formattedDate As String
formattedDate = Format(Date, "yyyy年m月d日")
' 2行目のテキストを「更新日 yyyy年m月d日」で上書き
secondParagraph.Range.Text = "更新日 " & formattedDate & vbCrLf
' 右寄せに設定
secondParagraph.Range.ParagraphFormat.Alignment = wdAlignParagraphRight
Else
MsgBox "文書には2つ以上の段落が必要です。"
End If
End Sub
補足ポイント
Format(Date, "yyyy年m月d日") の意味
- 現在の日付（
Date）を、「2024年5月1日」のような形式に整えます yyyy＝年、m＝月、d＝日を意味し、日本語表記に適しています
vbCrLf で改行を明示
- 段落の末尾に
vbCrLf（改行コード）を付けることで、次の段落と衝突しないように処理 - Wordの段落として正しく機能させるための措置です
wdAlignParagraphRight で右寄せ
ParagraphFormat.AlignmentをwdAlignParagraphRightに設定することで、段落全体を右揃えに- 書類の見た目を整えるのに効果的です
注意点
- 本マクロは「2行目の内容を完全に上書き」します
→ すでにテキストが入力されている場合は失われるため、重要な情報がある場合は事前に保存・退避してください - 2段落未満の文書ではエラー回避のためメッセージを表示して処理を中止します
まとめ
Word VBAを使えば、「更新日」のようなルーティン入力を自動化できます。
- 文書の2段落目に「更新日 yyyy年m月d日」を右寄せで挿入
- 書類の更新日時を常に最新状態に保てる
- 手動ミスの防止や作業効率化に非常に有効
Wordベースの業務報告書や提案資料などで、日付を毎回記入している方は、ぜひこの自動化コードをお試しください。
副業から独立まで「稼げる」Webスキルを習得する（PR）
ここまで読んでいただきありがとうございます。 最後に宣伝をさせてください。
「副業を始めたいが、何から手をつければいいかわからない」「独学でスキルはついたが、収益化できていない」という悩みを持つ方には、マンツーマン指導のWebスクール**「メイカラ」**が適しています。
このスクールは、単に技術を教えるだけでなく、**「副業として具体的にどう稼ぐか」**という実務直結のノウハウ提供に特化している点が特徴です。
講師陣は、実際に「副業Webライターから1年で独立して月収100万円」を達成したプロや、現役で利益を出し続けているブロガーなど、確かな実績を持つプレイヤーのみで構成されています。そのため、机上の空論ではない、現場で通用する戦術を学ぶことができます。
副業に特化した強み
- 最短ルートの提示: 未経験からでも実績を出せるよう、マンツーマンで指導。
- AI活用の習得: 副業の時間対効果を最大化するための、正しいAI活用スキルも網羅。
- 案件獲得のチャンス: 運営がWebマーケティング会社であるため、実力次第で社内案件の紹介など、仕事に直結する可能性があります。
受講者の多くは、「在宅でできる仕事を探している」「副業を頑張りたい」という20代・30代・40代が中心です。
受講前には、講師による無料説明が行われます。無理な勧誘はなく、自分に合った副業スタイルやプランを相談できるため、まずは話を聞いてみることから始めてみてはいかがでしょうか。
