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

 

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

 

📌 「これ、自動化できたらラクなのに…」と思ったこと、ありませんか?
実はその作業、Excelマクロで簡単に自動化できるかもしれません。
「でもマクロって難しそう…」という方のために、完全初心者向けの入門記事をご用意しました!

👇実務で“そのまま使える”テンプレ付きで、コピペするだけ
初心者向けエクセルマクロの作り方を解説|コピペOK実務テンプレ付き

 

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

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

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

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

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

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

使い方

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

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

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

 

ポイント

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

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

 

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

自分の実力を客観的にチェックしたい…。そんな方のために、自分に合ったスタート地点がわかる無料のExcelVBAベーシック選択問題集をご用意しました。

👉無料ExcelVBAベーシック選択問題138問

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エキスパートベーシックとスタンダード、どちらを選べばいいか判断が難しい…。そんな方のために、自分に合ったスタート地点がわかる無料のExcelVBAベーシック選択問題集を用意しました。

👉無料ExcelVBAベーシック選択問題138問