Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


48685 / 76732 ←次へ | 前へ→

【32981】右クリックメニュー追加について
質問  ひろ  - 05/12/28(水) 14:25 -

引用なし
パスワード
   皆さんこんにちは。
以下のマクロで普通であれば右クリックメニュー項目が追加されます。

実際、私のPCではそうなのですが
他の方のPCでは表示されない場合があります。

エクセルのバージョンやOSが異なる方の中で
本マクロによる右クリックメニューが追加される方、追加されない方がいるため
原因がわかりません。

どういったことが考えられるのでしょうか。
意味がわからず行き詰っています…。

もちろん、「マクロは有効にする」に設定しています。


Sub AddRightMenu()

  For Each RightMenu In Application.CommandBars("cell").Controls
    If RightMenu.Caption = "移動" Then
      Exit Sub
    End If
  Next

  With Application.CommandBars("cell").Controls.Add(temporary:=True)
    .Caption = "移動"
    .BeginGroup = True
    .OnAction = "MoveMac"
  End With

End Sub

0 hits

【32981】右クリックメニュー追加について ひろ 05/12/28(水) 14:25 質問
【32987】Re:右クリックメニュー追加について Jaka 05/12/28(水) 15:27 回答
【33003】Re:右クリックメニュー追加について ひろ 05/12/28(水) 17:50 質問

48685 / 76732 ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free