三種類型的多列下拉列表 – 逐步指南

當您在 Google 上搜尋「excel 下拉列表多列」時，您可能需要完成以下任務之一：

在本教程中，我們將逐步演示如何完成這三項任務。

獲取範例文件：

點擊下載範例文件

根據多列創建依賴下拉列表

如下方 GIF 圖所示，您希望為大洲創建一個主下拉列表，根據主下拉列表選擇的大洲創建包含國家的次級下拉列表，然後再根據次級下拉列表選擇的國家創建包含城市的第三個下拉列表。本節中的方法可以幫助您完成此任務。

使用公式根據多列創建依賴下拉列表

步驟 1：創建主下拉列表

1. 選擇要插入下拉列表的單元格（這裡我選擇 G9:G13），前往「數據」選項卡，點擊「數據驗證 > 數據驗證」。

2. 在「數據驗證」對話框中，請按以下配置：

1) 點擊「設置」選項卡；

2) 在「允許」下拉列表中選擇「列表」；

3) 點擊「來源」框，選擇包含要在下拉列表中顯示的大洲的單元格；

4) 點擊「確定」按鈕。見截圖：

步驟 2：創建次級下拉列表

1. 選擇包含要在次級下拉列表中顯示項目的整個區域。前往「公式」選項卡，然後點擊「 根據所選內容創建」。

2. 在「根據所選內容創建名稱」對話框中，僅勾選「首行」框，然後點擊「確定」按鈕。

3. 選擇要插入次級下拉列表的單元格，前往「數據」選項卡，點擊「數據驗證 > 數據驗證」。

4. 在「數據驗證」對話框中，您需要：

1) 停留在「設置」選項卡；

2) 在「允許」下拉列表中選擇「列表」；

3) 在「來源」框中輸入以下公式。

=INDIRECT(SUBSTITUTE(G9," ","_"))

其中 G9 是主下拉列表單元格的第一個單元格。

4) 點擊「確定」按鈕。

5. 選擇這個下拉列表單元格，拖動其自動填充柄向下應用到同一列中的其他單元格。

次級下拉列表現在已完成。當您在主下拉列表中選擇一個大洲時，次級下拉列表中只會顯示該大洲下的國家。

步驟 3：創建第三個下拉列表

1. 選擇包含要在第三個下拉列表中顯示值的整個區域。前往「公式」選項卡，然後點擊「 根據所選內容創建」。

2. 在「根據所選內容創建名稱」對話框中，僅勾選「首行」框，然後點擊「確定」按鈕。

3. 選擇要插入第三個下拉列表的單元格，前往「數據」選項卡，點擊「 數據驗證 > 數據驗證」。

4. 在「數據驗證」對話框中，您需要：

1) 停留在「設置」選項卡；

2) 在「允許」下拉列表中選擇「列表」；

3) 在「來源」框中輸入以下公式。

=INDIRECT(SUBSTITUTE(H9," ","_"))

其中 H9 是次級下拉列表單元格的第一個單元格。

4) 點擊「確定」按鈕。

5. 選擇這個下拉列表單元格，拖動其 自動填充柄向下應用到同一列中的其他單元格。

包含城市的第三個下拉列表現在已完成。當您在次級下拉列表中選擇一個國家時，第三個下拉列表中只會顯示該國家下的城市。

上述方法對於某些用戶來說可能比較繁瑣，如果您想要更高效和直接的解決方案，以下方法只需幾次點擊即可完成。

只需幾次點擊即可使用 Kutools for Excel 根據多列創建依賴下拉列表

下方 GIF 圖展示了 Kutools for Excel 的動態下拉列表功能的步驟。

如您所見，整個操作只需幾次點擊即可完成。您只需要：

上方 GIF 圖僅展示製作兩層下拉列表的步驟。如果您想製作超過兩層的下拉列表，點擊這裡了解更多 。或者 下載 30 天免費試用版。

在 Excel 的下拉列表中進行多選

本節提供兩種方法來幫助您在 Excel 的下拉列表中進行多選。

使用 VBA 程式碼在 Excel 下拉列表中進行多選

以下 VBA 腳本可以幫助在 Excel 下拉列表中進行無重複的多選。請按照以下步驟操作。

步驟 1：打開 VBA 編輯器並複製程式碼

1. 前往工作表標籤，右鍵點擊它並從右鍵菜單中選擇「查看代碼」。

2. 然後彈出 Microsoft Visual Basic for Applications 窗口，您需要在 Sheet (Code) 編輯器中複製以下 VBA 程式碼。

VBA 程式碼：允許在下拉列表中進行無重複的多選

Private Sub Worksheet_Change(ByVal Target As Range)
    'Updated by Extendoffice 2019/11/13
    Dim xRng As Range
    Dim xValue1 As String
    Dim xValue2 As String
    If Target.Count > 1 Then Exit Sub
    On Error Resume Next
    Set xRng = Cells.SpecialCells(xlCellTypeAllValidation)
    If xRng Is Nothing Then Exit Sub
    Application.EnableEvents = False
    If Not Application.Intersect(Target, xRng) Is Nothing Then
        xValue2 = Target.Value
        Application.Undo
        xValue1 = Target.Value
        Target.Value = xValue2
        If xValue1 <> "" Then
            If xValue2 <> "" Then
                If xValue1 = xValue2 Or _
                   InStr(1, xValue1, ", " & xValue2) Or _
                   InStr(1, xValue1, xValue2 & ",") Then
                    Target.Value = xValue1
                Else
                    Target.Value = xValue1 & ", " & xValue2
                End If
            End If
        End If
    End If
    Application.EnableEvents = True
End Sub

步驟 2：測試程式碼

粘貼程式碼後，按下 Alt + Q  鍵關閉視覺編輯器並返回工作表。

提示：此程式碼適用於當前工作表中的所有下拉列表。只需點擊包含下拉列表的單元格，逐一從下拉列表中選擇項目以測試是否有效。

只需幾次點擊即可使用 Kutools for Excel 在 Excel 下拉列表中進行多選

VBA 程式碼有很多限制。如果您不熟悉 VBA 腳本，很難修改程式碼以滿足您的需求。這裡推薦一個強大的功能——多選下拉列表，可以幫助您輕鬆地從下拉列表中選擇多個項目。

安裝 Kutools for Excel 後，前往 Kutools 選項卡，選擇「下拉列表 > 多選下拉列表」。然後按以下配置：

1. 指定包含下拉列表的區域，您需要從中選擇多個項目。
2. 指定下拉列表單元格中選定項目的分隔符。
3. 點擊「確定」完成設置。
   

結果

現在，當您點擊指定區域內具有下拉列表的單元格時，旁邊會出現一個列表框。只需點擊項目旁的「+」按鈕即可將其添加到下拉單元格，並點擊「-」按鈕移除不需要的項目。請參閱下面的示範：

在下拉列表中顯示多列

如下方截圖所示，本節將向您展示如何在下拉列表中顯示多列。

默認情況下，數據驗證下拉列表僅顯示一列項目。要在下拉列表中顯示多列，我們建議使用組合框（ActiveX 控件）而不是數據驗證下拉列表。

步驟 1：插入組合框（ActiveX 控件）

1. 前往「開發工具」選項卡，點擊「插入 > 組合框（ActiveX 控件）」。

提示：如果「開發工具」選項卡未顯示在功能區中，您可以按照本教程「顯示開發工具選項卡」中的步驟來顯示它。

2. 然後在您希望顯示下拉列表的單元格中繪製一個組合框。

步驟 2：更改組合框的屬性

1. 右鍵點擊組合框，然後從上下文菜單中選擇「屬性」。

2. 在「屬性」對話框中，請按以下配置：

1) 在「列數」字段中，輸入一個代表要在下拉列表中顯示的列數的數字；

2) 在「列寬」字段中，請定義每列的寬度。這裡我將每列的寬度定義為 80 pt;100 pt;80 pt;80 pt;80 pt；

3) 在「鏈接單元格」字段中，指定一個單元格以輸出與您在下拉列表中選擇的值相同的值。此單元格將在以下步驟中使用；

4) 在「列表填充範圍」字段中，輸入要在下拉列表中顯示的數據範圍。

5) 在「列表寬度」字段中，指定整個下拉列表的寬度。

6) 關閉「屬性」對話框。

步驟 3：在下拉列表中顯示指定的列

1. 在「開發工具」選項卡下，通過點擊「 設計模式」圖標關閉設計模式。

2. 點擊組合框的箭頭，列表將展開，您可以看到指定的列數在下拉列表中顯示。

步驟 4：在特定單元格中顯示其他列的項目

1. 選擇組合框下方的一個單元格，輸入以下公式並按下 Enter 鍵以獲取同一行中第二列的值。

=IFERROR(VLOOKUP(B1,B3:F6,2,FALSE),"")

2. 為了獲取第三、第四和第五列的值，逐一應用以下公式。

=IFERROR(VLOOKUP(B1,B3:F6,3,FALSE),"")

=IFERROR(VLOOKUP(B1,B3:F6,4,FALSE),"")

=IFERROR(VLOOKUP(B1,B3:F6,5,FALSE),"")

相關文章