A 回答 (2件)
- 最新から表示
- 回答順に表示
No.1
- 回答日時:
メニューバーを自作し、既存のメニューバーと置き換えます。
onActionプロパティにマクロ名やサブルーチン名を設定します。
必要なメニューだけ追加すればよいわけです。
各動作についてはVBAのヘルプを参照して下さい。
Sub ReplaceMenuBar()
Dim myCB As CommandBar
Set myCB = Application.CommandBars.Add _
(Name:="User Menu Bar", Position:=msoBarTop, MenuBar:=True)
'カスタムメニューバーの作成(サブルーチン)
S_AddCmdCtrl myCB
myCB.Visible = True
End Sub
'カスタムメニューバー作成関数
Sub S_AddCmdCtrl(myCB)
Dim myCBCtrl As CommandBarControl
Set myCBCtrl = myCB.Controls.Add(Type:=msoControlPopup)
myCBCtrl.Caption = "ファイル(&F)"
Set myCBCtrl = myCB.Controls("ファイル(&F)").Controls _
.Add(Type:=msoControlButton)
myCBCtrl.Caption = "保存(&S)"
myCBCtrl.OnAction = "S_SaveBook"
Set myCBCtrl = myCB.Controls("ファイル(&F)").Controls _
.Add(Type:=msoControlButton)
myCBCtrl.Caption = "終了(&Q)"
myCBCtrl.OnAction = "S_QuitExcel"
myCBCtrl.BeginGroup = True
--------中略-------------
End Sub
'各メニューの動作
Private Sub S_SaveBook()
ActiveWorkbook.Save
End Sub
Private Sub S_QuitExcel()
Application.Quit
End Sub
この回答への補足
お返事が遅くなり、申し訳ありません。
ご回答で教えていただいた、プロシージャを標準モジュールに記述して実行したところ、
Set myCB = Application.CommandBars.Add _
(Name:="User Menu Bar", Position:=msoBarTop, MenuBar:=True)
のところで、
実行時エラー’5’:
プロシージャの呼び出しまたは引数が不正です。
とのエラーメッセージが表示され、止まってしまいます。
なぜでしょうか。
No.2
- 回答日時:
こんにちは
以下のページがご参考になるのでは?
【エクセル技道場】-ツールバー
http://www2.odn.ne.jp/excel/waza/toolbar.html
[XL97] メニューバーやツールバーを非表示にする方法
http://www.microsoft.com/JAPAN/support/kb/articl …
[XL97] メニュー/サブメニューの追加と削除を行う方法
http://www.microsoft.com/JAPAN/support/kb/articl …
参考URL:http://www2.odn.ne.jp/excel/waza/toolbar.html
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Excel(エクセル) CSVファイルでVBAを動かす方法 3 2023/04/04 10:22
- Excel(エクセル) エクセルでcsvファイルを開いてVBAを使いたい 7 2022/04/28 11:12
- Excel(エクセル) エクセルでのVBA 2 2022/08/03 06:48
- その他(ソフトウェア) Emacsメニューの日本語化について 1 2023/06/16 15:52
- ノートパソコン ファイルのコピーの同期を外したい 2 2023/01/15 12:53
- Excel(エクセル) 2つのVBAを一緒にしたら機能しなくなりました(エクセル) 7 2022/06/02 12:41
- Visual Basic(VBA) VBAでプロセデュア間で共有できるエリアの設定方法は? 3 2023/04/15 19:06
- Excel(エクセル) Excel M365 データチェックの仕掛けを作りたい 2 2023/06/03 23:54
- ノートパソコン 教えて下さい。過去のエクセルのファイルデータの中に、ヘッダーのところに図形を登録しています。 今回新 4 2023/04/11 15:16
- Excel(エクセル) 教えて下さい。 ●過去のエクセルのファイルデータの中に、ヘッダーのところに図形を登録しています。 ● 2 2023/04/11 17:40
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
すき家のアルバイトは
-
Excel2016でプルダウンのメ...
-
EXCELのプルダウンメニューを全...
-
google chromeについて困ってい...
-
ウィンドウズからマックへのメ...
-
windowsのワードで作った文章を...
-
マックで文章作成をしたいんで...
-
パチスロ北斗の拳 世紀末救世主...
-
漢字の読み方 「火」と「会」を...
-
ユンボのバケットのサイズの測...
-
「なんとなくクリスタル丼」て何?
-
毎日すき家の牛丼と豚汁 毎日冷...
-
文字の上に線を引く方法
-
MACで、窓の杜のようなサイト
-
1円玉がたくさんくっついてとれ...
-
築地で朝定食が食べたいです、...
-
ケンタッキーバーレルの「バー...
-
蒙古タンメンとプルダックポッ...
-
モスバーガーのハンバーガーは...
-
吉野家のご飯って何故いつもあ...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
Excel2016でプルダウンのメ...
-
飲食店で、一人で食事をしてい...
-
EXCELのプルダウンメニューを全...
-
ケンタッキーフライドチキンっ...
-
モスバーガーのハンバーガーは...
-
マクドナルド、ミスタードーナ...
-
マクドナルドのバイトをしてい...
-
700Wの電子レンジは、コンビニ...
-
蒙古タンメンとプルダックポッ...
-
windowsのワードで作った文章を...
-
ハッピーセットのサイズアップ...
-
ケンタッキーバーレルの「バー...
-
ACCESS ファイルへのアクセス...
-
吉野家のご飯って何故いつもあ...
-
9月一臂の〔一臂〕の意味
-
すき家のアルバイトは
-
MACで、窓の杜のようなサイト
-
「一日」はどう読むのが正しいの?
-
マックで働いてるものなのです...
-
漢字の読み方 「火」と「会」を...
おすすめ情報