Table of contents
数据验证是Excel的一个有趣的功能。 这个功能为用户在单元格中输入数值提供了控制。 用户不能随心所欲地输入,他们必须从给定的列表中选择。 我们将讨论如何在Excel中执行自动完成数据验证的下拉列表。
下载实践工作手册
下载这本练习手册,在阅读本文时进行练习。
自动完成数据验证下拉列表.xlsm
Excel中自动完成数据验证下拉列表的2种方法
我们将展示 2 我们将考虑以下数据集的自动完成数据验证。
1. 在组合框控件中使用VBA代码进行自动完成数据验证的下拉列表
我们将插入自定义 VBA 的代码。 控件 工具,在Excel中自动从下拉列表中执行数据验证。
步骤1。
- 首先,我们必须添加 开发商 标签到功能区。 进入 文件> 选项 .
- 选择 自定义丝带 选项,从 Excel选项 .
- 勾选 开发商 选项,并按 认可 .
第2步。
- 选择 插入 从 开发商 标签。
- 现在,选择 组合箱 从 控件 .
第3步。
- 把 控制箱 在数据集上。
- 点击鼠标的右键,选择 财产 从列表中。
第4步。
- 改变 命名 至 溫度調節框(TempComboBox) 从 财产 窗口。
第5步。
- 转到 板块名称 领域。
- 选择 查看代码 列表中的选项。
现在,一个 VBA命令模块 我们必须把 VBA 该模块上的代码。
第6步。
- 复制并粘贴以下内容 VBA 模块上的代码。
Private Sub Wrksht_SelectionChange(ByVal Target As Range) Dim combox_1 As OLEObject Dim str_1 As String Dim ws_1 As Worksheet Dim arr_1 Set ws_1 = Application.ActiveSheet On Error Resume Next Set combox_1 = ws_1.OLEObjects("TempComboBox") With combox_1 .ListFillRange = " " .LinkedCell = " " .Visible = False End With If Target.Validation.Type = 3 Then Target.Validation.InCellDropdown = False Cancel =True str_1 = Target.Validation.Formula1 str_1 = Right(str_1, Len(str_1) - 1) If str_1 = ""Then Exit Sub With combox_1 .Visible = True .Left = Target.Left .Top = Target.Top .Width = Target.Width + 5 .Height = Target.Height + 5 .ListFillRange = str_1 If .ListFillRange = "" Then arr_1 = Split(str_1, " ,") Me.TempComboBox.List = arr_1 End If .LinkedCell = Target.Address End With combox_1.ActivateMe.TempComboBox.DropDown End If End Sub Private Sub TempComboBox_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer) Select Case KeyCode Case 9 Application.ActiveCell.Offset(0, 1).Activate Case 13 Application.ActiveCell.Offset(1, 0).Activate End Select End Sub
第7步。
- 现在,保存 VBA 代码,并进入数据集。 关掉 设计模式 从 开发商 标签。
第8步。
- 选择 细胞C5 .
- 选择 数据工具 的组别,从 数据 标签。
- 选择 数据验证 从列表中。
第9步。
- 数据验证 窗口会出现,选择 列表 在 允许 领域。
- 在 来源 领域选择参考值范围。
- 然后按 认可 .
第10步。
- 转到任何一个单元格的 选择 栏,并按下任何第一个字母。
当我们输入一个字母时,相应的建议将显示在该单元格上。
现在,通过我们在建议列表中的预期选择来完成所有单元格。
阅读更多。 在Excel中用VBA进行数据验证的下拉列表(7种应用)
2.用ActiveX控件的组合框自动完成数据验证的下拉列表
我们将只使用 控件 用于自动数据验证。
步骤1。
- 选择 插入 的组别,从 开发商 标签。
- 选择 组合箱 从 控件 .
第2步。
- 将 组合箱 在数据集的任何空白处。
- 然后,按下鼠标的右键。
- 选择 财产 从列表中。
第3步。
- 现在,把 C5 在 链接细胞 字段,因为该数据将在 细胞C5 .
- 把 $B$5:$B$9 关于 ListFillRange 领域。
- 选择 1-fmMatchEntryComplete 为 MatchEntry 字段,并保存更改。
第4步。
- 现在,停用 设计模式 从 开发商 标签。
第5步。
- 现在,在组合框中输入任何一个字母,就会出现建议。 最后,数据将被查看到 细胞C5 .
阅读更多。 如何创建用于数据验证的Excel下拉列表(8种方法)
总结
在这篇文章中,我们进行了 从下拉列表中进行数据验证 我们增加了从Excel的下拉列表中自动完成数据验证的功能。 我希望这能满足你的需求。 请看我们的网站 独家专访 并在评论框中提出你的建议。