トップ > 資格を活かすには > やってみよう!Excel VBAで業務改善! > 揺るぎない力編: 第23話「わかれば、おもしろい!」2/4 :テスト用のマクロブック

やってみよう!Excel VBAで業務改善! 新たなる挑戦編|第23話 「わかれば、おもしろい!」

テスト用のマクロブック

「できた!これを見てください」 画面に、八木くんが作成したテスト用のマクロブックが表示されています。

「このブックには、"Sheet1"と"Sheet2"の、2つのワークシートがあります。
"Sheet1"のモジュールには、次のイベントプロシージャが記述してあります」

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

    MsgBox "Worksheet_SelectionChangeが呼び出されました"

End Sub

泉先輩が、どれどれといった感じで画面をのぞきこみます。

「これは、Sheet1シートの選択範囲が変更されたときに実行されるイベントですね。
セルの選択範囲が変更されるたびに、"Worksheet_SelectionChangeが呼び出されました"
のメッセージが表示されるのでしょう?」
「すばらしい!その通りです。
…で、ブックのモジュールには、次のコードが記述されています」

Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Range)

    MsgBox "Workbook_SheetSelectionChangeが呼び出されました"

End Sub

「これは、すべてのワークシートで利用できるイベントね。
さっきと同じ、シートの選択範囲が変更されたときに、
今度は"Workbook_SheetSelectionChangeが呼び出されました"のメッセージを表示するのね」
「はい。その通りです。
では、Sheet1シートの選択範囲を変更したとき、どうなると思います?」

一覧にもどる