特定のセルがアクティブになったときのイベント？

質問

エクセルのVBAで、「あるセルの内容が変更されたらメッセージボックスを表示する」ということはなんとかできたのですが、

「あるセルを（クリックして）アクティブにしたらメッセージボックスを表示する」

この方法がわかりません。

教えてください。よろしくお願いします。

回答No.2

xls88 · ベストアンサー

SelectionChangeイベントがあります。

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Not Intersect(Target, Range("A1:A10")) Is Nothing Then
MsgBox "なんか用？"
End If
End Sub

お礼

ありがとうございました。
しようと思っていたことができました。m(_ _)m

回答No.3

BookerL

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Address <> "$A$1" Then Exit Sub
MsgBox "メッセージボックス表示"
End Sub

みたいな感じでしょうか。

お礼

ありがとうございます。
でも、書かれたものがそのままでは動きませんでした。

回答No.1

某HN クロメート(Chromate)（@CoalTar）

メッセージボックスではないですが、
入力規則の入力時メッセージの機能を使ってはどうでしょう
参考まで

お礼

どうしてもだめなら基本機能を使おうと思っていましたが、今回ＶＢＡでできたのでそちらを使ってみます。
ありがとうございました。m(_ _)m