ベストアンサー リストのどの値も選択しないようにする &リストの文 2014/08/04 19:32 エクセルのシート上にリストボックスがあるのですが、 vbaで、リストのどの値も選択しないようにするコードと、 vbaでリストの文字を選択するコード、 (例えば「a」を選択中にする)方法を教えていただけますか? 画像を拡大する みんなの回答 (1) 専門家の回答 質問者が選んだベストアンサー ベストアンサー kkkkkm ベストアンサー率66% (1747/2623) 2014/08/04 20:09 回答No.1 以下の方法で可能です。 > vbaで、リストのどの値も選択しないようにするコード ListBox1.ListIndex = -1 > vbaでリストの文字を選択するコード、 > (例えば「a」を選択中にする)方法 ListBox1.ListIndex = 0 質問者 お礼 2014/08/30 11:32 ありがとうございました。 広告を見て全文表示する ログインすると、全ての回答が全文表示されます。 通報する ありがとう 0 カテゴリ パソコン・スマートフォンソフトウェアオフィス系ソフト 関連するQ&A リストボックスの全ての値を取得するには? エクセルのシート上のリストボックスに あああ いいい が表示されてるとして、 その二つの値をコマンドボタンを押した際に取得したいのですが Private Sub cmd_取得_Click() MsgBox Me.ListBox1.Value End Sub だと現在リストボックスで選択中の値しか取得されません。 リストボックスであああが選択中なら、 あああしか返ってきません。 あああ、いいいをVBAで取得する方法を教えてください。 EXCEL2000 リストボックスの返り値について はじめまして。 EXCEL2000で、ワークシート上にリストボックスを作成しました。 複数選択できるタイプなのですが、選択した内容の判断はどのように行えばよいのでしょうか。 例えば、セルA1:A5に「あ」「い」「う」「え」「お」と入力されており、これがリストボックスの内容としてリンクされています。 リストボックスから選択すると、選択した文字に対応してセルB1:B5に「1(選択)」「0(未選択)」と数字のみ入るようにしたいのですが… ワークシート上、あるいはVBAでできる方法がありましたらご教授お願いいたします。 ちなみにVBAは初心者です。 excelでリストボックスで選択した値に定められた値を返す excel2000で計算シートを作っています リストボックスで会社名をえらぶと 例:A社 B社 C社 ・セルC2に、A社なら1000 B社なら1200 C社なら800 とあらかじめ定められた値を返す 関数で、値を返すことはできるのですが リストボックスを範囲として指定できないのでしょうか? また、上記をVBAを使わずに、設定することは可能でしょうか? 宜しくお願いいたします 携帯料金を賢く見直す!格安SIMと端末選びのポイントは? OKWAVE コラム エクセル リストボックスをボタンで選択するマクロ。 VBA初心者なので教えていただけるとありがたいです。 現在、sheet1にリストボックスを貼り付けています。 そのリストボックスで選択した値を、sheet2のA1セルに貼り付けるようなマクロを作ってみました。 リストボックスのリストは、下のような感じになっています。 空白 ああああ いいいい うううう これとは別にボタンを作成し、ボタンを押すとこのリストボックスの空白(一番上のリスト)を選択するようにしたいのですが、このようなことはできるのでしょうか? なぜこのようなことがしたいのかは、説明が長くなりそうなので省略させていただきます。 どなたか教えていただけるとありがたいです。 EXCELのリストボックスを選択した行が何行目か エクセルVBAの初心者です。 VBAを組んでいて表のデーターをリストボックスに表示しています 選択されたリストボックスの値はわかるのですが、リストボックスの上から 何行目を選択したかどうか知りたいのですが、わかる方がおられましたら よろしくお願いします。 シート上のリストボックスに値を表示するには? エクセル2003です。 コントロールツールボックスからシートにリストボックスを設置しました。 ここに値を指定するにはどうすればいいでしょうか? フォーム上のリストボックスなら Private Sub UserForm_Initialize() UserForm1.ListBox1.RowSource = "Sheet1!a2:a3" End Sub とすればいいのですが シートのイベントにInitializeはありません。 どこのイベントプロシージャーに 「リストボックスに値を表示する」というコードを書けばいいのでしょうか? シートモジュールにに Private Sub ListBox1_Click() UserForm1.ListBox1.RowSource = "Sheet1!a2:a3" End Sub としても何も起こりません。 できればファイルを開いた時からリストボックスに値を表示させるようにしたいです。 ご教授よろしくお願い致します。 エクセル VBAのリストボックス エクセルのVBAでユーザーフォーム上のリストボックスに文字を入力すると候補がドロップダウンリストに表示され、候補から一つを選択するとドロップダウンリストをとじるといったコードを教えてください。ただし、最終的にリストボックスの値はリストから選ぶのみで、文字を入力するのは候補を表示するためだけに使いたいのです。どなたか、ご教授願います。 動的なリストボックスにしたい シートAには縦にコード、名称があり、シートBには横にシートAのコードがあり、それぞれのコード下に属する値の一覧があるとします。 シートAではそれぞれの行にデータの入力規則のリストを設定して該当する行のコードに対応する値をリストボックスで選ばせるようにしたいと考えています。 実際のコードは3000程度あり定期的に追加されるものとして、追加作業の手間を減らすため範囲の名前設定等は使用しないようにしたいのですがいい方法はないでしょうか。 考えているのはOFFSETでシートAのコードをINDEXとMATCHを使ってシートBから該当コードの値一覧をリストボックスに反映できないかとやってみているのですが、文字数が多くなりデータの入力規則に落とし込めません。 また、ワークセルはできるだけ使用しないで実現できればと考えています。 いい方法がありましたら教えていただけると助かります。 Excel VBA機能で、ドロップダウンリストの選択肢からセルに値を設 Excel VBA機能で、ドロップダウンリストの選択肢からセルに値を設定したい。 リスト形式のシート(仮にA)の内容を、VBAを使って単票形式のlシート(仮にB)に展開したいと考えています。ところがBのシートには、入力規制のあるセルもあり、ドロップダウンリストからの選択になっています。 今、シートBのセルA1の選択肢を仮に”AAA,BBB,CCC”として、VBAを用いてA1にBBBを設定(選択)する方法をご教示頂きたいと存じます。 ひと通り過去ログは拝見しましたが、恐らく私の見落としとは思うのですが、それらしいものは見当たらないので、質問させて頂きました。宜しくお願いします。 エクセルのリストボックスの複数選択について エクセルのワークシート上に配置するリストボックスで複数選択する場合に値(番号)を返す方法を教えてください。よろしくお願いします。 リストボックスの値を全選択する エクセルのユーザーフォームにリストボックスとコマンドボタンを設置し、 コマンドボタンをクリックするとリストボックス内の値を全選択する。 という動作は出来ますでしょうか。 勉強不足で申し訳ありませんが、ご教示願います。 リストボックスの値の保存 教えて下さい。 リストボックスの値がページをめくると白紙に戻ってしまうのはどうしてですか? 原因は、リストボックスの選択解除のVBAを入れているからですか・・・? ヤバいパソコンが壊れたかも!?事前に知っておきたい3つの兆候と対策 OKWAVE コラム フォームのリストボックスに値を表示させたい VBA フォームのリストボックスに値を表示させたい A1→aaa A2→bbb リストボックスに上記の値を表示させたいなら、 Private Sub UserForm_Initialize() UserForm1.ListBox1.RowSource = "Sheet1!A1:A2" End Sub で出来ますが、シート上のセルで表示する値を指定するのではなく、VBA上で、リストボックスに表示させる値を指定したいのです。 Private Sub UserForm_Initialize() UserForm1.ListBox1.RowSource = "aaa,bbb" End Sub を実行すると、VBA実行時エラー380になってしまいます。 UserForm1.ListBox1.RowSource = "aaa;bbb" もダメでした。 ご回答よろしくお願いします。 リストボックスにシートの値を表示させたいのですが vbaでシートのリストボックスにシートの値を表示させたいのですが シートモジュールでこのコードを実行しようとしてもエラーになり出来ないのですが どこが間違ってますか? Sub リストボックスに値を表示する() Me.ListBox1.RowSource = Range("c1:c10").Value End Sub Me.ListBox1.Value = Range("c1:c10").Value もエラーになりました。 エクセルVBAについて質問です。 エクセルVBAについて質問です。 シート1のユーザーフォームにコンボボックスとテキストボックスが各1つずつ、 シート2のA列には1行目から順に「あ」「い」「う」と文字が入っていて、B列には「1」「2」「3」と値が入っています。 コンボボックスのリストにはシート2のA列の文字が選択できる状態にあります。 この状態で、例えばコンボボックスで「い」を選んだら、テキストボックスに自動的に「2」と入る、というように、コンボボックスのリストの中から任意の文字を選択したときに、テキストボックスにB列の値が入るようにするにはどのようにすればいいのでしょうか?よろしくお願いします。 リストボックスの値取得方法について VBAでリストボックスを使用しています。リストボックスの中には、A,B,C,D,Eと表示されています(カンマは行とします。 つまりリストボックスには5行表示されています)。選択はされていない状態です。この状態でボタンを押すことにより ループで各行の値を取得したいと思っています。listcountを利用してlistcountの数までループをまわし、各行の値を 取得したいです。値というのは、A,B,C,D,Eです。この値を配列なり変数なりにいれたいのです。 どのリストボックスのプロパティを利用すれば、選択されていないリストボックスの各値を取得することができるでしょうか? VBAで入力規則のリスト参照元の値取得 エクセル2007を使っています。 VBAツールを作っており、その処理で使われる一機能として 「任意のセルに設定されている入力規則のリストの元の値をVBAで取得する」処理を コード中に書きたいと思っております。 ■質問概要 「入力規則のリスト」が設定されている任意のセルを選択したときに、そのセルに設定されている 「入力規則のリスト」の「元の値」をVBAで取得する方法について教えてください。 ※取得した値は配列型の変数に代入するものとします ■想定イメージ たとえば、次のようなブックで使うことを想定しております(画像参照) ※実際はもっとデータ量が多いブックで使う予定です ・「リスト元の値」というシートで「選択言語」という名前でリストを定義化 ・「通常操作するシート」では値を入力したいセルに対し、「入力規則のリスト」の「元の値」を 「=選択言語」で設定 VBAではこの「通常操作するシート」の入力欄のセルを選択している時に「選択言語」で定義されている データをすべて取得し配列型変数に代入するという動作をさせたいと思っています。 この方法について教えてくださいますようお願いします。 Excel VBA ユーザーフォームのコンボボックスに表示する値の入力方法 Excel Xを使用して、VBAのユーザフォームにコンボボックスを作りましたが、どうしてもコンボボックス内に表示する値の入力方法が分かりません。 WEBや本などで「これ」と思われるものを実験していますが、どれも表示することができません。 できるだけ詳しく教えていただけませんか? したいことは、 cbocenter というコンボボックスに値を出します。 値は List シートの A2 から A18 に入力済みです。 それと値から選択した値を data シートの J列 に 表示させたいのです。(行の指定はできています) 本当に困ってます。よろしくお願いします。 コンボボックスで選択した値をシートに転記する エクセルを使用して表を作成していますが、うまくいきません。 作りたいのは下記のものです。 sheet1にリストを作成 (リストはA-F列で300行程、また先頭A列は任意の不連続番号) sheet2に表を作成 sheet2のA1にコンボボックスを作成 コンボボックスにはsheet1のリストのA,B列を表示させたい またコンボボックスで選択した行のデータをsheet2にコピーさせる。 と、なるようにしたいのですが、どのようにしたら良いのでしょうか? コンボボックスのリンクから参照したVLOOKUPだとセルのデータを上書きされると、式がなくなってしまうので、VBAで作成したいです。 2つのリストボックス間で自動に値をセット。 2つのリストボックス間で自動に値をセット。 リストボックスを2つ用意します。 仮にAリストボックスとBリストボックスとします。 Aリストボックスから値を選択すると、 Bリストボックスに自動連動して値が選択される。 このようなことは可能でしょうか?。 (可能だとは思うのですが) どなたかご教授下さい。 注目のQ&A 「You」や「I」が入った曲といえば? Part2 結婚について考えていない大学生の彼氏について 関東の方に聞きたいです 大阪万博について 駅の清涼飲料水自販機 不倫の慰謝料の請求について 新型コロナウイルスがもたらした功績について教えて 旧姓を使う理由。 回復メディアの保存方法 好きな人を諦める方法 小諸市(長野県)在住でスキーやスノボをする方の用具 カテゴリ パソコン・スマートフォン ソフトウェア Excel(エクセル)Word(ワード)PowerPoint(パワーポイント)Access(アクセス)その他MS Office製品オフィス系ソフトPhotoshop(フォトショップ)Illustrator(イラストレーター)その他Adobe製品画像・動画・音楽編集ホームページ作成ソフト筆まめ・はがき作成フリーウェア・フリーソフトその他(ソフトウェア) カテゴリ一覧を見る OKWAVE コラム 突然のトラブル?プリンター・メール・LINE編 携帯料金を賢く見直す!格安SIMと端末選びのポイントは? 友達って必要?友情って何だろう 大震災時の現実とは?私たちができる備え 「結婚相談所は恥ずかしい」は時代遅れ!負け組の誤解と出会いの掴み方 あなたにピッタリな商品が見つかる! OKWAVE セレクト コスメ化粧品 化粧水・クレンジングなど 健康食品・サプリ コンブチャなど バス用品 入浴剤・アミノ酸シャンプーなど スマホアプリ マッチングアプリなど ヘアケア 白髪染めヘアカラーなど インターネット回線 プロバイダ、光回線など
お礼
ありがとうございました。