ベストアンサー

Excel VBAの質問

2012/06/22 11:31

A列の２行目からＡ列の最終行を取得し、ユーザーフォームのコンボボックスにその値を表示させたいのですが構文の例を教えてもらえませんか？よろしくお願いいたします。

qc_oshiete
お礼率82% (29/35)

その他MS Office製品
回答数1
ありがとう数1

みんなの回答 （1）
専門家の回答

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

ベストアンサー

keithin
ベストアンサー率66% (5278/7941)

2012/06/22 11:48 回答No.1

はて？　＞コンボボックスにその値を表示させたいこういうことでしょうか。 private sub Userform_Initialize() me.combobox1.list = worksheets("Sheet1").range("A2:A" & worksheets("Sheet1").range("A65536").end(xlup).row).value end sub

質問者

お礼 2012/06/22 12:53

そうゆうことです！ありがとうございました。

関連するQ&A

エクセルＶＢＡについて質問です。

エクセルＶＢＡについて質問です。シート１のユーザーフォームにコンボボックスとテキストボックスが各１つずつ、シート２のＡ列には１行目から順に「あ」「い」「う」と文字が入っていて、Ｂ列には「１」「２」「３」と値が入っています。コンボボックスのリストにはシート２のＡ列の文字が選択できる状態にあります。この状態で、例えばコンボボックスで「い」を選んだら、テキストボックスに自動的に「２」と入る、というように、コンボボックスのリストの中から任意の文字を選択したときに、テキストボックスにＢ列の値が入るようにするにはどのようにすればいいのでしょうか？よろしくお願いします。
Excel VBA の質問です

ユーザーフォームの中のコンボボックスの値をリストから呼び出して選択したとき、テキストボックスの値を同じリストの別の列から表示させたいです会社の仕事で品番と品名がありますが、必ず品番は一つの固定の品名を持っています。なので、品番を製品のマスタからひろってきてるのでわざわざ品名を入力するのは面倒です製品マスタは例えばＡ列の2行目に　ある品番があればその品名がB列の2行目に必ずありますよろしくお願いします
Excel VBA ユーザーフォームのコンボボックスに表示する値の入力方法

Excel Xを使用して、VBAのユーザフォームにコンボボックスを作りましたが、どうしてもコンボボックス内に表示する値の入力方法が分かりません。 WEBや本などで「これ」と思われるものを実験していますが、どれも表示することができません。できるだけ詳しく教えていただけませんか? したいことは、　cbocenter　というコンボボックスに値を出します。　値は　List　シートの　A2　から　A18　に入力済みです。　それと値から選択した値を　data　シートの　J列　に　表示させたいのです。（行の指定はできています）本当に困ってます。よろしくお願いします。
エクセルVBA

初心者ですエクセル2003 ユーザーフォームのコンボボックスの連携について教えてください　 Seet1　　　　　　A　　　　　B　　　　　C　　　　　D　　　　　　E　　　　　F　　　　　　　　　　 1　　　種類1　　　商品1　　商品A　　商品あ　　　　　　　　コンボ1　 2　　　種類2　　　商品2　　商品B　　商品い 3　　　種類3　　　商品3　　商品C　　商品う　　　　　　　　　　　　　　　 4　　　種類4　　　商品4　　商品D　　商品え　　　　　　　　コンボ2 5　　　種類5　　　商品5　　商品E　　商品お (1)コンボボックス1と2を別々のユーザーフォームで配置(ダブルクリックにて表示　F1とF4） (2)コンボボックス1でA列の種類を選択によりコンボボックス2のリストが変わる (3)コンボボックス1で選んだ種類をF1のセルに挿入 (4)コンボボックス2は種類1の場合はB列　　　　　　　　　　　　種類2の場合はC列　　　　　　　　　　　　種類3の場合はD列のリストとします (5)コンボボックス2で選択した商品をF4に挿入といった具合です何度か挑戦しましたが、同一ユーザーフォームにコンボボックス2つは成功するのですがうまくいきませんコード及びコード記入場所を教えていただけませんかよろしくお願いいたします
エクセルVBA(ユーザーフォーム)について質問です

たとえばユーザーフォームを表示させSheet1のA列最終行へ入力させることは出来ましたが同時にSheet2のA列の最終行にも同じく反映させたい
エクセルのコンボボックスについて質問です。

エクセルのコンボボックスについて質問です。まずワークシートのＡ列に「県名」、Ｂ列に「名前」を入力したとします。Ａ列Ｂ列福岡たかし長崎なおこ長崎きょうこ佐賀つとむとして、ユーザーフォームにコンボボックスを２つ作ります。まず、コンボボックス１に「県名」を表示させて、コンボボックス２には、コンボボックス１で選んだ「県名」にあてはまる「名前」だけを表示させたいんですが、どういう記述をすれば宜しいでしょうか？（例）コンボボックス１で「長崎」を選択したら、コンボボックス２に「なおこ・きょうこ」とリストができるようにしたい
excel 2003 vba コンボボックス　日付

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

C# DataGridView特定セルの入力フォーム変更について C# DataGridViewについての質問です。 DataGridViewで1列目のコンボボックスを選択した値によって、その行のみ 2列目の入力フォームを変更したいのですが、その様なことは可能でしょうか？例.1行目1列目コンボボックス「a」選択時、1行目2列目コンボボックス表示　　2行目1列目コンボボックス「b」選択時、2行目2列目テキストボックス表示　　3行目1列目コンボボックス「c」選択時、3行目2列目チェックボックス表示列全体の入力フォームを変更する処理なら分かるのですが、特定のセルのみ変更する方法が分かりません。もし可能であれば実現方法も教えて頂けると非常に助かります。宜しくお願いします。
エクセルについて質問です。

ユーザーフォームの使い方で、テキストボックスやコンボボックスのControlSourceを,フォームを開いたのとは別のシートのセルにあてたいんですけど、できますか？同様に、コンボボックスのRowSourceのリストも、別のシートの値を拾いたいんです。具体的に言えば、ユーザーフォームを開くのは、常に「Sheet1」であって、入力した内容を表示するのは「Sheet2」なのです。コンボボックスのリストは本当は、「Sheet3」の値を拾いたいのです。今はよくわからないので、全部「Sheet1」にリンク（？）させて、値を取得させるようにしてます。それと、セルの数式の中に別のセルの数値を代入できますか？例えば、あるセルの数式が「＝Ｓｈｅｅｔ２！Ａ４」だとしましょう。この場合の「Ｓｈｅｅｔ２」の「２」に、例えば、ある別のセルの値を代入して、「＝Ｓｈｅｅｔ３！Ａ４」とかにしたいのです。つまり「＝Ｓｈｅｅｔ”Ａ１”！Ａ４」みたいにして、「Ａ１」のセルの値が「２」、「３」に変われば元の数式も変わる、みたいに。同じように、セルの範囲につけた名前や、リンクするファイルの名前も数式の変数に入れられるのでしょうか？とりあえず、セルの数式の中に、別のセルの値を”文字”や”数値”として入れたいのです。ちょっと説明がわかりにくいかもしれないけど、教えて下さい。
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 というコードになると思うのですが、うまくいきません。どうぞよろしくお願いいたします。
Access→Excelへの出力とVBA

エクセルのシート１のB列に2種類の数値どちららかを選択させ、 A列の行数にそって入力させたいと考えています。数値の判断は、 AccessのフォームABCにあるコンボボックスAで ○×を選んだときは「1」、 AccessのフォームABCにあるコンボボックスAで ☆★を選んだときは「2」をA列に入力されている値の行数だけB列に値を入力させるには、どの様にしたら良いのでしょうか？ Access単品の操作では出来ないと聞きました。よろしくお願いします。
EXCEL VBAのコンボボックスに取り込むリストについて

すいません、EXCEL VBAのコンボボックスにデータを取り込む方法について教えていただきたいことがあります。 (1)「シート１」のＡ列にデータが入力されている (2)ユーザーフォームにコンボボックスを設置し、このＡ列のデータを取り込む。このときにＡ列に入っているデータの数だけ取り組むにはどうしたらいいのでしょうか。シート１　　　Ａ列１行　１１２行　２１３行　３１　・　　　・　・　　　・ Private Sub UserForm_Initialize() ComboBox1.RowSource = Sheets("シート１").Range("？") End Sub ？の部分がわかりません。End(xlup)のようなものを使ってデータが入っている最後の行を調べるのかと思いましたが、どうもうまくいきませんでした。よろしくお願いします。
エクセル2007VBAで検索するコードを知りたい。

エクセル2007(Excel2007)のVBAで【検索と置換】と同等の機能をもった検索アプリケーションを作りたいのですが、そのコード(コマンドボタンを実行したときのコード)を教えていただけないでしょうか。 (おそらくですが、リストボックスのコードも必要だと思います。) 正しくは、【検索と置換】から【置換】機能を無くしたものとイメージしていただきたいです。 ●設置するものユーザーフォーム(UserForm1) テキストボックス(TextBox1) コマンドボタン(CommandButton1) リストボックス(ListBox1) ●仕様ユーザーフォームのテキストボックスに入力してコマンドボタンを押すと、検索対象を見つけ、リストボックスにその対象一覧を行ごとに表示するものになります。 ●検索するときの条件 (1)大文字と小文字を区別しない (2)半角と全角を区別しない (3)部分一致すれば(一部でも一致すれば)検索対象にする (4)今、開いているワークシート上の「全てのセルが検索対象(列や行を指定しない)」 ※検索されたセルの存在する行ごとに、ユーザーフォームのリストボックスに(1行ずつ)表示したいです。そして、リストボックスに表示されたデータのうち、どれか1つを選ぶと、その選択対象の行の【D列】にアクティブセルを移動するようにしたいです(画面もアクティブセルが見える位置にスクロールします)。 ●リストボックスに(1行ごとに)表示するもの● ↓↓↓ (左から)I列の値、D列の値、O列の値、Q列の値(→4列の値になります) ※リストボックスにQ列の値が表示された場合のみ(Q列に何かしらのデータがある場合のみ)、リストボックス上の【その行の(I列の値、D列の値、O列の値、Q列の値の)文字すべてを赤色】にして表示していただきたいです。分かる方がいましたらよろしくお願いいたします。
Excel VBA　リストボックスの複数列表示の方法について

すいません、エクセルVBAのユーザーフォームのリストボックスの表示方法について質問があります。シートのセルに　　 A列　 D列　　　G列 1行りんご　　赤　　　120円 2行　みかん　　黄　　　130円 3行　すいか　　緑 110円 4行　りんご　　赤 160円 . ・・・　　・　　　・・・ . と、50行まで値を入れます。 VBAでユーザーフォームを挿入し、 Private Sub UserForm_Initialize() With ComboBox1 .AddItem "りんご" .AddItem "みかん" .AddItem "すいか" End With End Sub でコンボボックスの値を設定し、次に Private Sub ComboBox1_Change() Dim i As Integer For i = 1 To 50 If Cells(i, 1).Value = ComboBox1.Value Then With ListBox1 .ColumnCount = 3 .AddItem Cells(i, 1) End With End If Next i End Sub このときコンボボックスと同じ値の行について、リストボックスにA列、D列、G列を表示させるにはどうしたらいいのでしょうか。例えばコンボボックスで「りんご」を選択したときに、リストボックスをりんご　赤　120円りんご　赤　160円と表示させたいのですが、 .AddItem Cells(i, 1) では一列だけしか表示できません。 Rowsorceを使ってみたりしましたが、どうにもうまく出来ませんでした。よろしくお願いいたします。
エクセル　VBA コンボボックスで検索

エクセルVBA初心者です。シート1行目には工場名、2行目に見出し、3行目からデータが記入されています。 2行目に見出しとして、A列には作業者名、B列に工事番号、C列から作業時間などが記入されています。ユーザーフォームにコンボボックス、コマンドボタンを設置し、コンボボックスには工事番号一覧が表示されるようにするところまではできましたが、コンボボックスで工事番号を選択し、コマンドボタンを実行することで、１シート内の一致する行だけを表示したいのですが、いろいろなサイトを参考に試してみたのですがうまくいきませんでした。同じ内容のシートが複数ありますが、シート毎での検索・抽出をしたいと考えています。どのようなコードを作成したら良いのかご教授願えたら幸いです。よろしくお願い致します。
Excel VBA　フォーム上のコンボボックス

Excel VBA　フォーム上のコンボボックスの値リストが例えば5行あります。 3行目の行（値）の背景色を変更したいのですが出来ますでしょうか？よろしくお願いします。
アクセス９７のコンボボックスについて

ＯＳはACCESS97ですフォーム上のコンボボックスに 2列　リスト表示できるようにしています。 1列目を選択するのに　2列目も表示させている状態です。選択すれば1列目の値は取得できます。今回　その同じ行の1列目と2列目を　それぞれ別のテキストＢＯＸに格納することは　できるのでしょうか？例えば　1列目に　Ａ　2列目に　ＡＡ　とデータがあればＡを　テキストBOX1　に　AAをテキストBOX2に　格納したいのです。宜しくお願いします。
VBA 一つ前の動作を無効にするには？？

エクセル２００２使用です。ユーザーフォームにコンボボックス１、コンボボックス２のを２つ並べました。コンボボックス２はコンボボックス１の値によって違う値を取得するため、コンボボックス１に必ず入力がなければなりません。そこで Private Sub ComboBox2_DropButtonClick() If ComboBox1.ListIndex = -1 Then MsgBox "コンボボックス１を入力してください" End If end　sub としましたが、DropButtonClickの動作は有効なので、メッセージボックスを閉じると、適当な値（今回はコンボボックス2設定のの一番最初の値）を表示してしまいます。 DropButtonClickの動作を無効にする方法がわかりません。よろしくお願いします。
エクセル　マクロ　時間

１）フォームにて時間を表示する。コンボボックス２つ作る。コマンドボタン（記録）を１つ作る。２）1つのコンボボックスには時を選択させる。リストはリストはSheet２に01・02・03・・・とＡ列に00まで作る。３）もう１つのコンボボックスには分を選択させる。リストはSheet２に01・02・03・・・とＢ列に00まで作る。４）フォームの記録ボタンを押すと、sheet1のＡ２に（例　２３：３４）と表示させたい。マクロの記述を教えてください。
Excel ユーザーフォームでコンボボックスを使用してデータ入力

Excelのユーザーフォームでコンボボックスを使用して、シートのデータを表示しています。コンボボックス：ComboBox1 テキストボックス1-3：TextBox1-3 コンボボックスのRowSource：シート名!A2:C100 コンボボックスの変更時の動作： Me!TextBox1.Value = ComboBox1.Value とここまではできたんですが、テキストボックス2にシートのB列の値を、テキストボックス3にシートのC列の値を入れたいのですが、どのようにしたらいいのでしょうか？

Excel VBAの質問

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

お礼 2012/06/22 12:53

関連するQ&A

エクセルＶＢＡについて質問です。

Excel VBA の質問です

Excel VBA ユーザーフォームのコンボボックスに表示する値の入力方法

エクセルVBA

エクセルVBA(ユーザーフォーム)について質問です

エクセルのコンボボックスについて質問です。

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

C# DataGridView特定セルの入力フォーム変更について

エクセルについて質問です。

EXCEL　VBA　ユーザーフォームコンボボックスのRowSourceの設定方法について

Access→Excelへの出力とVBA

EXCEL VBAのコンボボックスに取り込むリストについて

エクセル2007VBAで検索するコードを知りたい。

Excel VBA　リストボックスの複数列表示の方法について

エクセル　VBA コンボボックスで検索

Excel VBA　フォーム上のコンボボックス

アクセス９７のコンボボックスについて

VBA 一つ前の動作を無効にするには？？

エクセル　マクロ　時間

Excel ユーザーフォームでコンボボックスを使用してデータ入力

注目のQ&A

カテゴリ
一覧

専門家に質問してみよう
専門家登録

あなたにピッタリな商品が見つかる！ OKWAVE セレクト

Excel VBAの質問

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

お礼 2012/06/22 12:53

関連するQ&A

エクセルＶＢＡについて質問です。

Excel VBA の質問です

Excel VBA ユーザーフォームのコンボボックスに表示する値の入力方法

エクセルVBA

エクセルVBA(ユーザーフォーム)について質問です

エクセルのコンボボックスについて質問です。

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

C# DataGridView特定セルの入力フォーム変更について

エクセルについて質問です。

EXCEL VBA ユーザーフォームコンボボックスのRowSourceの設定方法について

Access→Excelへの出力とVBA

EXCEL VBAのコンボボックスに取り込むリストについて

エクセル2007VBAで検索するコードを知りたい。

Excel VBA リストボックスの複数列表示の方法について

エクセル VBA コンボボックスで検索

Excel VBA フォーム上のコンボボックス

アクセス９７のコンボボックスについて

VBA 一つ前の動作を無効にするには？？

エクセル マクロ 時間

Excel ユーザーフォームでコンボボックスを使用してデータ入力

注目のQ&A

カテゴリ 一覧

専門家に質問してみよう 専門家登録

あなたにピッタリな商品が見つかる！ OKWAVE セレクト

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

EXCEL　VBA　ユーザーフォームコンボボックスのRowSourceの設定方法について

Excel VBA　リストボックスの複数列表示の方法について

エクセル　VBA コンボボックスで検索

Excel VBA　フォーム上のコンボボックス

エクセル　マクロ　時間

カテゴリ
一覧

専門家に質問してみよう
専門家登録