如何在Excel中僅使用唯一值填充組合框？

為了改進資料管理和分析，Excel是一個強大的應用程式，提供了廣泛的功能。組合框，通常稱為下拉列表，允許使用者從預定義列表中選擇選項，是一個有用的功能。儘管Excel自帶建立組合框的工具，但有時您可能希望用特定單元格集中特定值填充組合框。

在本教程中，我們將逐步瞭解如何用唯一資料填充Excel組合框。您可以按照這些步驟簡化資料輸入過程，並確保使用者擁有簡單且無錯誤的組合框體驗。因此，讓我們開始學習如何用唯一值填充Excel組合框！

僅使用唯一值填充組合框

在這裡，我們將首先插入一個組合框，然後為其分配一個宏來完成任務。讓我們來看一個簡單的過程，瞭解如何在Excel中僅使用唯一值填充組合框。

步驟1

考慮一個Excel表格，其中包含帶有重複值的專案列表以及一個組合框，類似於下圖。

首先，右鍵單擊組合框，然後選擇“檢視程式碼”以開啟應用程式。然後將下面的程式碼複製到文字框中。

右鍵單擊 > 檢視程式碼 > 複製。

程式碼 (此處應插入實際程式碼，原文缺失)

Public Sub Populate_combobox_with_Unique_values()
   Dim vStr, eStr
   Dim dObj As Object
   Dim xRg As Range
   On Error Resume Next
   Set dObj = CreateObject("Scripting.Dictionary")
   Set xRg = Application.InputBox("Range select:", "Populate Combo Box", _ActiveWindow.RangeSelection.AddressLocal, , , , , 8)
   vStr = xRg.Value
   Application.ScreenUpdating = False
   With dObj
      .comparemode = 1
      For Each eStr In vStr
         If Not .exists(eStr) And eStr <> "" Then .Add eStr, Nothing
      Next
      If .Count Then
         ActiveSheet.ComboBox1.List = WorksheetFunction.Transpose(.keys)
      End If
   End With
   Application.ScreenUpdating = True
End Sub

步驟3

然後單擊F5執行模組。然後選擇單元格範圍並單擊“確定”以完成任務。

F5 > 選擇單元格 > 確定。

然後您可以看到組合框將用唯一值填充。這就是如何在Excel中僅使用唯一值填充組合框的方法。

結論

在本教程中，我們使用了一個簡單的示例來演示如何僅使用Excel中的唯一值填充組合框以突出顯示特定資料集。

更新於：2023年9月7日

393 次瀏覽

開啟您的職業生涯

透過完成課程獲得認證

開始學習
廣告
© . All rights reserved.