- ベストアンサー
ＶＢＡでメニューバーの一部だけを非表示にしたい
- みんなの回答 （2）
- 専門家の回答
質問者が選んだベストアンサー
その他の回答 (1)
- imogasi
- ベストアンサー率27% (4737/17068)
#1でご紹介のサイトを見ればわかると思うが モジュールに Sub test02() CommandBars("Menu Bar").Controls("編集(&E)").Enabled = False End Sub と (&E) が必要のようなので注意。
お礼
ありがとうございました。助かります。
関連するQ&A
- メニューバーを非表示にしたい
アクセス２００７です。 メニューバー？リボンと言うのでしょうか？ その部分を非表示にするにはどうすればいいですか？ 標準モジュールに Sub test() CommandBars("Menu Bar").Enabled = False End Sub をしてみましたが何も起きません。 ご教授よろしくお願いします。
- 締切済み
- オフィス系ソフト
- Access2003のメニューバー非表示について
Application.CommandBars("Menu Bar").Enabled = False のようにするとメニューバーを非表示にすることができると思うのですが、これはだめなのでしょうか？ 私の環境では終了したあと設定は元に戻っていて、問題ないのですが、ある環境では設定が戻らず別のAccessファイルを開いたときにメニューバーが消えたままになってしまうようです。 このコードは記述したAccess内だけで適用されてると思っていたのですが、ちがうのでしょうか？ また、一般的にはメニューバー非表示処理はどのようにするのでしょうか？
- 締切済み
- その他（プログラミング・開発）
- メニューバーを非表示に ２００７
エクセル２００７です。 Application.CommandBars("Worksheet Menu Bar").Enabled = False をしてもメニューバーが非表示になりません。 画像の部分を非表示にしたいです。 そもそもこれはメニューバーではないのでしょうか？
- ベストアンサー
- オフィス系ソフト
- VBA2003: 自作メニューバーを操作したい
Application.CommandBars("Worksheet Menu Bar").Controls.Add このメソッドを使って Excelのメニューバーに自作メニューを追加しました。 メニューは階層構造になっています。 Excelのシート名によって、このメニューに定義したサブメニューやコマンドを Enabled = True/False で表示制御したいのですが、その方法がわかりません。 よろしくお願いします。
- ベストアンサー
- Visual Basic
- エクセル2003で作成したVBAを2007で使用したい
エクセル2003で下記のようなVBAを作成していました。 作成した物を使用者が印刷設定を変更できないように ブックを開くと同時に印刷ボタンなどを非表示にしていたのですが・・・ 2007でも使用出来るようにしたいと思ったのですが 2007ではこのままではエラーが出てしまうようです。 2007はまったく扱ったことがないのでどのようにすればよいかわかりません。 どなたかご教授いただけたらと思います。 Private Sub Workbook_Open() Application.DisplayStatusBar = False 'ステータスバー非表示 'ブックを開く時ページ設定と印刷を非表示 On Error Resume Next Application.CommandBars("Worksheet Menu Bar").Controls("ファイル(&F)") _ .Controls("ページ設定(&U)...").Enabled = False Application.CommandBars("Worksheet Menu Bar").Controls("ファイル(&F)") _ .Controls("印刷(&P)...").Enabled = False Application.CommandBars("Worksheet Menu Bar").Controls("ファイル(&F)") _ .Controls("印刷プレビュー(&V)").Enabled = False Application.CommandBars("Worksheet Menu Bar").Controls("ファイル(&F)") _ .Controls("印刷範囲(&T)").Enabled = False Application.CommandBars("Standard").Enabled = False End Sub
- ベストアンサー
- オフィス系ソフト
- エクセルの数式バーが表示できなくなってしまいました
エクセルのマクロでメニューバーを非表示にする処理をしました。 ↓これがマクロのソースです。 Application.CommandBars("Worksheet Menu Bar").Enabled = Not .CommandBars("Worksheet Menu Bar").Enabled これを実行し、自分の思惑通りメニューバーが消えました。 しかし再び処理を実行し、メニューバーを表示させたのですが、数式バーが 表示されません。 どうすれば元に戻るでしょうか？
- ベストアンサー
- オフィス系ソフト
- エクセルのメニューバーやツールバーを非表示にする方法
自分なりにエクセルファイルを作成してきましたが、できれば、メニューバーやツールバーを非表示にしたいと考え、一念発起しました。そして、下のサイトで、答えらしきものを見つけました。具体的には、『メニューを非表示にするには CommandBars オブジェクトの Enabled プロパティをFalse に設定します。再表示する場合は Enabled プロパティを True に設定します。ワークシートメニューを非表示にするには以下のように記述します。』と記載されています。しかし、具体的にどういうことなのか、さっぱり分かりません。ちなみに、マクロ経験は、本を見ながら、必要なものを記入したことがある程度です。どうぞ御指南の程をお願い申し上げます。 http://support.microsoft.com/kb/408057/ja
- 締切済み
- オフィス系ソフト
- Excel 数式バーを非表示にしたい(VBA)
ツール－オプション－表示－数式バーのチェックを外せば 数式バーを非表示にできますが、VBAでやりたいと思います。 次の様に記述してみましたが、書式バーの「数式バー(F)」のボタンが非表示になるだけで数式バー自体は非表示になりません。 Private Sub Workbook_Open() Application.CommandBars("formatting").Controls(23).Visible = False End Sub 次の様に記述してみても今度は「数式バー(F)」のボタンが操作不可になるだけで数式バー自体は非表示になりません。 Private Sub Workbook_Open() Application.CommandBars("formatting").Controls(23).Enabled = False End Sub 他にも試すのですが、エラーになったりで答えに辿り着けず・・ どなたかヒントだけでもお願いします。
- ベストアンサー
- オフィス系ソフト
- エクセルのメニューバーの非表示方法は？
ユーザー設定でワークシートメニューバーのチェックを外すとその時だけは消えますが、ユーザー設定のウィンドウを閉じると元どおり表示されてしまいます。 またマクロで Application.CommandBars("Worksheet Menu Bar").Visible = False とやるとエラーになってしまいます。 どうすれば消せるのでしょうか？
- ベストアンサー
- オフィス系ソフト
- ユーザー設定ツールバーの表示位置
以下のコードでブックに登録したツールバー 「設定１」のみを表示することに成功しましたが なぜかツールバーがシートの下部(シートタブの下)に 表示されてしまいます。 上に移動して保存しても、再度開くと下に表示されます。 上部(もしくは左部)に表示させたい場合はどのようにしたら良いのでしょうか？よろしくお願いします。 For Each MyCommandBar In CommandBars MyCommandBar.Enabled = False Next '数式バーを非表示 'Application.DisplayFormulaBar = False CommandBars("設定１").Enabled = True CommandBars("設定１").Visible = True
- ベストアンサー
- オフィス系ソフト
お礼
ありがとうございました。