वीबीए: रेंज में न्यूनतम मूल्य कैसे प्राप्त करें

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

 SubMinValue ()
    Range(" D2 ") = WorksheetFunction.Min(Range(" B2:B11 "))
End Sub

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

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

 SubMinValue ()
    'Create variable to store min value
    Dim minValue As Single
    
    'Calculate min value in range
    minValue = WorksheetFunction.Min(Range(" B2:B11 "))
    
    'Display the result
    MsgBox " Min Value in Range: " & minValue 
End Sub

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

संबंधित: वीबीए का उपयोग करके रेंज में अधिकतम मूल्य कैसे प्राप्त करें

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

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

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

 SubMinValue ()
    Range(" D2 ") = WorksheetFunction.Min(Range(" B2:B11 "))
End Sub

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

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

यह हमें बताता है कि अंक कॉलम में न्यूनतम मान 10 है।

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

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

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

 SubMinValue ()
    'Create variable to store min value
    Dim minValue As Single
    
    'Calculate min value in range
    minValue = WorksheetFunction.Min(Range(" B2:B11 "))
    
    'Display the result
    MsgBox " Min Value in Range: " & minValue 
End Sub

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

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

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

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

यह पूरे कॉलम बी में न्यूनतम मान की गणना करेगा।

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

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

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