エクセルの右クリックが消えてしまいます。

質問

エクセルでVBAを使いメニューバー以外を全て非表示にしてたちあがるようにしたファイルがあります。しかし、そのファイルを立ち上げるといつもエクセルの右クリックが使えなくなります。エミディエィトウィンドゥに『CommandBars("Cell").Enabled = True』と入力し右クリックを使えるようにしているのですが、なにかほかの方法で毎回右クリックが消えないようにする方法はあるでしょうか？原因はツールバーを非表示にする事のようなのですが。。。どうしても解消できなくて困っています。よろしくお願いします。

回答No.1

merlionXX · ベストアンサー

> 原因はツールバーを非表示にする事のようなのですが。。

Auto_Openで非表示にしてるのなら、以下のようにしてみたら？

Sub Auto_Open()

For Each CB In Application.CommandBars 'メニューバー以外を非表示
If CB.Name <> "Worksheet Menu Bar" Then
CB.Enabled = False
End If
Next CB

Application.CommandBars("CELL").Enabled = True '右クリックメニューを有効に

End Sub

お礼

早速回答いただきありがとうございます！！

ちゃんとでてきました！！
感動しています！！

私ももっと勉強していきたいと思います。

本当にありがとうございました。