• ベストアンサー

ExcelVBAで、自作ツールバーに既存機能を組み込みたい

 こんにちは。タイトルの通り苦心の末、自作ツールバーの作成に成功しました(^^)。  設定として、この自作ツールバー以外のツールバーを非表示とし、少しでも画面を広く使いたいのですが・・。  Excel標準の「桁上げ」と「桁下げ」、「印刷プレビュー」等の一部の機能は、残しておきたいんですね。  それで、これらの機能単位で自作ツールバーに組み込む事は可能でしょうか。  もし可能であれば、どなたかご教授下さい。

質問者が選んだベストアンサー

  • ベストアンサー
  • kbonb
  • ベストアンサー率51% (254/492)
回答No.3

こんにちは  私のサイトの以下のページがご参考になるかと思います。 【エクセル技道場】-ツールバー http://www2.odn.ne.jp/excel/waza/toolbar.html

参考URL:
http://www2.odn.ne.jp/excel/waza/toolbar.html
webdiver
質問者

お礼

 ありがとうございました。もの凄く参考になりました。今回、なんとか解決に持ち込めたのですが、janmaさんのサイトのお力によるところ大です。  メールマガジンも早速登録させていただきました。楽しみに拝見しますので、今後とも宜しくお願いします。

その他の回答 (3)

noname#415
noname#415
回答No.4

失礼しました、一番乗りで大間違いでした<m(__)m>。 →ExcelVBAで… タイトルを見逃していました。

webdiver
質問者

お礼

 いえいえ、大間違いなんてとんでもないですよ。hyper-teikaさんのお答えが、今回の問題解決の出発点になりました。  というのも今回の答、基本的には「マクロの記録」で導き出せました。それは、hyper-teikaさんが書き込んでくださらなかったら思いつかなかったかも知れません。  今回の皆さんの解答が随所で役に立ち、総合的な結果として問題解決に結びつきました(^^)。  本当は皆さんに満点のポイント発行したいのですが、出来ないシステムなんですね、これ(^^;)。  最後に、自分の出した結論ソースを記述しておきます。皆様、ホントにどうもありがとうございました。 '組み込み機能を追加する。事前に対象のツールバー表示が条件 With Application.CommandBars("自作バー").Controls .Add Type:=msoControlButton, ID:=109, before:=1 '印刷プレビュー .Add Type:=msoControlButton, ID:=398, before:=2 '桁下げ .Add Type:=msoControlButton, ID:=399, before:=3 '桁上げ .Add Type:=msoControlButton, ID:=1695, before:=4'VBE .Add Type:=msoControlButton, ID:=984, before:=5 'ヘルプ .Add Type:=msoControlButton, ID:=724, before:=6 '改ページプレビュー .Add Type:=msoControlButton, ID:=723, before:=7 '標準 .Add Type:=msoControlButton, ID:=849, before:=8 '数式バー .Add Type:=msoControlButton, ID:=855, before:=9 'プロパティ End With

  • ken__t
  • ベストアンサー率41% (53/129)
回答No.2

可能だと思います。 機能を決めるのは、FaceIdによってだと思います。 以下のアドレスでFaiceIdの一覧GIFが入手できます。 これから、必要な機能を番号で割り当てればよいと思います。

参考URL:
http://www14.big.or.jp/~kawamura/excelmacro.htm
webdiver
質問者

お礼

 ありがとうございました。皆様のおかげで、問題を解決することができました。  教えて頂いたFaceId一覧、めちゃ嬉しかったです(^^)!これ、欲しかったんですよぉ。今までは探求マクロを自作して、1個づつ閲覧してました(^^;)。  ただ、FaceIdを私なりに調査したところ、これはボタンの表面(アイコン)部分のプロパティではないでしょうか?  機能の実装は、私が出した結論では違う部分で実現しました・・・が、なにぶん素人の浅知恵(^^;)、間違いの場合は平にご容赦下さい。  

noname#415
noname#415
回答No.1

ツールバーの空いたところで右クリック、一番下の[ユーザー設定]、[ツールバー]タブをクリック、右上の[新規作成]をクリック、ツールバーに適当な名前を付ける。あとはこのツールバーに、(1)既にあるツールバーからコントロールキーを押しながらドラッグ、(2)[ユーザー設定]の[コマンド]タブをクリック、左の[分類]から何かを選びみぎの[コマンド]の中から望みのものを左クリックして先ほどの自作のツールバーにドラッグ。 ひとつの自作ツールバーでまかなうか、複数の自作ツールバーを作るかやって、あとは既存のツールバーのチェックを外し、自作をメニューバーの下にドラッグして、[ユーザー設定]を閉じる。これでどうでしょう。因みに私はデフォルトのツールバーはありません\^o^/。

関連するQ&A

  • ツールバーの表示について

    エクセルで、ツールバーに印刷プレビューのアイコンを追加する方法を教えて下さい。 ドラッグして追加することも出来たと思うんですが、分かりません。 この程度のことですみませんが、教えて下さい。

  • Excelのツールバーについて

    こんにちは。 とても初歩的なことで申し訳ないのですが、 エクセルで、ツールバーの中の「表示」内の 『標準』『改ページプレビュー』という項目がなくなってしまいました。 復活の方法をご存知の方、どなたか教えてください

  • EXCELで、ツールバーのクリックから直接印刷されないような設定はできますか?

    学校で生徒にパソコンを使わせています。エクセルの印刷の際に、印刷プレビューから印刷をクリックしないで、ツールバーから直接印刷をクリックしてしまうミスが多発するのですが、何度注意してもやはりミスします。 そのため、ツールバーからいきなりプリンターに印刷の情報がいかないようにするには、どう設定すればよいものでしょうか?(Excel 2003)

  • ツールバーの印刷ボタンのプリンター変更

    現在会社にはプリンター、プロッターがあり主に使用する頻度が高いのはプリンターです。ツールバーの印刷ボタンを押すと通常のエクセルなどの印刷物でもプロッターでの印刷になってしまいます。今はプリンターで印刷したい場合、ツールバーの印刷プレビュー→印刷→印刷設定→プリンターを選択→出力とかなり手順を踏んでいます。ツールバーの印刷ボタンをクリックで1発でプリンターでの印刷にするにはどうしたらいいのでしょうか?

  • エクセル、標準ツールバーにブランクが追加されていくのですが?

    エクセル2000を使っているのですが、エクセルを起動する度に標準ツールバーにブランク(□で表示されます←ユーザー設定のようなのですが・・・)が3つずつ追加されていくという、不思議な現象が起こっています。 ツールバーをリセットすれば元の状態の戻るのですが、一部カスタマイズして使っていることもあり、ちょっと困っています。 この件につきまして何かご存じの方がいらっしゃいましたら、ぜひ教えてください。よろしくお願いします。

  • エクセルの印刷プレビュー

    エクセルで印刷プレビューを行った後、 ページ単位の印刷可能範囲が点線で表示されません。 何処かに設定があるのでしょうか? 表示方法は改ページプレビューではなく、標準です。 過去に作成したシートを参照した場合は その機能を果たすのですが、 今回新しくシートを作成したら点線が表示されません。 OSはWIN98 EXCEL2000 です。

  • ツールバーの固定について

    Office2003を使用していますが、ワードやエクセルのツールバーの配置を変更して、再起動すると配置変更前の状態に戻ってしまいます。 officeに標準でついているツールバーに関してはソフトを起動してもツールバーの位置は変更されているのですが、「Home style+」や翻訳ソフト等の、もともと組み込まれていない機能に関しては、位置の変更が再起動後元にもどります。 再起動してもツールバーの位置がもどらないようにする方法はあるでしょうか? また、「Home style+」のツールバーは非表示にしたいのですが、非表示にできません。これはアンインストールするしかないのでしょうか?

  • ブラウザ上でEXCELの印刷プレビューをする方法は?

    通常、エクセルで「印刷プレビュー」をする場合、ツールバーの「印刷プレビュー」を選択するか、VBAマクロで"ActiveSheet.PrintPreview"を組み込んでも行うことができますが、ブラウザ上で開いたエクセルの印刷プレビューを行う方法を教えて下さい。

  • ワード(Word)の印刷プレビュ-機能で・・・

    現在 Word2000 を使用しております。印刷プレビュ-機能の中において へルプを見たのですが使い方がわからない機能がありまして ご質問させていただきます。よろしくお願いいたします。 印刷プレビュー画面のツールバーにおいて「1ページ分圧縮」というボタンが あるのですが、使用することが出来ません。 常に「圧縮できませんでした」と表示されてしまいます。 ヘルプの項目に「余分なページが印刷されないようにする」というのが ありましたので確認して使ったのですがダメでした。 この機能はどのような形で利用するものなのでしょうか? 私の使い方が悪いために機能しないのだと思います。 申し訳ありませんがぜひ、ご回答よろしくお願いいたします。

  • Netscape6(正式版)に印刷プレビューの機能はあるでしょうか?

    Netscape6(正式版)のファイルメニューに「印刷プレビュー」が見当たりません。PR3までは、機能は使えないまでも存在していたと思います。 IE5.5の印刷プレビューと違いNetscape Navigatorの同機能はフレームに対応していたので、長い文書の一部のみを印刷したい場合など非常に便利だったのですが…。 NetscapeのホームページのFAQを見てもこの件について何も触れていないようなので、もしそのあたりの事情をご存じの方がいらっしゃいましたらご教示いただければ幸いです。

専門家に質問してみよう