如果用户输入无效数据时显示数据有效性检查错误消息,则该值为 True。Boolean 类型,可读写。
本示例向第一张工作表上的单元格 A10 中添加数据有效性检查。输入的值必须处于 5 到 10 之间;如果用户输入了无效数据,将显示错误消息,但不显示输入消息。
With Worksheets(1).Range("A10").Validation
.Add Type:=xlValidateWholeNumber, _
AlertStyle:=xlValidAlertStop, _
Operator:=xlBetween, Formula1:="5", _
Formula2:="10"
.ErrorMessage = "value must be between 5 and 10"
.ShowInput = False
.ShowError = True
End With