वीबीए में यूनियन का उपयोग कैसे करें (उदाहरण के साथ)

आप एकाधिक श्रेणियों को एक में संयोजित करने के लिए VBA में यूनियन पद्धति का उपयोग कर सकते हैं।

व्यवहार में इस पद्धति का उपयोग करने का एक सामान्य तरीका यहां दिया गया है:

 SubUseUnion ()

Set UnionRange = Application.Union(Range("A1:A10"), Range("C1:C10"))
UnionRange.Formula = "=RANDBETWEEN(1, 100)"

End Sub

यह विशेष मैक्रो रेंज A1:A10 और C1:C10 को एक ही रेंज में जोड़ता है, फिर इस संयुक्त रेंज में प्रत्येक मान के लिए एक्सेल फॉर्मूला =RANDBETWEEN(1, 100) निर्दिष्ट करता है, जो 1 और 100 के बीच एक यादृच्छिक मान उत्पन्न करता है।

निम्नलिखित उदाहरण दिखाता है कि व्यवहार में VBA में यूनियन पद्धति का उपयोग कैसे करें।

उदाहरण: रेंज को संयोजित करने के लिए वीबीए में यूनियन का उपयोग कैसे करें

हम श्रेणियों A1:A10 और C1:C10 को संयोजित करने के लिए यूनियन विधि का उपयोग करने के लिए VBA में निम्नलिखित मैक्रो को परिभाषित कर सकते हैं:

 SubUseUnion ()

Set UnionRange = Application.Union(Range("A1:A10"), Range("C1:C10"))
UnionRange.Formula = "=RANDBETWEEN(1, 100)"

End Sub

जब हम इस मैक्रो को चलाते हैं, तो हमें निम्नलिखित आउटपुट प्राप्त होता है:

श्रेणी A1:A10 और C1:C10 की प्रत्येक कोशिका में अब सूत्र =RANDBETWEEN(1, 100) शामिल है, जो 1 और 100 के बीच एक यादृच्छिक पूर्णांक लौटाता है।

यह भी ध्यान दें कि हम यूनियन पद्धति को दो से अधिक रेंज प्रदान कर सकते हैं।

उदाहरण के लिए, हम निम्नलिखित मैक्रो बना सकते हैं जो तीन अलग-अलग श्रेणियों को संयोजित करने के लिए यूनियन पद्धति का उपयोग करता है, फिर प्रत्येक श्रेणी के सेल में एक सूत्र सम्मिलित करता है:

 SubUseUnion ()

Set UnionRange = Application.Union(Range("A1:A10"), Range("C1:C10"), Range("D1:D5" ))
UnionRange.Formula = "=RANDBETWEEN(1, 100)"

End Sub

जब हम इस मैक्रो को चलाते हैं, तो हमें निम्नलिखित आउटपुट प्राप्त होता है:

जिन तीन श्रेणियों को हमने अब एक में जोड़ दिया है उनमें RANDBETWEEN फॉर्मूला शामिल है।

नोट : आप वीबीए यूनियन पद्धति के लिए संपूर्ण दस्तावेज़ यहां पा सकते हैं।

अतिरिक्त संसाधन

निम्नलिखित ट्यूटोरियल बताते हैं कि वीबीए में अन्य सामान्य कार्य कैसे करें:

वीबीए में इंटरसेक्शन का उपयोग कैसे करें
वीबीए में प्रयुक्त कॉलमों की संख्या की गणना कैसे करें
वीबीए में किसी कार्यपुस्तिका में शीटों की संख्या कैसे गिनें