2つのリストボックスを連動させる
Excel2016,2013マクロ 38回
複数のリストボックスを連動する
商品などが多い時に、複数のリストボックスやコンボボックスを連動させて商品を絞り込むことができます。
ここでは、ユーザーをフォームを0から作成します。
(サンプルファイルは、こちらから
マクロ38回サンプルデータ)
新規フォームの作成
Visual Basic Editor を起動し メニューの挿入から ユーザーフォームを選択します。
![リストボックスを連動させるマクロ1](macro/macro38_02.png)
![リストボックスを連動させるマクロ1](macro/macro38_02.png)
ユーザーフォームが作成されたので サイズを調節します。次に ツールボックスからコントロールの ラベルをユーザーフォームに 設置します。ユーザーフォーム上でドラッグするとそのサイズでラベルが作成できます。
![リストボックスを連動させるマクロ2](macro/macro38_04.png)
![リストボックスを連動させるマクロ2](macro/macro38_04.png)
次に、テキストボックスを配置しましょう。ここではラベル二つと テキストボックスを一つ作成しています。
![リストボックスを連動させるマクロ3](macro/macro38_05.png)
![リストボックスを連動させるマクロ3](macro/macro38_05.png)
コントロールのサイズを揃えるには
コントロールのサイズを調整します。 今作成したラベル1ラベル2、そしてテキストボックスをコントロールボタンを押しながら3つとも選択します。
![リストボックスを連動させるマクロ4](macro/macro38_06.png)
![リストボックスを連動させるマクロ4](macro/macro38_06.png)
そしてメニューの書式またはユーザーフォームのツールバーから左揃えを選択します左揃えにします
![リストボックスを連動させるマクロ5](macro/macro38_07.png)
![リストボックスを連動させるマクロ5](macro/macro38_07.png)
続いて高さを揃え幅を揃えました。サイズが揃うと綺麗です。
![リストボックスを連動させるマクロ6](macro/macro38_08.png)
![リストボックスを連動させるマクロ6](macro/macro38_08.png)
フォームの背景色を変える
今度はユーザーフォームの 色を変えることにします。ユーザーフォームのプロパティから backcolor をクリックします。
![リストボックスを連動させるマクロ7](macro/macro38_09.png)
![リストボックスを連動させるマクロ7](macro/macro38_09.png)
タブが二つ、システムとパレットがありますけれども、システムの色は 面白味がないので、パレットから選びましょう。パレットから 色を変更してください。
![リストボックスを連動させるマクロ8](macro/macro38_10.png)
![リストボックスを連動させるマクロ8](macro/macro38_10.png)
続いてラベルに表示される caption の ラベルのフォントを 変更しましょう。
ラベルのプロパティからフォントをクリックします。
![リストボックスを連動させるマクロ9](macro/macro38_11.png)
![リストボックスを連動させるマクロ9](macro/macro38_11.png)
フォントのダイアログが表示されたら好きなフォントを選んで、必要により、スタイルやサイズも変更して OK をクリックしてください。
![リストボックスを連動させるマクロ10](macro/macro38_12.png)
![リストボックスを連動させるマクロ10](macro/macro38_12.png)
同様にラベル2とテキストボックスのフォントの種類とサイズも変更しておきます。
![リストボックスを連動させるマクロ11](macro/macro38_13.png)
![リストボックスを連動させるマクロ11](macro/macro38_13.png)
次回は、リストボックスをフォームに追加し、連動するためのコードを記入していきます。
お疲れさまでした。
お疲れさまでした。