Excel VBA コンボボックスはリストから1つの選択肢を選ぶことができる

 

Excel VBA  コンボボックスは、ユーザーフォームやワークシートに配置できるコントロールで、リストから1つの選択肢を選ぶことができるドロップダウンリストです。ユーザーが入力を手助けするために、選択肢を提供する目的で使用されます。具体的な使い方や、注意点やサンプルコードを紹介します。

 

Excel VBAの資格でキャリアアップ!
就活や転職で有利になるVBAエキスパート資格を解説!
👉 VBAエキスパート資格のメリットを詳しく知る

 

Excel VBA コンボボックスの利用

以下のようなシーンで利用されます。

・データ入力フォームで、選択肢を絞り込む必要がある

・特定のカテゴリやオプションを選ばせたい

・フィルタリングや検索機能を提供する際に、条件を選択させたい

Excel VBA コンボボックス|使い方とポイント

使い方

1.ユーザーフォームに「コンボボックス」を配置します。ワークシートに配置する場合は「ActiveXコントロール」の「コンボボックス」を使用します。

2.AddItem メソッドを使って、コンボボックスに選択肢を追加します。

3.ユーザーが選んだ値を取得するには、コンボボックスのValueプロパティを使います。

 

ポイント

・コンボボックスに入れる選択肢の数は、適度に絞り込むのが望ましいです。

・外部のデータ範囲をソースとする場合、データ範囲が変更されたときにコンボボックスの内容も更新する必要があります。

 

Excel VBA コンボボックスのサンプルコード

Excel VBAの資格でキャリアアップ!
就活や転職で有利になるVBAエキスパート資格を解説!
👉 VBAエキスパート資格のメリットを詳しく知る

Sub コンボボックスの使用例()
    Dim ws As Worksheet
    Set ws = ThisWorkbook.Sheets("Sheet1")
    
    ' ワークシートにコンボボックスを追加
    Dim cb As OLEObject
    Set cb = ws.OLEObjects.Add(ClassType:="Forms.ComboBox.1", _
                               Left:=100, Top:=50, Width:=100, Height:=20)
    
    ' コンボボックスにアイテムを追加
    With cb.Object
        .AddItem "選択肢1"
        .AddItem "選択肢2"
        .AddItem "選択肢3"
    End With
    
End Sub

コンボボックスは、ユーザーがリストから選択できるようにするための便利なコントロールです。選択肢の設定や選択値の取得が簡単にできるので、データ入力フォームやオプション選択の場面で効果的に活用できます。

Excel VBAの資格でキャリアアップ!
就活や転職で有利になるVBAエキスパート資格を解説!