VBA सरणी को श्रेणी असाइन करें

यह ट्यूटोरियल प्रदर्शित करेगा कि सेल की एक श्रृंखला के साथ एक सरणी को कैसे पॉप्युलेट किया जाए।

ऐरे को रेंज असाइन करें

हम सेल की एक श्रृंखला के साथ आसानी से एक वैरिएंट सरणी को पॉप्युलेट कर सकते हैं।

एक कॉलम से मान असाइन करें

यह उदाहरण रेंज ("ए 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 डिबग.प्रिंट फ़ंक्शन आपको तत्काल विंडो में सरणी में निहित मान दिखाएगा।

wave wave wave wave wave