|
こんにちは。
複数行をグループ化した状態で、折りたたんだり展開したときに、マクロを実行したいと思っているのですが、何か良い方法はないでしょうか。
シートモジュールで、以下のようにして試してみたのですが、折りたたんでも展開しても、何も反応しませんでした。
Private Sub Worksheet_Activate()
MsgBox "a"
End Sub
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
MsgBox "b"
End Sub
Private Sub Worksheet_BeforeRightClick(ByVal Target As Range, Cancel As Boolean)
MsgBox "c"
End Sub
Private Sub Worksheet_Calculate()
MsgBox "d"
End Sub
Private Sub Worksheet_Change(ByVal Target As Range)
MsgBox "e"
End Sub
Private Sub Worksheet_Deactivate()
MsgBox "f"
End Sub
Private Sub Worksheet_FollowHyperlink(ByVal Target As Hyperlink)
MsgBox "g"
End Sub
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
MsgBox "h"
End Sub
よろしくお願いします。
|
|