• ベストアンサー

VBA コンボボックスにシート名を表示

ExcelVBA初心者です。 ユーザーフォームの中にコンボボックスを作成し、現在使用しているbookのワークシート名をすべてリスト表示させたいのですが、どうしたら良いでしょうか? ワークシート名はSheet1、Sheet2、Sheet3です。 よろしくお願いします。

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

  • ベストアンサー
  • n-jun
  • ベストアンサー率33% (959/2873)
回答No.1

ユーザーフォームを開いた時になら、 Private Sub UserForm_Initialize() Dim ws As Worksheet With ComboBox1 For Each ws In Worksheets .AddItem ws.Name Next .ListIndex = 0 '1番目のシート名 End With End Sub とか?

tw301014
質問者

お礼

大変ためになりました。 早速ありがとうございました!

関連するQ&A

  • VBAのコンボボックス

    現在、初めてのExcelVBAで学習しています。 ユーザーフォームの画面を作成後、コンボボックスを作成しました。 基本データはsheet1に「No・月・日」を作成してあります。 コンボボックスに選択項目の「基本データ」シートの「月範囲」を表示してくださいとありますが、どのようにリンクするのかわかりませんので、ご教授、お願いします。 ※Row Sourceに「月範囲」を設定とありますが、プロパティが設定できません。プロパティの値が無効ですと表示されます。

  • VBA マクロ コンボボックス

    sheet1でフォームを作り、その中でコンボボックスを作成してリストを作りたいです。リストはsheet2にあります。 sheet2 A1 バナナ  A2 りんご A3 サラダ A4 なし なかなか、できません。フォームのコンボをクリックしてもリストが出ません。しっかりとした記述を教えてください。

  • エクセル コンボボックスについて

    XP エクセル2003なのですが、 現在ワークシートに郵便番号と住所のリストを作成しています。    郵便番号     住所  ***-**** ○○県○○市・・・  ***-**** XX県XX市・・・ ユーザーフォームにテキストBOXとコンボBOXとコマンドボタンを 配置しています。 コンボBOXではリストにしている住所のみを表示していますが、 その中から探すのが大変です。そこで、 テキストBOXに郵便番号を入力し、 コマンドボタンをクリックすると、 コンボBOXに該当する住所が表示されるようにしたいのですが、 どうすればいいのか、何から始めればいいのか、 全く分かりません・・・。いろいろな方法があると思うのですが、 教えていただければ幸いです。 初心者ですので質問形式が悪いかもしれませんが よろしくお願いします。

  • Excel VBA コンボボックスの使い方

     VBAでのコンボボックスの使い方をしらべているのですが、うまく見つかりません。コンボボックスのリストに登録するのはどうしたらよいのでしょうか?シート上のセル内のデータを使用しないとリストの登録は出来ないのでしょうか?VBA上で作成して、ユーザーフォームで選択できるようにしたいと思っています。VBAをはじめたばかりなので初歩的な質問で大変恐縮です。どなたかわかる方がいらっしゃったらお願い致します。

  • エクセル マクロ コンボボックスリスト

    sheet1の場所でボタンクリックでフォーム表示。その中でコンボボックスリストを作成。 sheet3にデーターをA列に作りました。 1)フォームの中のコンボボックスをクリックしてリスト表示させた い。マクロの記述を教えてください。 2)コンボボックスリストに表示した文字をsheet2に記録するボタンを作ったがマクロの記述を教えてください。

  • excelVBAのコンボボックスについて

    excelVBAのコンボボックスについて質問です。 ユーザーフォームに設置したコンボボックスに違うシートの特定範囲を設定するには どのようにプログラムすればよろしいでしょうか? 自分なりにいろいろ調べてみたのですが解決できませんでした。 要約すると ユーザーフォームはsheet1からボタンで起動させ(ここまでは苦もなくできました)、でてきたユーザーフォームにあるコンボボックスにsheet2にある特定範囲 また、この特定範囲をデータのある範囲だけ(データが追加されれば自動でそれを取得する)に設定することは可能ですか?

  • excel 2003 vba コンボボックス 日付

    始めまして初心者です。よろしくお願いします。 ワークシートのA列に日付、B列に作業内容、C列に作業人員が入力されているとします。 それをユーザーフォームから操作したいです。 ユーザーフォーム上にコンボボックスとテキストボックス1,2を設置しています。 コンボボックスのRowSourceにA列日付をセットしています。 コンボボックスを操作すると、その日付のB列、C列の内容をそれぞれテキストボックス1,2に表示させたいです。

  • VBAマクロのコンボボックス 続き 3

    ほんとうに助かっております。 ここに質問するということはネットでみつけきれなかったということでご了承ください。 コンボボックスの設置場所はユーザフォームではなくワークシート上です。 ちなみにverはExcel2003です。 コンボボックスの性質といいますか、あるセルの値をみてリストに値を表示するかしないかを行いたいです。 しかし、すぐには反映されず一度動作(オブジェクト実行)させないと値の反映が行われません。 セルの値が変わると即座にコンボボックスリスト内の値の有無が反映させる方法を教えてください。 よろしくお願いいたします。

  • ワークシートとコンボボックスを共存させたい

    エクセルのVBAで、ワークシートの左側にコンボボックスを設置することはできますか? コンボボックスにA、B、Cとあるとすると、Aをクリックしたら右側にAのsheetが開くようにしたいのですが。 もしくは、VB2005で、フレームの左右、または同じフォームの中で左側にコンボボックス、右側にワークシートを設置する方法はありますか? どちらか可能な方法でプログラムを組み、ワークシート上にはユーザーが数値を打ち込んで自動計算できるようにしたいのですが。 よろしくお願いします。

  • エクセルで、複数のシートからコンボボックスへ

    エクセルVBA初心者です。 作成したワークシート名をVBAにてリストボックス内に表示し、それを選択するとそのシートに飛ぶようにするためには、どうすればいいでしょうか?? よろしくお願いします。

専門家に質問してみよう