एक्सेल में VBA एरेस - VBA में एरर्स फंक्शन के साथ कैसे काम करें?

VBA सरणियों में वस्तुओं के समूह को एक साथ परिभाषित करने के लिए उपयोग किया जाता है, VBA में नौ अलग-अलग सरणी कार्य हैं और वे ARRAY, ERASE, FILTER, ISARRAY, JOIN, LBOUND, REDIM, SPLIT और UBOUND हैं, ये सभी सरणी के लिए इनबिल्ट फ़ंक्शंस हैं VBA में, ऐरे फ़ंक्शन हमें दिए गए तर्क के लिए मूल्य देता है।

एक्सेल VBA ऐरे समारोह

ऐरे फ़ंक्शन एक एकल चर में मूल्यों का एक संग्रह है। हम VBA, फ़ंक्शंस और प्रॉपर्टीज़ में एक सबरूटीन को एक सरणी प्रदान कर सकते हैं। VBA Arrays वेरिएबल में एक से अधिक वैल्यू स्टोर करने के लिए अक्सर इस्तेमाल की जाने वाली तकनीकों में से एक है।

एक्सेल VBA सरणी समारोह के उदाहरण

कई चर घोषित करने और मूल्यों को संग्रहीत करने के बजाय, हम एक एकल चर में मूल्य को संग्रहीत करने के लिए एक्सेल वीबीए सरणी का उपयोग कर सकते हैं। उदाहरण के लिए, नीचे दिए गए उदाहरण को देखें

कोड:

उप Array_Ex () Dim x As Integer Dim y As Integer x = 1 y = 2 श्रेणी ("A1")। मान = x श्रेणी ("A2")। मान = y समाप्ति उप।

उपरोक्त उदाहरण में, मैंने x और y नामक दो चर घोषित किए हैं। X मान के रूप में 1 रखता है, और Y मान के रूप में 2 रखता है।

अब, एकल चर के साथ एक्सेल VBA सरणी फ़ंक्शन उदाहरण देखें।

कोड:

सब Array_Ex () डिम x (1 टू 2) इंटेगर रेंज ("ए 1") के रूप में। वैल्यू = एक्स (1) रेंज ("ए 2")। वैल्यू = एक्स (2) एंड।

अब, यदि आप यह VBA कोड चलाते हैं, तो हमारे पास सेल A1 और A2 में मान होंगे।

सरणी चर ने परिणाम शून्य के रूप में लौटाया। ऐसा इसलिए है क्योंकि हमने केवल चर को दो के रूप में घोषित किया है, लेकिन हमने उन चर को कोई मान नहीं दिया है। इसलिए हमें इन चरों पर मान निर्दिष्ट करने की आवश्यकता है।

कोड:

सब Array_Ex () डिम x (1 टू 2) इंटेगर x (1) = 10 x (2) = 20 रेंज ("A1")। मान = x (1) रेंज ("A2")। मान = x (2) ) अंत उप

अब परिणाम प्राप्त करने के लिए कोड चलाएँ।

इससे पहले कि हम सरणी चर के मानों को कक्षों में प्रवेश करें, हमें उन घोषित सरणी चर का मान निर्दिष्ट करना होगा जैसे हमने चर x (1) = 10 & x (2) = 20 को असाइन किया है।

उदाहरण # 1 - स्टेटिक एरे का उपयोग करके सीरियल नंबर डालें

आइए सीरियल नंबर डालने के लिए एक स्थिर सरणी का उपयोग करने के उदाहरण को देखें। यह पिछले वाले की तरह ही है।

कोड:

उप StaticArray_Ex () डिम x (1 से 5) इंटेगर x (1) = 10 x (2) = 20 x (3) = 30 x (4) = 40 x (5) = 50 रेंज ("A1")। मान = x (1) श्रेणी ("A2")। मान = x (2) श्रेणी ("A3")। मान = x (3) श्रेणी ("A4")। मूल्य = x (4) श्रेणी ("A5")। ) .ल्यू = एक्स (5) एंड सब

अब सीरियल नंबर डालने के लिए इस कोड को रन करें।

उदाहरण # 2 - डायनामिक एरे का उपयोग करके सीरियल नंबर डालें

अब हम दूसरे प्रकार के ऐरे को देखेंगे, एक डायनेमिक ऐरे

कोड:

उप डायनेमिकअरे_एक्स () डिम x () इंटेगर रेदिम x (५) x (१) = १० x (२) = २० x (३) = ३० x (४) = ४० x (५) = ५० रेंज (A1 A1) ) .वैल्यू = एक्स (1) रेंज ("ए 2")। वैल्यू = एक्स (2) रेंज ("ए 3")। वैल्यू = एक्स (3) रेंज ("ए 4")। वैल्यू = एक्स (4) रेंज (") ए 5 ")। मूल्य = x (5) समाप्ति उप

सीरियल नंबर का परिणाम पाने के लिए अब इस कोड को चलाएं। हम पिछले एक के समान परिणाम प्राप्त करते हैं।

यदि आप ध्यान दें कि हमने चर घोषित करते समय सरणी की लंबाई की आपूर्ति नहीं की है, तो इसके बजाय, हमने VBA Redim फ़ंक्शन का उपयोग करके VBA सरणी का अंतिम मान असाइन किया है। Redim पास किए जाने वाले सरणी का अंतिम मान रखता है।

उदाहरण # 3 - एरे का उपयोग करके एक फंक्शन इन्सर्ट मंथ नेम बनाएं

हमने देखा है कि VBA में सरणियों के साथ कैसे काम किया जाए। अब हम देखेंगे कि Excel में VBA फ़ंक्शन बनाने के लिए एक सरणी के साथ कैसे काम करें। फ़ंक्शन VBA में उपयोगकर्ता द्वारा परिभाषित फ़ंक्शन के अलावा कुछ भी नहीं है। अंतर्निहित कार्यों का उपयोग करने के अलावा, एक्सेल VBA हमें अपने कार्यों को भी बनाने की अनुमति देता है।

कोड:

फंक्शन लिस्ट_ऑफ_मार्ट्स () लिस्ट_ऑफ_मार्ट्स = अर्रे ("जन", "फरवरी", "मार्च", "अप्रैल", "मई", "जून", "जूल", "अगस्त", "सिपाही", "अक्टूबर", "Nov) "," दिसंबर ") अंत समारोह

नीचे दिया गया कोड एक फ़ंक्शन बनाएगा जो हमारी एक्सेल शीट में महीनों को सम्मिलित कर सकता है।

नीचे दिए गए कोड को अपने मॉड्यूल में कॉपी और पेस्ट करें।

अब इस कोड को सेव करें और VBA एडिटर को बंद करें। VBA संपादक को बंद करने के बाद, कार्यपत्रक पर जाएं और हमारे द्वारा बनाए गए सूत्र को टाइप करें, और आपको अपनी कार्यपत्रक में List_Of_Months नामक सूत्र देखना चाहिए ।

सूत्र खोलें और हिट दर्ज करें। हमें पहले-महीने का नाम मिलेगा, जन।

यदि आप एक बार और सूत्र सम्मिलित करते हैं, फिर भी हमें केवल जनवरी मिलेगा, अगले महीने नहीं, फरवरी। तो पहले एक पंक्ति में 12 कॉलम चुनें।

अब D1 सेल में सूत्र खोलें।

चूंकि हमने सूत्र के साथ सूत्र बनाया है, इसलिए हमें सूत्र को केवल सूत्र के रूप में बंद करना होगा। इसलिए Ctrl + Shift + Enter दबाए रखें । हमारे पास सभी 12-महीने के नाम होंगे।

याद रखने वाली चीज़ें

• दो और सरणी प्रकार उपलब्ध हैं यानी, दो-आयामी सरणी और बहु-आयामी सरणी।
• Arrays 0 से शुरू होता है, 1 से नहीं। शून्य का अर्थ है पहली पंक्ति और पहला स्तंभ।
• सरणी एक बड़ा विषय है। आपको इसे अगले स्तर तक आगे बढ़ने के लिए समझने की जरूरत है।
• सरणी चर वह होगा जो प्रत्येक डेटा को अगले स्तर तक आगे बढ़ाता है।
• Redim का उपयोग डायनेमिक सरणी प्रकार में सरणी की अंतिम लंबाई को संग्रहीत करने के लिए किया जाता है।