- ベストアンサー
２つのリストボックス間で自動に値をセット。
２つのリストボックス間で自動に値をセット。 リストボックスを２つ用意します。 仮にＡリストボックスとＢリストボックスとします。 Ａリストボックスから値を選択すると、 Ｂリストボックスに自動連動して値が選択される。 このようなことは可能でしょうか？。 （可能だとは思うのですが） どなたかご教授下さい。
- ttgk
- お礼率100% (38/38)
- Visual Basic
- 回答数2
- ありがとう数3
- みんなの回答 （2）
- 専門家の回答
質問者が選んだベストアンサー
No1です。 >これはListBoxのItemが現在選択されているのと違うのが選択されたときに起こるイベントです。 違ってましたね・・・正しくはプロパティの値が変更されたときなので、 1番目のItem選択→1番目のアイテムを再度選択 のときでもイベントは起こります。
その他の回答 (1)
- rk_les
- ベストアンサー率63% (23/36)
こんにちは。何を使っているか分からなかったので.NETで書きました。 Private Sub ListBox1_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ListBox1.SelectedIndexChanged ListBox2.Items.Add(ListBox1.SelectedItem.ToString()) End Sub ListBox1のSelectedIndexChangedイベントを使用しています。 これはListBoxのItemが現在選択されているのと違うのが選択されたときに起こるイベントです。 参考までに
お礼
ありがとうございます。補足させて頂きました。
補足
説明不足で申し訳ありません。 ＶＢＡ ＶＢ６．０ ＷｉｎＸＰです。 Ａのリストボックス内の値を選ぶと、判定でＡに対応するＢの値を自動でセットしに行きたいと考えています。
関連するQ&A
- リストボックスの値取得方法について
VBAでリストボックスを使用しています。リストボックスの中には、A,B,C,D,Eと表示されています（カンマは行とします。 つまりリストボックスには5行表示されています）。選択はされていない状態です。この状態でボタンを押すことにより ループで各行の値を取得したいと思っています。listcountを利用してlistcountの数までループをまわし、各行の値を 取得したいです。値というのは、A,B,C,D,Eです。この値を配列なり変数なりにいれたいのです。 どのリストボックスのプロパティを利用すれば、選択されていないリストボックスの各値を取得することができるでしょうか？
- ベストアンサー
- Visual Basic
- リストボックスに値をセットする場合。
リストボックスに値をセットする場合。 月のリストボックスと日のリストボックスとロットマークのリストボックスがあり、 月の選択から周期を決定し、日を選択すると、決定された周期と日をもとにして、 ロットマークが決定（値の代入）されるのですが、ＩＦ文で記述すると値の代入は、 上手くいくのですが、ＳＥＬＥＣＴ文で記述すると上手くいきません。 何が悪いのでしょうか？。 どなたかご教授下さい。 [IFの時] Dim syuuki As Integer If Forms!Print![tuki] = 1 Then syuuki = 2 Else If Forms!Print![tuki] = 2 Then syuuki = 3 Else If Forms!Print![tuki] = 3 Then syuuki = 1 Else : : : If syuuki = 1 Then If Forms!Print![hi] = 1 Then Let Forms!Print![lotmark] = "Ａ" Else If Forms!Print![hi] = 2 Then Let Forms!Print![lotmark] = "Ｂ" : : : [SELECTの時] Dim syuuki As Integer Dim tuki_hantei As Integer Dim hi_hantei As Integer Dim dummy As Integer tuki_hantei = Forms!Print![tuki] hi_hantei = Forms!Print![hi] Select Case tuki_hantei Case 3, 6, 9, 12 syuuki = (tuki_hantei Mod 3) + 1 Case 1, 4, 7, 10 syuuki = (tuki_hantei Mod 3) + 1 Case 2, 5, 8, 11 syuuki = (tuki_hantei Mod 3) + 1 End Select dummy = syuuki & hi_hantei Select Case dummy Case 1 & 1 Let Forms!Print![lotmark] = "Ａ" Case 1 & 2 Let Forms!Print![lotmark] = "Ｂ" : : :
- ベストアンサー
- Visual Basic
- リストボックスの値の再表示
こんにちは！ リストボックスを選択した後に、submitボタンを押して同一 ページに飛んだ際に、選択したリストボックスの値を表示させたい （一番上の値に戻ってしまいます。） のですがどのようにすれば可能でしょうか？ ちなみにリストボックスはAccessをADO接続しています。
- ベストアンサー
- Microsoft ASP
- ドロップダウンリストの連動した使い方
ドロップダウンリスト同士を連動させたいのですが、例えば、カラムA,B,Cにそれぞれドロップダウンリストを作成しておき、カラムAでドロップダウンリストより任意の値を選ぶと、自動的にカラムB,Cも同じ位置の値がセットされるようにしたいのです。同じ位置の意味は、A,B,Cのドロップダウンリストの値を仮に10個設定しておいたら、カラムAで上から3番目を選んだらカラムB,Cでも上から3番目が選ばれセットされるようにしたいのです。 よろしくお願いします。
- ベストアンサー
- オフィス系ソフト
- リストボックスの値の保存
教えて下さい。 リストボックスの値がページをめくると白紙に戻ってしまうのはどうしてですか？ 原因は、リストボックスの選択解除のVBAを入れているからですか・・・？
- 締切済み
- その他(データベース)
- excelでリストボックスで選択した値に定められた値を返す
excel2000で計算シートを作っています リストボックスで会社名をえらぶと 例：Ａ社 Ｂ社 Ｃ社 ・セルＣ２に、Ａ社なら1000 Ｂ社なら1200 Ｃ社なら800 とあらかじめ定められた値を返す 関数で、値を返すことはできるのですが リストボックスを範囲として指定できないのでしょうか？ また、上記をVBAを使わずに、設定することは可能でしょうか？ 宜しくお願いいたします
- ベストアンサー
- オフィス系ソフト
- リストボックスについて
VBA初心者です。 VBAで以下の処理に大変困っております。 ＜処理内容＞ １．リストボックスにある値を選択して、OKボタンを押す。 ２．「１．」で選択した値をセルＡ１に出力。 ３．「１．」で選択する値が複数ある場合は、セルA1の値は コンマをつけて出力。 ＜例１＞ ----------------------- ＜リストボックス１＞ みかん りんご トマト aaa01 ----------------------- ・選択が一つの場合 「みかん」を選択して場合、OKボタンを押す。 セルA1への出力内容 みかん ・選択が複数の場合 「みかん」、「トマト」、「aaa01」を選択して、OKボタンを押す。 セルA1への出力内容 みかん、トマト、aaa01 ※ユーザフォームの処理です。 まったくわかりません。 明日中に仕上げなければいけないため大変困っております。 どなたか御教授をお願い致します。 宜しくお願い致します。
- ベストアンサー
- その他（プログラミング・開発）
- シート上のリストボックスに値を表示するには？
エクセル２００３です。 コントロールツールボックスからシートにリストボックスを設置しました。 ここに値を指定するにはどうすればいいでしょうか？ フォーム上のリストボックスなら 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 としても何も起こりません。 できればファイルを開いた時からリストボックスに値を表示させるようにしたいです。 ご教授よろしくお願い致します。
- ベストアンサー
- オフィス系ソフト
- リストボックスについて
自画面のボタンを押下時、他画面のリスト情報が取得可能か教えてください。 例） 画面が画面A，画面Bと二つあります。 ※同時に開いております。 画面Aにはリストがあり、画面Bで「選択」ボタンを押下時、 画面Aのリスト情報を取得することは可能でしょうか。 ※取得したリスト情報は画面Bのリストボックスに表示 可能でしたらどのように取得するのでしょうか。 わかりやすくするために図も用意いたしましたので 添付資料を参照ください。 簡単な質問になってしまい申し訳ございません。 どなたかご回答お願い致します。
- ベストアンサー
- JavaScript
- リストボックスの値をコンボボックスでコントロール
Access 2007をつかってデータの整理を早急にしなければならなくなり、簡単なAccessデータベースを作ってデータ入力をやっています。データの特性上もっと簡単に入力ができるはずなのですが、勉強不足でできません。ご教授ください。 テーブル（tbl） にフィールドF1とF2があります。これを元にフォームFrmを作りました。Frmにコンボボックス（Cmb）とリストボックス（Lst）があります。Cmb の値はc1, c2, c3がありF1に入力されます。Lst の値はl1, l2, l3がありF2に入力されます。Cmbでc1かc2を選んだときは、Lst のl1かl2が選択される可能性がありますが、Cmbでc3を選んだときにはl3しか選択肢はありません。ここで入力の手間を省くためc3を選択したときにl3が自動で選択される（F2にl3が自動で入力される）ようにしたいのですが、こんなことできるのでしょうか？
- 締切済み
- その他MS Office製品
お礼
ありがとうございます。補足させて頂きました。
補足
Ａのリストボックス内の値を選ぶと、判定でＡに対応するＢの値を自動でセットしに行きたいと考えています。