वीबीए: सीमा के मानक विचलन की गणना कैसे करें


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

 SubStDevRange ()
    Range(" D2 ") = WorksheetFunction.StDev(Range(" B2:B11 "))
End Sub

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

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

 SubStDevRange ()
    'Create variable to store standard deviation of values
    Dim stdev As Single
    
    'Calculate standard deviation of values in range
    stdev = WorksheetFunction.StDev(Range(" B2:B11 "))
    
    'Display the result
    MsgBox " Standard Deviation of Values in Range: " & stdev 
End Sub

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

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

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

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

 SubStDevRange ()
    Range(" D2 ") = WorksheetFunction.StDev(Range(" B2:B11 "))
End Sub

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

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

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

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

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

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

 SubStDevRange ()
    'Create variable to store standard deviation of values
    Dim stdev As Single
    
    'Calculate standard deviation of values in range
    stdev = WorksheetFunction.StDev(Range(" B2:B11 "))
    
    'Display the result
    MsgBox " Standard Deviation of Values in Range: " & stdev 
End Sub

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

सीमा में मानों का VBA मानक विचलन

संदेश बॉक्स हमें बताता है कि श्रेणी B2:B11 में मानों का मानक विचलन 11.937 है।

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

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

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

नोट : आप StDev VBA पद्धति का पूरा दस्तावेज़ यहां पा सकते हैं।

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

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

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

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

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