エクセル複数列のコンボボックスの使い方
- エクセルで複数列のコンボボックスを使いたい場合、RowSourceプロパティを使用して指定した範囲のデータを設定し、特定のセルに選択された値を入力することができます。
- また、ColumnCountプロパティを使用して表示する列の数を指定し、ColumnWidthプロパティを使用して表示されない列を設定することも可能です。
- このように設定することで、特定のセルに選択された値を入力させることができます。エクセルのヘルプなどを参考にしながら、設定を行ってください。
- ベストアンサー
エクセル複数列のコンボの使い方？
こんにちは，よろしくお願いします。 複数列のコンボボックスを作成しました。 ワークシートからRowSourceプロパティで”Ａ１：Ｂ４”と設定して， ＿＿＿＿Ａ列＿＿Ｂ列 １行目＿＿あ＿＿Ａ ２行目＿＿え＿＿Ｚ ３行目＿＿さ＿＿Ｄ ４行目＿＿き＿＿Ｇ さらに，ColumnCountプロパティを２とし， ColumnWidthを，72 pt;0 ptとし，B列を表示されないようにしました。 このように，Ａ列だけ表示させて，例えば「え」を選択したとき，特定のセルに「Ｚ」と入力させたいのですがどのようにすれば良いのでしょうか？ このようなことを，以前に行ったことがあるのですが，ヘルプなどを見てもどうしても思い出せません。 すみません，よろしくお願いします。教えて下さい。
- emikouji
- お礼率53% (130/243)
- その他MS Office製品
- 回答数3
- ありがとう数1
- みんなの回答 （3）
- 専門家の回答
質問者が選んだベストアンサー
- ベストアンサー
こんばんは。 そのようなときは、Listプロパティを使えば出来ます。 たとえば、選択した直後にD1に入れる場合 Private Sub ComboBox1_Change() Dim LRow As Long LRow = Me.ComboBox1.ListIndex Range("D1").Value = Me.ComboBox1.List(LRow, 1) End Sub このような感じでできます。
関連するQ&A
- エクセルでコンボボックス内に2列表示をしたい
オプションでrowsourceに、A3:B10としたばあい、2列表示をしてほしいのです。 しかし、選択して、コンボボックスに表示するときは、A列の分だけでいいのです。 こんなことってできますか？ また、コンボで選択したものが、表示されますが、別のものを選択した場合、その後ろにスペースを空けて表示するなんてことはできますか？ コンボボックスで選択するものが2つ以上できたらいいと思います。
- ベストアンサー
- オフィス系ソフト
- VBAを使用しコンボボックスにリストを設定する方法
いつもお世話になっております。 現在コンボボックスにリストを設定する方法について悩んでいます。 バージョンはExcel2003です。 コンボボックスに指定したい列がA列とB列なら通常下記のようにすると思います。 With ComboBox1 .ColumnCount = 2 .ColumnWidths = "50;50" .RowSource = "Sheet1!A2:B5" End With ただ今回はA列とC列をリストに設定したいと思い、下記のような設定にしたのですがうまく設定できません。 With ComboBox1 .ColumnCount = 2 .ColumnWidths = "50;50" .RowSource = "Sheet1!A2：A5;C2:C5" End With そもそもRowSource は連続的なデータを設定する場合のプロパティだと思うのですが、このように飛んだ列のデータを効率的に指定するにはどのようにするのが一番いいのでしょうか？ 分かる方がいっらしゃいましたらご教授願います。
- ベストアンサー
- オフィス系ソフト
- excel 2003 vba コンボボックス 日付
始めまして初心者です。よろしくお願いします。 ワークシートのA列に日付、B列に作業内容、C列に作業人員が入力されているとします。 それをユーザーフォームから操作したいです。 ユーザーフォーム上にコンボボックスとテキストボックス1,2を設置しています。 コンボボックスのRowSourceにA列日付をセットしています。 コンボボックスを操作すると、その日付のB列、C列の内容をそれぞれテキストボックス1,2に表示させたいです。
- 締切済み
- その他（プログラミング・開発）
- エクセルのコンボボックスについて質問です。
エクセルのコンボボックスについて質問です。 まずワークシートのＡ列に「県名」、Ｂ列に「名前」を入力したとします。 Ａ列 Ｂ列 福岡 たかし 長崎 なおこ 長崎 きょうこ 佐賀 つとむ として、ユーザーフォームにコンボボックスを２つ作ります。 まず、コンボボックス１に「県名」を表示させて、コンボボックス２には、 コンボボックス１で選んだ「県名」にあてはまる「名前」だけを 表示させたいんですが、どういう記述をすれば宜しいでしょうか？ （例） コンボボックス１で「長崎」を選択したら、コンボボックス２に「なおこ・きょうこ」とリストができるようにしたい
- 締切済み
- オフィス系ソフト
- ExcelVBA コンボボックスの表示
お世話になります。 VBAユーザフォームのコンボボックスのリストにソースから追加しています。 ColumnCountを2に設定しているので、コンボボックスから選択するときにはちゃんと2列表示されるのですが、選択したあとにコンボボックスの表示に残るのは1列目だけなのです。 どのプロパティを変更したらいいのか見つかりません。 ご存知の方がいらっしゃいましたら、教えてください。 よろしくお願い致します。
- ベストアンサー
- Visual Basic
- EXCEL VBAのコンボボックスに取り込むリストについて
すいません、EXCEL VBAのコンボボックスにデータを取り込む方法について教えていただきたいことがあります。 (1)「シート１」のＡ列にデータが入力されている (2)ユーザーフォームにコンボボックスを設置し、このＡ列のデータを取り込む。 このときにＡ列に入っているデータの数だけ取り組むにはどうしたらいいのでしょうか。 シート１ Ａ列 １行 １１ ２行 ２１ ３行 ３１ ・ ・ ・ ・ Private Sub UserForm_Initialize() ComboBox1.RowSource = Sheets("シート１").Range("？") End Sub ？の部分がわかりません。End(xlup)のようなものを使ってデータが入っている最後の行を調べるのかと思いましたが、どうもうまくいきませんでした。 よろしくお願いします。
- ベストアンサー
- オフィス系ソフト
- エクセルＶＢＡのコンボボックスについて教えてください
こんにちは。 エクセル2007のコンボボックス（ユーザーフォーム） の質問です。 Ａ Ｂ Ｃ １ さんま 塩焼き さしみ ２ まぐろ さしみ ステーキ ３ さば 味噌 ばってら 上記のようなデータがあるとします。 名前の定義にて Ａ１：Ａ３に”魚”という名前を付けます。 Ｂ１：Ｃ１に”サンマ” Ｂ２：Ｃ２に”マグロ” Ｂ３：Ｃ３に”サバ” という名前をそれぞれ付けます。 それぞれの名前を プロパティのＲｏｗＳｏｕｒｃｅ へ入力しコンボボックスの項目を表示したのですが、 ”魚”と入力した時は”さんま””まぐろ””さば”と表示されたのですが ”サンマ”と入力した時は”塩焼き”のみ表示されました。 ”マグロ””サバ”も同様にＢ列しか表示されません。 どのようにしたら”塩焼き””さしみ”と表示 出来るのでしょうか？ どなたかよろしくお願いします。
- ベストアンサー
- オフィス系ソフト
- エクセルマクロについて コンボボックスについて
コンボボックスについて質問が２つあるのですが、 １．コンボボックスのリストに、シートに記載の値や文字を採用するにつき、 プロパティのRowSourceに、B1:B100 と記述しますが、 ＡＢＣと複数シートがありまして、どのシートからコンボボックスを起動しても、ＡシートのＢ１～Ｂ５を指定したい場合、プロパティのRowSourceはどのような記述をしたらよいのでしょうか？ ２．UserFormで入力を制御したいのですが、その中に複数入力項目がありまして、その都度全部入力することはありません。 たとえば、元金、利息、月々返済額と３つある場合で、月々返済額だけ変更して、元金、利息は前の数値をそのままで入力したいとき、どのような工夫（記述）をしたらよいでしょうか？ 言い方を変えますと、UserFormを起動したときは、前回入力したそれぞれの数値がUserFormに表示されているようにしたいのです。 ちなみにエクセル２００３、ＯＳ＝ＸＰです。 どうかよろしくお願いします。
- ベストアンサー
- オフィス系ソフト
- コンボボックスのリストについて（エクセル、マクロ）
またお世話になります。 多分簡単な疑問だと思うのですが・・・、 ユーザーフォームのコンボボックスのRowsourceの 設定に関して可変式にしたいので以下のように マクロ（一部を抜粋）を組んでみました。 Dim b As Integer b = 2 Do b = b + 1 Loop Until Sheets(3).Cells(b, "A") = "" ComboBox1.RowSource = Range(Cells(2, "A"), Cells(b - 1, "C")) が、「型が一致しません」と出てうまくいきません。 どうしたらよいでしょうか？ また、 Ａ列 Ｂ列 Ｃ列 2005/1/1 東京 10 ・ ・ ・ のようにシートには並んでいるものを コンボボックスのリストとして取り入れたいのですが 変な５桁の数字しか現れず（たぶんこの数字は 2005/1/1を標準値化した数値なのでしょうが） ３つきれいにそろって表れません。 こちらの方も解決していただけないでしょうか？
- ベストアンサー
- オフィス系ソフト
- EXCEL VBA ユーザーフォームコンボボックスのRowSourceの設定方法について
EXCEL VBAのユーザーフォーム内のコンボボックスのRowSourceの設定方法について質問があります。 基本的な質問かもしれませんが、うまく検索できませんでした。 「リスト一覧」シートに A１ B1 C１ １行 りんご ばなな ぶどう ２行 100円 200円 300円 ３行 110円 210円 310円 という値を入れる。 ユーザーフォーム内にコンボボックスを２つ設置し、 コンボボックス１の値が「リスト一覧」シートの１行の値と同じときに コンボボックス２のRowSourceを同じ列の２行、３行に設定する。 Private Sub ComboBox1_Change() Dim i As Integer i = 1 Do Until Sheets("リスト一覧").Cells(1, i) = ComboBox1.Value i = i + 1 Loop ComboBox2.RowSource = i列の２行目及び３行目.Address End Sub というコードになると思うのですが、うまくいきません。 どうぞよろしくお願いいたします。
- ベストアンサー
- オフィス系ソフト
お礼
M-SOFTさん，連日ありがとうございます。 おかげさまで，出来ました。これからもよろしくお願いします。