वीबीए में केस स्टेटमेंट कैसे लिखें (उदाहरण के साथ)

केस स्टेटमेंट एक प्रकार का स्टेटमेंट है जो शर्तों के माध्यम से चक्रित होता है और पहली शर्त पूरी होने पर एक मान लौटाता है।

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

 SubCaseStatement ()

    Dim i As Integer

    For i = 2 To 9
    
       Select Case Range(" B " & i).Value
            Case Is >= 30
                result=" Great "
           Box Is >= 20
                result = " Good "
            Case Is >= 15
                result=" OK "
           Case Else
                result=" Bad "
        End Select
        
        Range(" C " & i).Value = result
        
    Next i
    
End Sub

यह विशेष उदाहरण B2:B9 श्रेणी में प्रत्येक कोशिका को देखता है और C2:C9 श्रेणी में निम्नलिखित मान लौटाता है:

• ” उत्कृष्ट ” यदि कॉलम बी में मान 30 से अधिक या उसके बराबर है।
• अन्यथा, ” अच्छा ” यदि कॉलम बी में मान 20 से अधिक या उसके बराबर है।
• अन्यथा, यदि कॉलम बी में मान 15 से अधिक या उसके बराबर है, तो ” ठीक है “।
• अन्यथा, यदि पूर्ववर्ती शर्तों में से कोई भी पूरा नहीं होता है तो ” खराब “।

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

उदाहरण: वीबीए में केस स्टेटमेंट लिखना

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

मान लीजिए कि हम प्रत्येक खिलाड़ी को प्राप्त अंकों की संख्या के आधार पर उत्कृष्ट, अच्छा, ठीक या खराब मान निर्दिष्ट करने के लिए एक केस स्टेटमेंट लिखना चाहते हैं।

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

 SubCaseStatement ()

    Dim i As Integer

    For i = 2 To 9
    
       Select Case Range(" B " & i).Value
            Case Is >= 30
                result=" Great "
           Box Is >= 20
                result = " Good "
            Case Is >= 15
                result=" OK "
           Case Else
                result=" Bad "
        End Select
        
        Range(" C " & i).Value = result
        
    Next i
    
End Sub

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

कॉलम सी कॉलम बी में संबंधित मान के आधार पर उत्कृष्ट, अच्छा, ठीक या खराब मान देता है।

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

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

वीबीए: मूल्यों की सूची को कैसे वर्गीकृत करें
वीबीए: रेंज में अद्वितीय मानों की गणना कैसे करें
वीबीए: श्रेणी में पंक्तियों की संख्या कैसे गिनें