• ベストアンサー

vbaで、フォームコントロールを挿入する方法

vbaで、フォームコントロールを挿入する方法 エクセル2007を使っています。 最近、vbaを始めたのですがわからない事があります。 開発→挿入→挿入→フォームコントロールで、 オプションボタンやチェックボックスを、 vbaで挿入したいのですが可能でしょうか? 例えば、フォームコントロールのボタンを押しただけで オプションボタンを6つ挿入するなどです。 ActiveXコントロールでは、可能とどこかのサイトで見たのですが、 どうしてもフォームコントロールの方を使いたいの…。 よろしくお願いします。

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

  • ベストアンサー
  • jcctaira
  • ベストアンサー率58% (119/204)
回答No.1

シートに追加する場合で作成してみました。 ※文字やコントロール名も自由に設定できます。 Sub optボタン追加()  For I = 1 To 6    ActiveSheet.OptionButtons.Add(100, 10 + I * 20, 100, 15).Select    Selection.Characters.Text = "選択" & I    Selection.Name = "optボタン" & I  Next I End Sub

zaps1234
質問者

お礼

できました!!ありがとございます!!

関連するQ&A

  • フォームコントロールのボタン設定

    ExcelのVBAで、ActiveX コントロールのボタンは、 CommandButton1.Enabled=False のようにして押せなくできますが、 フォームコントロールのボタンの場合でも、押せなくなる設定をすることは可能ですか?

  • エクセル2010のフォームコントロールについて

    エクセル2003で作成したファイルを、エクセル2010の互換モードで編集作業しています。 互換モードで編集をしている中で、フォームコントロールのチェックボックスを作成すると、最初からチェックボックスのアウトライン沿いに影がつきます。 見栄えを整えるために、どうしてもこの影を消したいと思っているのですが、書式タブから図形の効果を選択しようとしてもグレー色になっていてクリックができません。 どうしたら、フォームコントロールの影を消すことができるでしょうか?ご存じの方いましたら教えてください。 なお、ActiveXのコントロールのチェックボックスであれば、影が消せるのですが、こちらは使いたくありません。よろしくお願いします。

  • VBA コントロール EXCEL

    VBAでプログラミングしています。 Excelでコントロールを使用しようと思いますが、 数が多くなりそうですが~ オプション ボタン 約20600個 チェック ボックス 約600個 コンボ ボックス 約500個 コマンドボタン 約300個 そして、上のコントロールにVBAで制御をする予定です。 値を設定、値を取得、イベントの発生などの動作になります。 環境はEXCEL 2003になります。 これで問題ないですか。 問題があったらどんな問題がありますか。(速度、メモリ、容量、エラーなど) 教えてください~

  • VBAにていろいろ質問させてください

    VBAの処理です。 本来なら別々に質問しなければいけないのですが、 どれでも良いのでお分かりになるものを教えてください。 (1)複数のフォームを起動する場合、既にそのフォームが起動中であるとしる方法。またそのフォームを画面最前線に表示する方法。 (2)ExcelシートのコントロールにはLostFocusが使用できるのですが、VBAのActiveXコントロールにはありません。代替機能はありますか?(必須チェックなどしたいのですが) (3)フォームで[?]ボタンでヘルプを出力したいです。 [?]は閉じるボタンの横に配置できたのですが、 [?]に対する各コントロールのヘルプはどう設定すればよいのですか? すみません。どれでも良いので教えてください

  • ActiveXコントロールのオプションボタン

    エクセルでユーザーフォームにActiveXコントロールのオプションボタンを設置してあります。このすべてのオプションボタンをいっぺんにオフにするにはVBAをどのように書いたらよいでしょうか? For~Nextでひとつづつ.Value = Falseにする方法はわかりますが、全部を一度にFalseにする虫のいい方法をご教示いただければ幸いです。 よろしくお願いします。

  • フォームコントロールの設定

    お世話になります。 フォームコントロールのチェックボックスの挿入をしたのですが、上司に「(チェックボックス チェック)チェック」ではなく、■の様に塗りつぶしのしてほしいといわれました。そんなことは可能なんでしょうか? よろしくお願いします。

  • フォームコントロールの使い方

    フォームコントロールでオプションコントロール(丸いやつ)を複数表示した時、初めの状態では一つしか選べません。これを複数選べるようにするにはどうしたらいいでしょうか。 それともそもそもフォームコントロールは見た目の”チェックボックス”ではないため出来ないのでしょうか。 その場合、代替案はありますか?

  • フォームコントロールの文字編集

    Excel2007のUserです。フォームコントロールのことについて質問します。 開発、挿入でコントロールの挿入を行いますが、 たとえばコンボボックスをシートに挿入した場合、この ボックス内の文字を大きくしたり 色をつけたりする編集の方法がわかりません。 もともと編集できない物でしょうか? 文字が小さすぎです

  • Excel フォームコントロール オプション

    いつもお世話になってます。 ActiveXのOptionButtonやChekcBoxは複製Windowでは働かないので、フォームコントールを使おうと思います(フォームコントロールは動作します)。 例えばVBAなら,次のようにすればCheckBox2はoffになります。 これをフォームコントロールのチェック(ボックス)でやりたいのですが? Sub CheckBox1_Click() If CheckBox1.Value = True Then CheckBox2.Value = False" End Sub

  • ユーザーフォーム上のコンボボックスのリンク先はどうやって指定?

    エクセル97です。ユーザーフォームにおいたコンボボックスに表示させたいワークシート上のリスト、およびコンボボックスで選択された値をリンクさせたいセルの指定方法がわかりません。オプションボタンやチェックボックスのリンク先指定方法もわかりません。またユーザーフォームには「OK」「キャンセル」ボタンもないのでしょうか? エクセル95のときはダイアローグシートにコンボボックスを置き、コントロールの書式設定で簡単に指定が出来たのですが、97に変えてからは、敢えてエクセル5.0のダイアローグを挿入しないといけないようなので、出来ればユーザーフォームで作ってみたいのです。どうかよろしくお願いします。

専門家に質問してみよう