एक्सेल VBA स्विच फंक्शन
VBA SWITCH फ़ंक्शन हमें किसी भी अन्य फ़ंक्शन को नेस्ट किए बिना कई शर्तों का परीक्षण करने की अनुमति देता है, लेकिन हम एक ही फ़ंक्शन के भीतर सभी तार्किक फ़ंक्शन लागू कर सकते हैं।
तार्किक कार्य लगभग सभी गणनाओं के हृदय और आत्मा हैं। उन्हें माहिर करना हमारे कौशल सेट सीवी में अधिक मूल्य जोड़ देगा। जब कई स्थिति परीक्षणों की बात आती है, तो परिणाम पर पहुंचने के लिए तार्किक सूत्र अपरिहार्य हैं। हम एक्सेल और VBA में IF फ़ंक्शन पर पूरी तरह से निर्भर हैं। स्टार्टर के रूप में, IF स्थिति स्वयं को पचाने के लिए कठिन है, लेकिन जब हम कहते हैं कि नेस्टेड IF, यह मास्टर करने के लिए एक हर्कुलियन फॉर्मूला है। हालाँकि, उन सभी नेस्टेड फ़ार्मुलों को पार करने के लिए, हमारे पास SWITCH नामक एक सूत्र है।
वाक्य - विन्यास
- स्विच पहली अभिव्यक्ति की गणना करता है, और यदि मान सत्य है, तो यह अभिव्यक्ति के लिए मान लौटाता है, और यदि अभिव्यक्ति 1 के लिए मान सत्य नहीं है, तो यह अभिव्यक्ति 2 के लिए समान गणना के लिए आगे बढ़ता है, और यदि परिणाम सत्य है, तब मान 2 प्रदर्शित होता है लेकिन यदि अभिव्यक्ति को गलत के रूप में लौटाया जाता है, तो स्विच दूसरी अभिव्यक्ति पर जाता है।
क्या होगा यदि कोई भी अभिव्यक्ति सही नहीं है और सभी झूठे हैं? ऐसी स्थिति में, हम रन टाइम एरर प्राप्त करते हैं जब तक कि हमारे पास ऐसी स्थितियों के लिए पूर्व-खाली त्रुटि हैंडलिंग नहीं है।
VBA में स्विच फंक्शन का उपयोग कैसे करें?
उदाहरण 1
अब, नीचे दिए गए कोड को देखें।
कोड:
उप स्विच_ एक्सप्लिमेंट 1 () डिम रिजल्टवैल्यू स्टर्लिंग डिम फ्रूटनाम के रूप में स्ट्रिंग फ्रूटनाम = "एप्पल" रिजल्ट वेल्यू = स्विच (फ्रूटनेम = "एप्पल", "मीडियम", फ्रूटनेम = "ऑरेंज", "कोल्ड", फ्रूटनेम = "सपोटा", "हीट")। , फ्रूटनाम = "वाटरमेलन", "कोल्ड") MsgBox ResultValue अंत उप
- उपरोक्त कोड में, मैंने दो वीबीए चर घोषित किए हैं।
स्ट्रिंग के रूप में मंद परिणाम के रूप में मंद परिणाम
- वेरिएबल फ्रूटनेम के लिए, मैंने फलों का नाम "Apple" रखा है।
FruitName = "Apple"
- अगला, चर "ResultValue" के लिए, मैंने स्विच को सौंपा है। चलिए मैं आपको फंक्शन समझाता हूं।
स्विच (FruitName = "Apple", "मध्यम",
- यह सूत्र का पहला भाग है। यदि चर FruitName Apple है, तो परिणाम "मध्यम" होना चाहिए।
अगला है
फ्रूटनाम = "ऑरेंज", "कोल्ड",
- यह मूल एक्सेल सूत्र का दूसरा भाग है। यदि चर FruitName नारंगी है, तो परिणाम "ठंडा" होना चाहिए।
उसके बाद, हमने लिखा है।
फ्रूटनेम = "सपोटा", "हीट",
- यह सूत्र का तीसरा भाग है। यदि चर FruitName Sapota है, तो परिणाम "हीट" होना चाहिए।
फ्रूटनेम = "वाटरमेलन", "कोल्ड"
यह सूत्र का अंतिम भाग है। यदि चर FruitName वाटरमेलन है, तो इसका परिणाम "ठंडा" होना चाहिए।
जब मैं इस कोड को चलाता हूं, तो यह "मध्यम" के रूप में परिणाम लौटाएगा क्योंकि चर "FruitName" के लिए, मैंने "Apple" के रूप में मान असाइन किया है।
चूंकि फलों का नाम "Apple" है, इसलिए हमारा तार्किक परीक्षा परिणाम "मध्यम" है, इसलिए तदनुसार, हमारे पास संदेश बॉक्स में एक परिणाम है।
संबंधित परिणाम प्राप्त करने के लिए चर "FruitName" पर अलग-अलग मान असाइन करें।
उदाहरण # 2
एक और उदाहरण देखें।
कोड:
सब स्विच_ एक्सप्लाय 2 () डिम रिजल्टवैल्यू स्टर्लिंग डिम सिटीनाम के रूप में स्ट्रिंग सिटीनाम = "दिल्ली" रिजल्ट वेल्यू = स्विच (सिटीनेम = "दिल्ली", "मेट्रो", सिटीनेम = बैंगलोर, "नॉन मेट्रो", सिटीनेम = "मुंबई", "मेट्रो" ", सिटीनेम =" कोलकाता "," नॉन मेट्रो ") MsgBox ResultValue End Sub
इस बार मैंने शहर के नाम निर्दिष्ट किए हैं, जो भी शहर का नाम हम चर "सिटीनेम" को आपूर्ति करते हैं, तदनुसार, मैंने संबंधित शहर के नामों के लिए कुछ परिणाम लागू किए।
यदि आप "दिल्ली या मुंबई" के रूप में शहर का नाम लागू करते हैं, तो हमें "मेट्रो" के रूप में परिणाम मिलता है, या यदि हम "बैंगलोर या कोलकाता" के रूप में शहर का नाम लागू करते हैं, तो हमें "गैर-मेट्रो" के रूप में परिणाम मिलता है।
अब उपरोक्त उदाहरण में, मैंने शहर का नाम "दिल्ली" के रूप में उल्लेख किया है, इसलिए हमारा परिणाम VBA के संदेश बॉक्स में "मेट्रो" होगा।
यह कैसे VBA में SWITCH फ़ंक्शन काम करता है।
याद रखने वाली चीज़ें
- SWITCH एक्सेल वर्कशीट और VBA फंक्शन दोनों के रूप में उपलब्ध है।
- हम नेस्टेड IF एक्सेल शर्तों के विकल्प के रूप में SWITCH का उपयोग कर सकते हैं।
- व्यावहारिक समस्याओं को हल करने के लिए वास्तविक उदाहरणों में इसका उपयोग करें।
