Excelで，特定のシートを開いたときにメッセージボックスを表示するに

質問

Excelで，特定のシートを開いたときにメッセージボックスを表示するには？

Excelを使用しているときに，例えばSheet3を開いたとき，メッセージボックスが開くようにしたいです。
個人的に考えているのは，そのシートの「コードの表示」で現れるVisual Basicの部分に

Private Sub Worksheet_Open()
YesNo = MsgBox("メッセージ。よろしいですか？", vbYesNo)
If YesNo = vbYes Then
End If

このようなマクロを入れるといいのかと思いましたが動きません。
どこが間違っているのでしょうか？

回答No.1

aloha8761 · ベストアンサー

worksheetにはOpenイベントはありません

Private Sub Worksheet_Activate()

です

YesNoについては変数の宣言をしましょう

お礼

ありがとうございます。

勉強になりました。