वीबीए: किसी श्रेणी में मान कैसे जोड़ें
आप 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
जब हम इस मैक्रो को चलाते हैं, तो हमें निम्नलिखित आउटपुट प्राप्त होता है:
संदेश बॉक्स हमें बताता है कि श्रेणी B2:B11 में मानों का योग 245 है।
ध्यान दें कि इस उदाहरण में, हमने श्रेणी B2:B11 में मानों के योग की गणना की है।
हालाँकि, यदि आप इसके बजाय संपूर्ण कॉलम में मानों के योग की गणना करना चाहते हैं, तो आप इसके बजाय B:B टाइप कर सकते हैं।
यह कॉलम बी में प्रत्येक सेल के लिए मानों के योग की गणना करेगा।
अतिरिक्त संसाधन
निम्नलिखित ट्यूटोरियल बताते हैं कि वीबीए में अन्य सामान्य कार्य कैसे करें:
वीबीए: रेंज के औसत मूल्य की गणना कैसे करें
वीबीए: श्रेणी में पंक्तियों की संख्या कैसे गिनें
वीबीए: SUMIF और SUMIFS फ़ंक्शन कैसे लिखें