Excel单元格下拉列表框

最新推荐文章于 2023-11-27 14:41:25 发布

原创最新推荐文章于 2023-11-27 14:41:25 发布 · 578 阅读

1 ·

本内容遵循CC 4.0 BY-SA版权协议

收录于

笔记

当前文章被收录于：

笔记

372 篇文章 25 人学习

订阅专栏查看详情

当前文章被以下社区和专栏收录：

该文章介绍了如何使用VBA在Excel中创建下拉列表框，并实现数据验证功能。代码示例展示了删除原有验证规则，添加新的列表验证，设置警告样式、输入和错误提示信息，以及启用输入和错误显示。此外，还提到了验证数据源来自Sheet3的A1到A300单元格。

Excel下拉列表框

输入错误时

实现代码如下


Sub test()
    With Range("e5").Validation
        .Delete
        .Add Type:=xlValidateList, AlertStyle:=xlValidAlertStop, Operator:= _
        xlBetween, Formula1:="=Sheet3!$A$1:$A$300"
        .IgnoreBlank = True
        .InCellDropdown = True
        .InputTitle = "输入标题"
        .ErrorTitle = "错误标题"
        .InputMessage = "输入信息"
        .ErrorMessage = "错误信息，请选择相应的数据，如果没有有效数据请联系，在sheet3的 a300填写"
        .IMEMode = xlIMEModeNoControl
        .ShowInput = True
        .ShowError = True
        
    End With

End Sub

参考链接

验证对象 (Excel) | Microsoft Learnhttps://learn.microsoft.com/zh-cn/office/vba/api/excel.validation特此记录