VBA UBound फ़ंक्शन निर्दिष्ट सरणी के लिए सबसे बड़ा उपलब्ध इंडेक्स लौटाता है।
UBound(सरणी)
या
UBound(सरणी, आयाम)
सरणी के 2 आयामों में से प्रत्येक का सूचकांक प्राप्त करने के लिए UBound फ़ंक्शन का उपयोग करना:
Sub UBoundExample1()
Dim array(10, 4)
'प्रथम आयाम का अधिकतम सूचकांक
MsgBox UBound(array) 'रिटर्न: 10
'दूसरे आयाम का अधिकतम सूचकांक
MsgBox UBound(array, 2) 'रिटर्न: 4
End Sub
फ़ंक्शन SPLIT द्वारा बनाई गई सरणी में मानों की संख्या प्राप्त करने के लिए फ़ंक्शन UBound का उपयोग करना:
Sub UBoundExample2()
link = "www.moonexcel.com.ua"
'एक वर्ण स्ट्रिंग को एक सरणी में विभाजित करना
array = Split(link, ".")
'सरणी तत्वों की संख्या (यह जानते हुए कि सरणी 0 से शुरू होती है)
number = UBound(array) + 1
'सरणी तत्वों की संख्या प्रदर्शित करें
MsgBox number 'रिटर्न: 4
End Sub