एक एक्सेल 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/en-us/library/aa224495(office.11).aspx
ग्लेन