驚愕！Excelで日付を自動入力するVBA完全ガイド

Excelで日付を自動で入力したいと思ったことはありませんか？例えば、データを入力すると同時に、関連する日付が自動的に入力されると、作業が劇的に楽になります。しかし、どうすればそれを実現できるのでしょうか？実は、VBA（Visual Basic for Applications）を使えば、そんな煩わしい手作業を一瞬で解決できる方法があるのです。

今回は、Excel初心者でも簡単に理解できるように、「Excel 日付自動入力 VBA」の使用法をわかりやすく解説します。VBAを使った日付の自動入力は、業務効率を大幅にアップさせる力強いツールです。この方法を使えば、あなたのExcel作業はさらにスムーズになりますよ！

日付自動入力のVBAを使う理由とは？
VBAコードを使って日付を自動入力する方法
Excel 日付自動入力 VBAに関する疑問解決
今すぐパソコンやスマホの悩みを解決したい！どうしたらいい？
まとめ

日付自動入力のVBAを使う理由とは？

Excelのイメージ

日付を手動で入力する作業は時間を無駄にしがちです。特に、大量のデータを扱うときにはその無駄な時間が積み重なり、作業効率が大きく低下してしまいます。そこで、VBA（Visual Basic for Applications）を使って自動化すれば、手動で日付を入力する手間が省け、時間を大幅に節約することができます。

例えば、列Aにデータを入力するたびに、列Bに自動的に現在の日付を挿入するように設定できます。これにより、データ入力と同時に日付が記録され、業務にかかる時間が効率的に短縮されます。

VBAコードを使って日付を自動入力する方法

では、実際にExcelで日付を自動的に入力するためのVBAコードをどのように設定するかを説明します。初心者でも迷わずに実行できるように、ステップごとに解説しますので、安心してください。

手順1VBAエディタを開く

まずは、日付を自動的に入力したいワークシートを開きます。そして、以下の手順でVBAエディタを開きます。

ワークシートのタブを右クリックします。
表示されたメニューから「コードの表示」を選択します。
Microsoft Visual Basic for Applications（VBA）のウィンドウが開きます。

手順2VBAコードを入力する

次に、VBAエディタ内にコードを入力します。以下のコードをVBAウィンドウにコピーして貼り付けてください。

vba

Private Sub Worksheet_Change(ByVal Target As Range)

    If Not Intersect(Target, Me.Range("A2:A15")) Is Nothing Then

        Application.EnableEvents = False

        Target.Offset(0, 1).Value = Now

        Application.EnableEvents = True

    End If

End Sub

このコードでは、A2\:A15の範囲にデータが入力された場合、その隣のB列に自動的に現在の日付と時刻が入力されます。

手順3VBAエディタを閉じて設定完了

コードを貼り付けたら、VBAエディタを保存して閉じます。その後、Excelに戻り、実際に列Aにデータを入力してみましょう。すると、列Bに自動的に日付が入力されるのを確認できます。

Excel 日付自動入力 VBAに関する疑問解決

読者からよく寄せられる質問をいくつか取り上げ、その解決策を提供します。

Q1: 自動入力される日付を変更することはできますか？

A1セルの日付を手動で変更する場合でも、VBAコードを変更すれば、必要に応じて日付のフォーマットや時間を調整することができます。例えば、日付のみを入力したい場合には、`Now`を`Date`に変更すれば、時間を省略した日付だけが表示されます。

Q2: もっと大きな範囲で自動入力をしたい場合は？

VBAコード内の範囲（この場合「A2\:A15」）を変更することで、自動入力されるセルの範囲を調整できます。例えば、A列全体に対応させるには、`Me.Range(“A2:A15”)`を`Me.Range(“A:A”)`に変更すれば、列A全体にデータが入力された場合にB列に日付が挿入されるようになります。