• ベストアンサー

エクセルVBAのユーザーフォーム上にコマンドバーメニューの「グラフオブ

エクセルVBAのユーザーフォーム上にコマンドバーメニューの「グラフオブジェクト」の機能をそのまま搭載したいのですが、何かよい方法はありませんでしょうか。 コントロール名が「グラフ オブジェクト(&C):」で、IDが「1622」であるとこまではわかっているのですが、どうやってユーザーフォーム上のコンボボックスで呼び出せばよいのかがわからず困っています。 趣旨としては、オリジナルのマクロや、頻繁に使用するコマンドバーメニューをユーザーフォーム上に集約したいというものです。 どうぞ宜しくお願い致します。

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

  • ベストアンサー
  • hige_082
  • ベストアンサー率50% (379/747)
回答No.1

ここが参考になりませんか http://officetanaka.net/excel/vba/tips/tips58.htm

tosa0507
質問者

お礼

上記、参考にさせていただきました。 御回答いただきましてありがとうございました。

関連するQ&A

  • VBAのユーザーフォームの使い方

    皆様、こんにちは。 VBAのユーザーフォームを習い始めた初心者です。本の説明を読んでもユーザーフォームの使い方がよく分かりません。例えば、あるセールをクリックしたら、フォームが表示される、そしてフォームの中にあるコンボボックスのリストの中から選ばれた値が最初に選択したセールに入力されるという使い方がありえますか?申し可能でしたら、コード作成の例をいただけないでしょうか? どうぞよろしくお願いいたします。

  • エクセルVBAのユーザーフォームのコンボボックス

    エクセルVBAのユーザーフォームのコンボボックスの入力と ファイルの保存で質問です。 エクセルVBAで ユーザーフォームのコンボボックスを使用して 1月から12月までを選択してもらい、 選択した月を コマンドボタン押した際に、 セルにその値を入力するような マクロを作成しようとしています。 またコンボボックスは標準で6月が表示されるようにしたいと思います。 ユーザーフォームのコードの一部です。 Private Sub UserForm_Initialize() Dim m As Integer For m = 1 To 12 UserForm1.ComboBox1.AddItem m Next ComboBox1.ListIndex = 6 Private Sub CommandButton1_Click() 'ユーザーフォームを閉じる Unload UserForm1 mold  '↑フォームを閉じた後に実行される標準モジュールのマクロ名です End Sub 標準モジュールのコード 名称 「mold」 Sub mold() ActiveWorkbook.SaveAs _ Filename:="C:\_" & UserForm1.ComboBox1.Text & "月", _ FileFormat:=xlOpenXMLWorkbook ActiveWorkbook.Close ThisWorkbook.Activate ' End Sub の様に作成して実行してみたのですが、 コンボボックスで11月を選択しても 6月のままのファイルになってしまいます。 どのようにしたら、 コンボボックスで選択した値を ファイル名として保存できるでしょうか? 全部のコードを記載しますと 長くなってしまうと思い、 関連するコードを記載して質問しました。 分かりづらい所もあるかと思いますが よろしくお願いします。

  • EXCEL VBA ユーザフォームで複数のコントロールを作るとき

    VBAにてシステムを作っています。当該システムの性格上、ユーザフォーム上のコントロールが多量にあります(テキストボックスが30個ぐらい) このように複数のコントロールを作成する場合、オブジェクト名を textbox1,textbox2というように自動で連番を振ってくれるのですが、都合上textboxというオブジェクト名を使えなくなってしまいました。 目的としては txt1,txt2というように任意のオブジェクト名で自動的に連番を振ってほしいのですが、そのような機能はVBEにありますでしょうか?もしくはそういったアドインがあれば教えていただきたいです。いちいち30個もあるコントロールのプロパティをあけて名前を変えるというような非効率的なものは避けたいので・・・。

  • excel vbaでユーザーフォームに線を書く

    excel vbaでユーザーフォームに線を書きたいのですが (プログラムではなくツールボックスにコントロールを追加し) vbのlineのようなコントロールはあるでしょうか。 環境 Windows XP, Office2003

  • excel vba ユーザーフォーム

    現在、セルa101からa110までに「商品名」、セルb101からb110までに「金額」が 入力済みです。 このデータを、ユーザーフォーム上にコンボボックスを2つ作成し、セルa1へ 商品名を選択後、入力。また、b2へ金額を選択後、入力させたいのです。 また、ユーザーフォーム上にテキストボックスを作成し、ここに入力した 「備考」の全角10文字をc1へ移動したいです。 今のところ、ユーザーフォーム、コンボボックス、テキストボックスを作成した だけで 立ち往生しています。 どなたか、ご教授お願いいたします。

  • Excel VBAのユーザーフォームについて

    Excel VBAでユーザーフォームを作成しています。 ユーザーフォームで出力したファイル 「出力ファイルA」 ユーザーフォームで使用するファイル 「ファイルB」 を、起動していると必ず「インデックスが範囲内にありません」 といった内容のエラーが表示されます。 ユーザーフォームで使用するファイルの表示中に そのようなエラー画面が出てきても仕方がないと思うのですが、 ユーザーフォームはマルチ画面を作成したので ファイルは「出力ファイルC」も出すことができる仕様です。 また、「出力ファイルA」「出力ファイルC」は コンボボックスで選択した西暦がファイルの先頭に付くので (例:2014_出力ファイルA.xls) 必ず同じファイル名が出力されるとは限りません。 なので、そのようなエラーが表示されないようにしたいのですが可能でしょうか? また、特別なコードは記述していないのですが、 なのでボタンとかコンボボックスのコードを書けばよいのか・・・という感じなのですが、 どのように対処すればよいかわかりません。 それと、出力したファイルの内容を確認するためにアクティブには、 ユーザーフォーム画面を終了させるしかならず、 そもそもそうゆう仕様なのかがわかりません。 ユーザーフォームを作成するのは初めてなので初心者丸出しで お恥ずかしい限りなのですが、 どなたかアドバイスいただけますと幸いです。 こんな抽象的ですが、どうお伝えすればよいのかがそもそもわからず困っていて、 それに時間もなく頭を抱えているので お手柔らかに願います。 よろしくお願い致します。

  • VBA ユーザーフォームで

    VBAのユーザーフォームで、時間を入力し、何分だったかを出したいのです。 例えば、コンボボックス1~4を用意して、1にスタートの時間、2にスターの分、3にエンドの時間、4にエンドの分を入力し、エンドの時間からスタートの時間を引けば、何分かかったが出せると思うのですが、hhmm時間ではなく、mm分で出したいのですがそのようなことは出来ますか? コンボボックス1に、hhの意味を持たせて、2にmmの意味を持たせ、1と2を合わせると1つの時間(hhmm)になるようにしたいのです。そのような関数はありますか? また、コンボボックスに入力する際に、時間なので、2バイト入れれば次のコンボボックスにカーソルが移動するような制御はありますか? 宜しくお願いします。

  • エクセルVBAでコンボボックスの非表示について

    最近VBAを勉強し始めたのですが、コントロールについてわかりませんので、ご教授お願いします。 コンボボックスを初期では非表示、トグルボタンをクリックすると、コンボボックスを表示させる方法を教えてください。 ユーザーフォームについてまだ未熟なので、すみませんがよろしくお願いします。

  • VBAでのユーザーフォームの使い方

    VBAのマクロでユーザフォームにボタンを配して、それによってエクセルシートのデータを更新するようなマクロを作りたいのですが、ユーザフォームの挿入でボタン配置まではできるのですけど、どのようにリンク付けするのかコーディング等、解りません。お教え下さい。簡単なサンプルコーディングがあれば助かります。

  • エクセルでユーザーフォームをvbaで作る

    アクセスでフォームをvbaで作る時はCreateFormメソッドで出来ましたが エクセルでユーザーフォームを作る場合はどうすればいいですか? エクセルのオブジェクトブラウザでMSFormsライブラリでCreateで検索しても何もヒットしないことから Createじゃないメソッドで行うと思うのですがどのメソッドでしょうか?

専門家に質問してみよう