Excel VBA質問箱 IV

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

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

  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
12288 / 13646 ﾂﾘｰ ←次へ　｜　前へ→
▼ 【11275】教えてください！ liee_chang 04/3/4(木) 16:01 質問
【11287】Re:教えてください！ IROC 04/3/4(木) 17:13 回答
【11289】Re:教えてください！ Ｊカーター 04/3/4(木) 17:20 回答
【11331】Re:教えてください！ liee_chang 04/3/5(金) 14:38 お礼
【11275】教えてください！
質問  liee_chang  - 04/3/4(木) 16:01 -
引用なし
パスワード
   Auto_openを使って
エクセルのワークシートメニューバーまで非表示にすることはできますか？

Application.CommandBars("Worksheet Menu Bar").Visible = False

↑だとひっかかってしまうのですが・・・
【11287】Re:教えてください！
回答  IROC  - 04/3/4(木) 17:13 -
引用なし
パスワード
   >ワークシートメニューバーまで
まで・・？


>Application.CommandBars("Worksheet Menu Bar").Visible = False
>↑だとひっかかってしまうのですが・・・

Dim ctb As CommandBar
On Error Resume Next

　　For Each ctb In Application.CommandBars
　　　　ctb.Enabled = False
　　Next

On Error GoTo 0

かな？
【11289】Re:教えてください！
回答  Ｊカーター  - 04/3/4(木) 17:20 -
引用なし
パスワード
   ▼liee_chang さん：
こんにちは。

>Application.CommandBars("Worksheet Menu Bar").Visible = False
Application.CommandBars("Worksheet Menu Bar").Enabled = False

としてみて下さい。
【11331】Re:教えてください！
お礼  liee_chang  - 04/3/5(金) 14:38 -
引用なし
パスワード
   ＞IROCさん：
＞Ｊカーター さん：

ありがとうございました。
無事、できました！

liee
  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
12288 / 13646 ﾂﾘｰ ←次へ　｜　前へ→
ページ：  ┃  記事番号：
2610219
(SS)C-BOARD v3.8 is Free