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

 

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

 

2025年の目標は繰り返し作業に悩まされない年にしませんか? Excel VBAを活用した効率化がその第一歩
本サイト参考:Excel VBAで自動化するコードのベースを習得したい方におすすめの記事

 

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

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

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

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

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

使い方

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

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

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

 

ポイント

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

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

 

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

Excel VBAで効率化の準備をしてみませんか?2025年をよりスムーズに過ごすための資格
基本的な文法やVBAの実践的な応用までを網羅的に学習できる方法は、ExcelVBAエキスパート資格の取得を目指すこと。学習を通して、より効率的に、着実に基礎を身につけることが可能です。資格取得すれば、スキルの証明にもなり、職場での評価アップにも繋がるため、勉強を進めるモチベーションにもなります。
本サイト参考:マクロ知識がないから「何から学べば良いのかわからない」という人におすすめの記事

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エキスパート資格は、日常業務でExcelを多用し、手動作業を減らしたいと考えている方には価値あるものです。

ExcelVBAエキスパートベーシック
仕事の効率をあげるためにExcelVBAを利用する人が対象の問題集です。


ExcelVBAエキスパートスタンダード

ExcelVBAの開発を仕事にする人が対象の問題集です。

 

Excel  VBA エキスパート資格について知りたい方は、下記「Excel VBAスキルアップを目指すなら知っておきたいVBAエキスパート」をご確認ください。