- 締切済み
エクセルのメニューバーやツールバーを非表示にする方法
自分なりにエクセルファイルを作成してきましたが、できれば、メニューバーやツールバーを非表示にしたいと考え、一念発起しました。そして、下のサイトで、答えらしきものを見つけました。具体的には、『メニューを非表示にするには CommandBars オブジェクトの Enabled プロパティをFalse に設定します。再表示する場合は Enabled プロパティを True に設定します。ワークシートメニューを非表示にするには以下のように記述します。』と記載されています。しかし、具体的にどういうことなのか、さっぱり分かりません。ちなみに、マクロ経験は、本を見ながら、必要なものを記入したことがある程度です。どうぞ御指南の程をお願い申し上げます。 http://support.microsoft.com/kb/408057/ja
- Papachanpa
- お礼率100% (2/2)
- オフィス系ソフト
- 回答数1
- ありがとう数2
- みんなの回答 (1)
- 専門家の回答
みんなの回答
- hallo-2007
- ベストアンサー率41% (888/2115)
この手の操作は注意が必要ですので ツールバーの表示=>ツールバー=>フォームのウィザードで ボタンを2つ配置してください。 それぞれのボタンを右クリック=>マクロの登録 新規作成でVBエディター起動して Sub ボタン2_Click() Application.CommandBars("Worksheet Menu Bar").Enabled = True Application.CommandBars("Standard").Visible = True End Sub と Sub ボタン1_Click() Application.CommandBars("Worksheet Menu Bar").Enabled = False Application.CommandBars("Standard").Visible = False End Sub をコピィして閉じる。2つのボタンを押してみてください。
関連するQ&A
- ユーザー設定ツールバーの表示位置
以下のコードでブックに登録したツールバー 「設定1」のみを表示することに成功しましたが なぜかツールバーがシートの下部(シートタブの下)に 表示されてしまいます。 上に移動して保存しても、再度開くと下に表示されます。 上部(もしくは左部)に表示させたい場合はどのようにしたら良いのでしょうか?よろしくお願いします。 For Each MyCommandBar In CommandBars MyCommandBar.Enabled = False Next '数式バーを非表示 'Application.DisplayFormulaBar = False CommandBars("設定1").Enabled = True CommandBars("設定1").Visible = True
- ベストアンサー
- オフィス系ソフト
- Excelのメニューバーを表示させる方法を教えて下さい。
以前無料のソフトをダウンロードしたときに、 Excelのメニューバーが消えてしまいました。 (ツールバーは残っています。) 結局、そのソフトはすぐに削除したのですがメニューバーは消えたまま。 その時は何か設定を変えるだけで戻るだろうと軽く考え、 そのままにしてしまいました。 やはり、メニューバーがないと不便なので戻そうと思い、 Officeを一旦削除して、再インストールしました。 それでも、メニューバーは消えたまま。 Microsoftのサポートサービスで検索したところ、 メニューを再表示するには、 「CommandBarsオブジェクトのEnbledプロパティをTrueに設定する」 となっていました。 ところが、知識が無いため何をどうしたらいいのか、さっぱり分かりません。 どなたか、教えていただけないでしょうか? OSはWinXP HOME、OfficeはXP Personalです。 別にAccess2002もインストールしてあります。
- ベストアンサー
- オフィス系ソフト
- メニューバーを非表示に 2007
エクセル2007です。 Application.CommandBars("Worksheet Menu Bar").Enabled = False をしてもメニューバーが非表示になりません。 画像の部分を非表示にしたいです。 そもそもこれはメニューバーではないのでしょうか?
- ベストアンサー
- オフィス系ソフト
- メニューバーを非表示にしたい
アクセス2007です。 メニューバー?リボンと言うのでしょうか? その部分を非表示にするにはどうすればいいですか? 標準モジュールに Sub test() CommandBars("Menu Bar").Enabled = False End Sub をしてみましたが何も起きません。 ご教授よろしくお願いします。
- 締切済み
- オフィス系ソフト
- Access2003のメニューバー非表示について
Application.CommandBars("Menu Bar").Enabled = False のようにするとメニューバーを非表示にすることができると思うのですが、これはだめなのでしょうか? 私の環境では終了したあと設定は元に戻っていて、問題ないのですが、ある環境では設定が戻らず別のAccessファイルを開いたときにメニューバーが消えたままになってしまうようです。 このコードは記述したAccess内だけで適用されてると思っていたのですが、ちがうのでしょうか? また、一般的にはメニューバー非表示処理はどのようにするのでしょうか?
- 締切済み
- その他(プログラミング・開発)
- VBAでメニューバーの一部だけを非表示にしたい
access2003です。 CommandBars("Menu Bar").Enabled = False これだとメニューバー全てが非表示になってしまいますが 例えば「編集(E)」だけ非表示にしたい場合は どのようなVBAコードを作ればいいのでしょうか? アドバイスよろしくお願い致します。
- ベストアンサー
- オフィス系ソフト
- ユーザー設定ツールバーのみ表示したい
ファイルを起動したときに、 ブックに添付したユーザー設定ツールバーのみを表示させ、終了時にファイル起動前のツールバー設定に戻すにはどうしたら良いのでしょうか? 現在 Dim MyCommandBar As CommandBar For Each MyCommandBar In CommandBars MyCommandBar.Enabled = False Next のコードで標準ツールバーを全て表示しないようにしているのですが、このコードではブックに添付したユーザー設定ツールバーをVisible=Trueにしても表示できないようです。 困っています、よろしくお願いします。
- ベストアンサー
- オフィス系ソフト
- エクセルのメニューバーの非表示方法は?
ユーザー設定でワークシートメニューバーのチェックを外すとその時だけは消えますが、ユーザー設定のウィンドウを閉じると元どおり表示されてしまいます。 またマクロで Application.CommandBars("Worksheet Menu Bar").Visible = False とやるとエラーになってしまいます。 どうすれば消せるのでしょうか?
- ベストアンサー
- オフィス系ソフト
- VBA2003: 自作メニューバーを操作したい
Application.CommandBars("Worksheet Menu Bar").Controls.Add このメソッドを使って Excelのメニューバーに自作メニューを追加しました。 メニューは階層構造になっています。 Excelのシート名によって、このメニューに定義したサブメニューやコマンドを Enabled = True/False で表示制御したいのですが、その方法がわかりません。 よろしくお願いします。
- ベストアンサー
- Visual Basic
- ExcelVBAでのメニューバーのコントロール
ExcelVBAでシート編集時、元に戻す・やり直し機能を使えなくするにはどういうコーディングをすればよいのでしょうか? 現在、シート表示の初期処理で以下のようなコーディングを入れていますが、機能が使えてしまうようです。 Dim Menuobj As Object Set Menuobj = Application.CommandBars("Worksheet Menu Bar") Menuobj.Controls.Item(2).Controls.Item(1).Enabled = True Menuobj.Controls.Item(2).Controls.Item(2).Enabled = True どなたか教えてください! よろしくお願いいたします。
- 締切済み
- その他(プログラミング・開発)
お礼
hallo-2007 様 早々と御指南いただき有り難うございました。マクロ経験、未熟な私でも 実行できました。 自分の作成したファイルを配布するに当たり、形式をいじられないで済み ますし、それよりも何よりも、数日検索していても解決できなかったことをい とも簡単にお教えいただき、とにかく感激しております。心より感謝申し上げ ます。