Answers:
有一个与范围相关联的Excel VBA验证对象。看到代码:
With Range("e1").Validation
.Add Type:=xlValidateWholeNumber, _
AlertStyle:=xlValidAlertInformation, _
Minimum:="5", Maximum:="10"
.InputTitle = "Needs Wholenumber"
.ErrorTitle = "Integers"
.InputMessage = "Enter an integer from five to ten"
.ErrorMessage = "You must enter a number from five to ten"
End With
这些属性是可读的,因此您可以以编程方式拉出.InputTitle或.InputMessage或该单元格验证所允许的最小值和最大值,以查看正在使用的验证方式。
尝试这个:
Sub test()
Range("a1") = Range("e1").Validation.InputTitle & ": Range = " & Range("e1").Validation.Formula1 & " to " & Range("e1").Validation.Formula2
End Sub
上面的代码返回到单元格A1:需要整数:范围= 5到10。有关更多信息,请参见在线书籍。 http://msdn.microsoft.com/zh-CN/library/aa224495(office.11).aspx
格伦