はじめに
ExcelでVBAを使って自動化をしていると、「セルに値を入力したら、何かの処理が自動で実行されるようにしたい」というニーズはよくあります。
私の場合は、B列に文字が入力されたら、自動的に日付を入力するような処理をしたくて、その方法を調べて実装してみました。
使用するイベント:Worksheet_Change
この処理を実現するには、Worksheet_Changeイベントを使います。
これは、特定のシートでセルが変更されたときに自動的に呼び出されるイベントです。
処理の流れと準備
Visual Basic エディタを開く
- Excelの「開発」タブから「Visual Basic」をクリック
- 左側のプロジェクトエクスプローラから対象の「Sheet1」をダブルクリック
- 表示されたエディタ画面に以下のコードを貼り付けます
実際のコード(セルに文字が入ったら処理を実行)
Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect(Target, Range("B1:B100")) Is Nothing Then
Exit Sub
Else
Call 日付入力
End If
End Sub
コードの解説
1行目:Worksheet_Changeイベントの定義
Private Sub Worksheet_Change(ByVal Target As Range)
セルが変更されたときに自動的に実行されるイベントです。変更されたセルの範囲がTargetに渡されます。
2〜3行目:範囲外なら処理しない
If Intersect(Target, Range("B1:B100")) Is Nothing Then
Exit Sub
B1からB100以外のセルが変更された場合は、処理を終了します。
4〜5行目:範囲内なら処理を実行
Else
Call 日付入力
B1からB100のいずれかのセルに入力があった場合は、日付入力という別のプロシージャを呼び出します。
※ここで直接処理内容を書いても問題ありません。
6〜7行目:IF文とイベントの終了
End If
End Sub
応用のヒント
- 呼び出すプロシージャ
日付入力は、別の標準モジュールに作成しておく必要があります。 - たとえば、
Target.Offset(0, 1).Value = Dateのようにすれば、入力したセルの隣に日付を自動で入力する処理も可能です。 - 対象範囲を
B1:B100以外に変更することで、用途に応じたカスタマイズもできます。
まとめ
Excel VBAのWorksheet_Changeイベントを使えば、セルへの入力をトリガーにして、任意の処理を自動実行することが可能です。
日付の入力やログ記録など、手動で行っていた作業を簡単に自動化できるため、業務効率化にもつながります。
少しでも参考になれば幸いです。
副業から独立まで「稼げる」Webスキルを習得する(PR)
ここまで読んでいただきありがとうございます。 最後に宣伝をさせてください。
「副業を始めたいが、何から手をつければいいかわからない」「独学でスキルはついたが、収益化できていない」という悩みを持つ方には、マンツーマン指導のWebスクール**「メイカラ」**が適しています。
このスクールは、単に技術を教えるだけでなく、**「副業として具体的にどう稼ぐか」**という実務直結のノウハウ提供に特化している点が特徴です。
講師陣は、実際に「副業Webライターから1年で独立して月収100万円」を達成したプロや、現役で利益を出し続けているブロガーなど、確かな実績を持つプレイヤーのみで構成されています。そのため、机上の空論ではない、現場で通用する戦術を学ぶことができます。
副業に特化した強み
- 最短ルートの提示: 未経験からでも実績を出せるよう、マンツーマンで指導。
- AI活用の習得: 副業の時間対効果を最大化するための、正しいAI活用スキルも網羅。
- 案件獲得のチャンス: 運営がWebマーケティング会社であるため、実力次第で社内案件の紹介など、仕事に直結する可能性があります。
受講者の多くは、「在宅でできる仕事を探している」「副業を頑張りたい」という20代・30代・40代が中心です。
受講前には、講師による無料説明が行われます。無理な勧誘はなく、自分に合った副業スタイルやプランを相談できるため、まずは話を聞いてみることから始めてみてはいかがでしょうか。
