エクセル2000です。
以下のマクロで自前の新しいツールバーが作れ、作動します。
ところがエクセル2007ではうんともすんとも言ってくれません。
エクセル2007で使う場合はどのようにしたらよいでしょうか?
ユーザーフォームで似たようなものを作る方法はわかるのですが、できれば以下の方法を使いたいのです。
Sub 三択メニュー()
On Error Resume Next
Application.CommandBars("選択します").Delete
On Error GoTo 0
Application.CommandBars.Add Name:="選択します", Position:=msoBarFloating
With Application.CommandBars("選択します")
.Visible = True
.Controls.Add Type:=msoControlButton
With .Controls(1)
.Style = msoButtonCaption
.Caption = "⇒メニュー1 "
.OnAction = "Msg_1"
End With
.Controls.Add Type:=msoControlButton
With .Controls(2)
.Style = msoButtonCaption
.Caption = "⇒メニュー2 "
.OnAction = "Msg_2"
End With
.Controls.Add Type:=msoControlButton
With .Controls(3)
.Style = msoButtonCaption
.Caption = "⇒メニュー3 "
.OnAction = "Msg_3"
End With
End With
End Sub
Sub Msg_1()
Application.CommandBars("選択します").Delete
MsgBox "追加コマンド1を処理しました。"
End Sub
Sub Msg_2()
Application.CommandBars("選択します").Delete
MsgBox "追加コマンド2を処理しました。"
End Sub
Sub Msg_3()
Application.CommandBars("選択します").Delete
MsgBox "追加コマンド3を処理しました。"
End Sub
No.1ベストアンサー
- 回答日時:
2007からリボンインターフェースになっているのでツールバーは直接操作できません。
コードをチェックしてませんがもし表示されたコードが2003でちゃんとツールバーが表示されるのならリボンに「アドイン」タブがあるはずです。
これをクリックするとツールバーのようなものが表示され2003と同じように操作できます。
アドインという「リボン」が出来たことすら気づきませんでした。
仰せのとおり、アドイン内のボタンを押したところ作動しました。
しかし、これじゃ使いものにはなりません。
マイクロソフトも「リボン」なんて何を考えてこんな最低な改悪を・・・・。
No.4
- 回答日時:
>2007ではツールバーがないですもんねえ・・・
ん???
どうも意図するところが伝わらなかったような。。。(^^;;;
ま、それは置いといて、気づいた点をひとつ。
質問のコードではアドインタブは自動的にOnにならないようなので
Onにするコードを入れておいた方がよさそうな。。。
(xl2007が手元にないので確認できてませんが)
理解の悪い質問者で申し訳ないです。
ご教示のサイトの以下の記述で納得してしまったのですが・・・・。
リボンの末尾に「アドイン」というタグが追加され、「ユーザー設定のツールバー」グループとしてボタンが登録される。考えてみれば当たり前の結果だ。Excel 2007では、ツールバーという機能そのものが削除されてしまったのだから、いくらマクロからとはいえ追加することはできない。
No.3
- 回答日時:
こんにちは。
そのままマクロを実行すれば、アドイン・タブに表示されるのはご存知のことだと思います。
私自身は、クイックツール・アクセスバーをカスタマイズすればよいと思っています。手の込んだことはしません。簡単に登録できますので十分だと思っています。
また、他の方法としては、当初は、VSTO やVS2008 Proが必要だと思いましたが、Fluent UIにこだわるようなら、こちらにまとめましたので、参考にしてください。
http://oshiete1.goo.ne.jp/qa5009702.html
エクセル2003で作成したVBAを2007で使用したい
いつもお世話になりありがとうございます。
そのままマクロを実行すれば、アドイン・タブに表示されるのは今回質問して初めて知りました。
ご提示のリボンのカスタマイズなんてわたしにはとてもできそうにありません。
今回はあきらめます。
ありがとうございました。
No.2
- 回答日時:
灰神楽の町からこんにちは。(^^;;;
下記サイトなど参考になるでしょう。
http://pc.nikkeibp.co.jp/article/NPC/20060727/24 …
また、「VBA excel2007 ツールバー」などで検索してみるのもありかと。
以上です。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
関連するカテゴリからQ&Aを探す
おすすめ情報
- ・漫画をレンタルでお得に読める!
- ・人生のプチ美学を教えてください!!
- ・10秒目をつむったら…
- ・あなたの習慣について教えてください!!
- ・牛、豚、鶏、どれか一つ食べられなくなるとしたら?
- ・【大喜利】【投稿~9/18】 おとぎ話『桃太郎』の知られざるエピソード
- ・街中で見かけて「グッときた人」の思い出
- ・「一気に最後まで読んだ」本、教えて下さい!
- ・幼稚園時代「何組」でしたか?
- ・激凹みから立ち直る方法
- ・1つだけ過去を変えられるとしたら?
- ・【あるあるbot連動企画】あるあるbotに投稿したけど採用されなかったあるある募集
- ・【あるあるbot連動企画】フォロワー20万人のアカウントであなたのあるあるを披露してみませんか?
- ・映画のエンドロール観る派?観ない派?
- ・海外旅行から帰ってきたら、まず何を食べる?
- ・誕生日にもらった意外なもの
- ・天使と悪魔選手権
- ・ちょっと先の未来クイズ第2問
- ・【大喜利】【投稿~9/7】 ロボットの住む世界で流行ってる罰ゲームとは?
- ・推しミネラルウォーターはありますか?
- ・都道府県穴埋めゲーム
- ・この人頭いいなと思ったエピソード
- ・準・究極の選択
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
AutoCAD LTで画層ツールバー表...
-
AutoCAD 画層複写の方法は?
-
AutoCAD ツールバーを消してし...
-
AutoCAD LT 「画層プロパティ管...
-
曲線に対しての垂線の引き方に...
-
Autocadで3D面から線分へ変換
-
オートシェイプ曲線図形を部分...
-
JW-CADで図形を揃える方法
-
AutoCAD2007LTでESCキー操作(...
-
この問題解き方教えて欲しいです
-
マイクロキャダムの質問掲示板
-
Auto CAD コマンドラインの上の...
-
Auto CADで線分、円弧など連続...
-
エクセルで線分図を描けますで...
-
autocad2010 autolispについて
-
複数の線を同時に同じ長さだけ...
-
斜めになった線分を水平又は垂直
-
AutoCAD2004のマウ...
-
Catia オフセット トリム 分割
-
螺旋の線の作図について
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
AutoCAD LT 「画層プロパティ管...
-
画層プロパティ管理の表示について
-
Rhinoceros(ライノセラス)の...
-
solidworksの表示の回転等のア...
-
AUTOCAD LTの画層ツールバ...
-
Auto cadのリボン使っていますか?
-
AutoCADLT2006で画層プロパティ...
-
AutoCad2004をインストールする...
-
Excelにて、右クリックメニュー...
-
「メニューのロードに失敗しま...
-
VectorWorksは基本的なショート...
-
エクセル2007で自前のツールバ...
-
AutoCAD LT2010 画層名の表示
-
オートCAD 2010でメニューバー...
-
AutoCAD LTにあってAutoCADに無...
-
コマンドラインが非表示に!
-
キーボード・ショートカットが...
-
autocad2005で選択画層のみを表...
-
AutoCAD LT2017
-
AutoCAD2006ツールバーについて
おすすめ情報