यह ट्यूटोरियल प्रदर्शित करेगा कि सेल की एक श्रृंखला के साथ एक सरणी को कैसे पॉप्युलेट किया जाए।
ऐरे को रेंज असाइन करें
हम सेल की एक श्रृंखला के साथ आसानी से एक वैरिएंट सरणी को पॉप्युलेट कर सकते हैं।
एक कॉलम से मान असाइन करें
यह उदाहरण रेंज ("ए 1: ए 10") के माध्यम से लूप करेगा, सेल मानों को एक सरणी में निर्दिष्ट करेगा:
12345678910111213 | उप TestArrayValuesSingle ()'सरणी को एक भिन्न सरणी के रूप में घोषित करें'Dim arRng () वैरिएंट के रूप में'पंक्तियों की संख्या को संग्रहीत करने के लिए पूर्णांक घोषित करें'पूर्णांक के रूप में मंद iRw'एक सरणी चर के लिए श्रेणी असाइन करें'एआरएनजी = रेंज ("ए 1: ए 10")'पंक्तियों के माध्यम से लूप - 1 से 10'iRw = 1 के लिए UBound(arRng) के लिए'तत्काल विंडो में परिणाम दिखाएं'डीबग.प्रिंट arRng(iRw, 1)अगला आईआरडब्ल्यूअंत उप |
NS यूबाउंड सरणी को ऊपरी बाउंड (जैसे 10) सेट करने के लिए उपयोग किया जाता है ताकि लूप 10 बार लूप को जान सके।
NSडिबग.प्रिंट फ़ंक्शन आपको तत्काल विंडो में सरणी में निहित मान दिखाएगा।
एकाधिक कॉलम से मान असाइन करें
123456789101112131415161718 | उप TestArrayValuesMultiple ()'सरणी को एक भिन्न सरणी के रूप में घोषित करें'Dim arRng () वैरिएंट के रूप में'पंक्तियों की संख्या को संग्रहीत करने के लिए पूर्णांक घोषित करें'पूर्णांक के रूप में मंद iRw'स्तंभों की संख्या को संग्रहीत करने के लिए पूर्णांक घोषित करें'पूर्णांक के रूप में मंद iCol'एक सरणी चर के लिए श्रेणी असाइन करें'एआरएनजी = रेंज ("ए 1: सी 10")'पंक्तियों के माध्यम से लूप - 1 से 10'iRw = 1 के लिए UBound(arRng,1) के लिए'अब - जबकि पंक्ति 1 में, 3 कॉलम के माध्यम से लूप'iCol = 1 से UBound(arRng,2) के लिए'तत्काल विंडो में परिणाम दिखाएं'डिबग.प्रिंट एआरएनजी (iRw, iCol)अगला आईकॉलअगला आईआरडब्ल्यूअंत उप |
उपरोक्त कोड में, हमने रेंज ("A1: C10") में मानों के साथ सरणी को पॉप्युलेट किया है।
NS यूबाउंड एक बार फिर से उपयोग किया जाता है - लेकिन इस बार इसकी दो बार आवश्यकता होती है - एक बार पंक्तियों के माध्यम से लूप करने के लिए, और फिर कॉलम के माध्यम से लूप करने के लिए।
NS डिबग.प्रिंट फ़ंक्शन आपको तत्काल विंडो में सरणी में निहित मान दिखाएगा।