Excel 下拉式選單(清單)教學：資料驗證與 ActiveX ComboBox

下拉式選單(清單),你的選擇是什麼？ 介紹兩款下拉選單功能...

1. 什麼是資料驗證(清單)？
   資料驗證是 Excel 提供的一項功能，用於限制儲存格中允許輸入的數據類型或範圍，確保數據輸入正確。
   
2. 以下是 Excel 資料驗證功能的簡介：
   什麼是資料驗證？資料驗證是 Excel 提供的一項功能，用於限制儲存格中允許輸入的數據類型或範圍，確保數據輸入正確。常見用途：限制數字範圍：設定只能輸入某個範圍的數值（例如：1 到 100）。設定清單選項：讓使用者從下拉選單中選擇值（例如：地區、部門名稱）。限制日期範圍：只能輸入特定範圍內的日期（例如：2023 年）。防止重複輸入：確保輸入值是唯一的。輸入特定格式：限制必須符合某些公式或條件（例如：只能輸入以 "A" 開頭的值）。
   
3. 什麼是 ActiveX ComboBox？
   ActiveX ComboBox 是 Excel 提供的一種互動式控制項，允許使用者從清單中選擇項目或自行輸入數據，常用於動態表單或儀表板設計。
   
4. 主要功能：
   顯示下拉清單：讓使用者從多個選項中挑選。
   允許自定義輸入：除了選擇清單內容，使用者也可以直接輸入值。
   與 VBA 結合：能搭配 VBA 實現更高級的功能，例如動態更新清單、連動操作等。
   
5. 優點：
   使用方便：清單和自定義輸入的結合。
   外觀可調整：可自訂字體、顏色和尺寸。
   動態互動：與 VBA 一起使用，能大幅提升工作表的自動化能力。
   
6. 如何插入 ActiveX ComboBox？
   在功能區選擇 開發人員 → 插入 → ActiveX 控制項 → 下拉式方塊 (ComboBox)。
   在工作表中繪製 ComboBox。
   切換到設計模式，右鍵點擊 ComboBox，選擇 屬性。

ActiveX Combobox配合VBA撰寫

以下列舉2種方式填充選單內容 _{(太多方式.. 不列舉!)}

基本用法：

Private Sub Worksheet_Activate() 
	ComboBox1.List = Array("選項1", "選項2", "選項3") 
End Sub

Private Sub ComboBox1_Change()
    MsgBox "您選擇了：" & ComboBox1.Value
End Sub

Private Sub ComboBox1_Change()
    TextBox1.Value = "您選擇了：" & ComboBox1.Value
End Sub

VBA 動態填充選項：

Private Sub Worksheet_Activate()
    Dim rng As Range
		Set rng = Worksheets("Sheet1").Range("A1:A5") ' 定義範圍
		ComboBox1.Clear ' 清空原有選項
		ComboBox1.List = Application.Transpose(rng.Value) ' 填充範圍內容
End Sub

檔案下載：