如何在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.