> 2018/06/14 (木) 00:25:33 ◆ ▼ ◇ [misao]> > VBA詳しい人いる?(;´Д`)ちょっと教えて欲しい事があるんだ
> なんでもきいてくれ(´ー`)
エクセルの右クリックメニューにマクロ1ってメニューを追加して
更にその下の階層にマクロ2ってメニューを追加したいんだ(;´Д`)
どの階層もメニューを選択してマウスクリックで実行する様にしたいんだけど
これだとマクロ1の項目にマウスを当てただけでmacro1が勝手に実行されてしまうんだ
ちなみにmacro2は正常にマウスクリックで実行される
Sub auto_open()
'メニュー追加
With CommandBars("cell").Controls.Add(Before:=1, Type:=msoControlPopup)
.Caption = "マクロ1"
.OnAction = "macro1"
With .Controls.Add
.Caption = "マクロ2"
.OnAction = "macro2"
End With
End With
参考:2018/06/14(木)00時09分30秒