वीबीए: किसी श्रेणी में मान कैसे जोड़ें


आप VBA का उपयोग करके किसी श्रेणी में मानों के योग की गणना करने के लिए निम्नलिखित मूल सिंटैक्स का उपयोग कर सकते हैं:

 SubSumValues ()
    Range(" D2 ") = WorksheetFunction.Sum(Range(" B2:B11 "))
End Sub

यह विशेष उदाहरण श्रेणी B2:B11 में मानों के योग की गणना करता है और परिणाम को सेल D2 को निर्दिष्ट करता है।

यदि आप इसके बजाय किसी संदेश बॉक्स में मानों का योग प्रदर्शित करना चाहते हैं, तो आप निम्नलिखित सिंटैक्स का उपयोग कर सकते हैं:

 SubSumValues ()
    'Create variable to store sum of values
    Dim sum As Single
    
    'Calculate sum of values in range
    sum = WorksheetFunction.Sum(Range(" B2:B11 "))
    
    'Display the result
    MsgBox " Sum of Values in Range: " & sum
End Sub

निम्नलिखित उदाहरण दिखाते हैं कि एक्सेल में निम्नलिखित डेटासेट के साथ अभ्यास में इनमें से प्रत्येक विधि का उपयोग कैसे किया जाए जिसमें विभिन्न बास्केटबॉल खिलाड़ियों के बारे में जानकारी शामिल है:

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

मान लीजिए कि हम अंक कॉलम में मानों के योग की गणना करना चाहते हैं और परिणामों को एक विशिष्ट सेल में प्रदर्शित करना चाहते हैं।

ऐसा करने के लिए हम निम्नलिखित मैक्रो बना सकते हैं:

 SubSumValues ()
    Range(" D2 ") = WorksheetFunction.Sum(Range(" B2:B11 "))
End Sub

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

ध्यान दें कि सेल D2 में मान 245 है।

यह हमें बताता है कि अंक कॉलम में मानों का योग 245 है।

उदाहरण 2: वीबीए का उपयोग करके सीमा के योग की गणना करें और संदेश बॉक्स में परिणाम प्रदर्शित करें

मान लीजिए कि हम इसके बजाय अंक कॉलम में मानों के योग की गणना करना चाहते हैं और परिणामों को एक संदेश बॉक्स में प्रदर्शित करना चाहते हैं।

ऐसा करने के लिए हम निम्नलिखित मैक्रो बना सकते हैं:

 SubSumValues ()
    'Create variable to store sum of values
    Dim sum As Single
    
    'Calculate sum of values in range
    sum = WorksheetFunction.Sum(Range(" B2:B11 "))
    
    'Display the result
    MsgBox " Sum of Values in Range: " & sum
End Sub

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

श्रेणी में VBA योग मान

संदेश बॉक्स हमें बताता है कि श्रेणी B2:B11 में मानों का योग 245 है।

ध्यान दें कि इस उदाहरण में, हमने श्रेणी B2:B11 में मानों के योग की गणना की है।

हालाँकि, यदि आप इसके बजाय संपूर्ण कॉलम में मानों के योग की गणना करना चाहते हैं, तो आप इसके बजाय B:B टाइप कर सकते हैं।

यह कॉलम बी में प्रत्येक सेल के लिए मानों के योग की गणना करेगा।

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

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

वीबीए: रेंज के औसत मूल्य की गणना कैसे करें
वीबीए: श्रेणी में पंक्तियों की संख्या कैसे गिनें
वीबीए: SUMIF और SUMIFS फ़ंक्शन कैसे लिखें

एक टिप्पणी जोड़ने

आपका ईमेल पता प्रकाशित नहीं किया जाएगा. आवश्यक फ़ील्ड चिह्नित हैं *