Excel VBA質問箱 IV

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

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


	新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム

39186 / 76732

←次へ　｜　前へ→


	【42661】Re:CommandBarsについて

kobasan - 06/9/18(月) 18:28 -


	引用なし

	パスワード

続いてお願いします。

Worksheet menu barをもう少しつついてみて、"Worksheet menu bar"のCaption(?)
ではなくて、Name(?)を、つまり、下記のように"編集(&E)"ではなく、Nameの"Edit"
を確認しようと思って、

　　MsgBox CommandBars("File").Name　　　　'=>"File"
　　MsgBox CommandBars("Edit").Name　　　　'=>"Edit"
　　・・・・
　　・・・・
の内容を

Sub test5()
Dim c As CommandBar
　　For Each c In CommandBars
　　　　MsgBox c.Name
　　Next
End Sub

でやろうとしました。これでは、まったく別のものが表示されるだけで、
目当てのものは表示してくれません。
For のところを
　　For Each c In CommandBars("Worksheet menu bar").Controls
にしたら、エラーが出ます。
どうすればいいのでしょうか。

0 hits

▼

【42634】CommandBarsについて kobasan 06/9/17(日) 8:43