みんなの「教えて(疑問・質問)」にみんなで「答える」Q&Aコミュニティ

こんにちはゲストさん。会員登録(無料)して質問・回答してみよう!

解決済みの質問

エクセルVBAについて、ある領域の中のセルが変化したらマクロが実行され

エクセルVBAについて、ある領域の中のセルが変化したらマクロが実行される方法を教えて下さい。
下記のようなイメージです。

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If ActiveCell.Columns("A:A") Then

上記のようなイメージで2通り教えて下さい。
・A列が選択された時
・A列のうちで例えばA3セル以降が選択された時

宜しくお願いします。

投稿日時 - 2010-04-30 11:55:04

QNo.5861579

すぐに回答ほしいです

質問者が選んだベストアンサー

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Column = 1 Then MsgBox "A列です"
If Target.Column = 1 And Target.Row > 3 Then MsgBox "3行目以降です"
End Sub
こんな感じのことでしょうか。

投稿日時 - 2010-04-30 22:49:47

このQ&Aは役に立ちましたか?

14人が「このQ&Aが役に立った」と投票しています

回答(2)

ANo.1

Select Case True
Case Not Intersect(Target, Range("b:b")) Is Nothing
MsgBox "池田大作エロジジイ"
Case Not Intersect(Target, Range("a3:a65536")) Is Nothing
MsgBox "創価学会は日本のクズ"
End Select

投稿日時 - 2010-04-30 16:42:37

あなたにオススメの質問