/ / एक्सेल वीबीए में एक ऐरे का आकार

एक्सेल वीबीए में एक ऐरे का आकार

पाने के लिए एक सरणी का आकार में एक्सेल VBA, आप यूबाउंड और एलबाउंड फ़ंक्शंस का उपयोग कर सकते हैं।

अपने वर्कशीट पर कमांड बटन रखें और निम्न कोड लाइनें जोड़ें:

1. सबसे पहले, हमें सरणी घोषित करने की आवश्यकता है। हमारे सरणी में दो आयाम हैं। इसमें 5 पंक्तियां और 2 कॉलम होते हैं। प्रकार इंटीजर के दो चर घोषित करें।

Dim Films(1 To 5, 1 To 2) As String, x As Integer, y As Integer

सरणी इस तरह दिख सकती है।

एक्सेल वीबीए में एक ऐरे का आकार

2. अगला, हम सरणी का आकार प्राप्त करते हैं। निम्नलिखित कोड लाइन जोड़ें:

x = UBound(Films, 1) - LBound(Films, 1) + 1
y = UBound(Films, 2) - LBound(Films, 2) + 1

यूबाउंड (फिल्म्स, 1) पहले आयाम की ऊपरी सीमा देता है, जो 5 है।
एलबाउंड (फिल्म्स, 1) पहले आयाम की निचली सीमा देता है, जो 1 है।

यूबाउंड (फिल्म्स, 2) दूसरे आयाम की ऊपरी सीमा देता है, जो 2 है।
एलबाउंड (फिल्म्स, 2) दूसरे आयाम की निचली सीमा देता है, जो 1 है।

नतीजतन, एक्स 5 और वाई बराबर 2 बराबर है।

3. हम सरणी के तत्वों की संख्या प्रदर्शित करने के लिए एक संदेश बॉक्स का उपयोग करते हैं।

MsgBox "This array consists of " & x * y & " elements"

परिणाम:

एक ऐरे परिणाम का आकार

यह भी पढ़ें: