Excel VBAのユーザーフォームでドロップダウンリスト（コンボボックス）から選択された値を取得する方法について説明します。ユーザーフォームのコンボボックスはデータ入力の際、リストから選択させることで入力の正確さと作業効率を向上させます。使い方や注意点など、サンプルコードをもとに具体的に解説します。
日常業務でExcelを多用し、手動作業を減らしたいと考えている方へ
本サイト参考：Excel VBAで自動化するコードのベースを習得したい方におすすめの記事
以下のようなシーンで利用されます。
1.ユーザーフォームで商品を選択し、選ばれた商品情報を表示したり計算に利用したい。
2.選択した値に基づいて別の入力フィールドの内容を変更する。
1. ユーザーフォームにコンボボックスを配置します。
2. コンボボックスのリストに選択肢を設定します。
3. 選択された値を取得し、必要な処理に活用します。
1.コンボボックスの名前（デフォルトでは ComboBox1）に気をつけてください。正確に指定しないとエラーになります。
2.値が選択されていない場合に備えて、エラーチェックを行うのが望ましいです。
基本的な文法やVBAの実践的な応用までを網羅的に学習できる方法は、ExcelVBAエキスパート資格の取得を目指すこと。学習を通して、より効率的に、着実に基礎を身につけることが可能です。資格取得すれば、スキルの証明にもなり、職場での評価アップにも繋がるため、勉強を進めるモチベーションにもなります。
本サイト参考：マクロ知識がないから「何から学べば良いのかわからない」という人におすすめの記事
1. ユーザーフォームを作成し、ComboBox1という名前のコンボボックスを追加します。
2. ユーザーフォームを初期化するコードで選択肢を追加します。
3. CommandButtonで値を取得するコードを記述します。
Option Explicit
Private Sub UserForm_Initialize()
' ComboBox1にリスト項目を追加
ComboBox1.AddItem "商品A"
ComboBox1.AddItem "商品B"
ComboBox1.AddItem "商品C"
End Sub
Private Sub CommandButton1_Click()
Dim selectedValue As String
' ComboBox1で選択された値を取得
selectedValue = ComboBox1.Value
' 値が選択されているか確認し、メッセージボックスで表示
If selectedValue <> "" Then
MsgBox "選択された商品は: " & selectedValue
Else
MsgBox "商品を選択してください。"
End If
End Sub1.UserForm_Initializeイベントで、ユーザーフォームが開いた際にコンボボックスにリストを追加します。
2.CommandButton1_Clickイベントで、ボタンを押すと選択された値が表示されます。
3.ComboBox1.Valueを使って、選択された値を取得しています。
ユーザーフォーム上のコンボボックスから選択した値を取得し、処理や計算に使うためです。これにより、選択した内容に基づいた自動処理が行えるようになります。
Excel VBAで自動化するコードのベースを習得したい方におすすめ！
VBAエキスパート資格は、日常業務でExcelを多用し、手動作業を減らしたいと考えている方には価値あるものです。
ExcelVBAエキスパートベーシック
仕事の効率をあげるためにExcelVBAを利用する人が対象の問題集です。
ExcelVBAエキスパートスタンダード
ExcelVBAの開発を仕事にする人が対象の問題集です。
Excel VBA エキスパート資格について知りたい方は、下記「Excel VBAスキルアップを目指すなら知っておきたいVBAエキスパート」をご確認ください。
