即効テクニック |
コンボボックスのドロップダウンリストの何番目を既定値として初期表示するかを設定する方法を紹介します。 ●準備● フォームにコンボボックスを配置します。 コンボボックスの名前は「コンボ0」とします。 ●操作方法 パターン1● (1)コンボボックスのプロパティシートを表示します。 (2)[データ]タブで次のように設定します。 [値集合タイプ] → 値リスト [値集合ソース] → a;b;c;d [既定値] → [コンボ0].[itemdata](2) (3)フォームを保存して開くと、コンボボックスに既定値「c」が表示されます。 ●補足● ここでは、コンボボックスやリストボックスに含まれるすべての項目を 1 つずつ順番に取得できる「ItemDataプロパティ」というVBAを利用しています。 最初の項目のインデックス(番号)は0になるので、例えば、6番目の項目を取得するには5を指定します。