विषयसूची
इस लेख में, मैं आपको दिखाऊंगा कि कैसे आप Excel VBA में स्थिति का विश्लेषण कर सकते हैं यदि सेल में कोई मान है। आप किसी भी मूल्य और एक विशेष मूल्य दोनों के लिए स्थिति का विश्लेषण करना सीखेंगे।
इस लेख को पढ़ते समय अभ्यास करने के लिए इस अभ्यास कार्यपुस्तिका को डाउनलोड करें।
VBA यदि सेल में मान है तो.xlsm<4 एक्सेल वीबीए एनालिसिस: अगर सेल में कोई वैल्यू है तो रिटर्न आउटपुट (स्टेप बाय स्टेप एनालिसिस)
यहां हमें कुछ छात्रों के फिजिक्स, केमिस्ट्री, के मार्क्स के साथ डेटा सेट मिला है। और सनफ्लॉवर किंडरगार्टन नामक स्कूल में गणित।
खाली खाने का मतलब है कि छात्र उपस्थित नहीं हुआ, यानी उस विशेष परीक्षा में अनुपस्थित था। अब आइए स्थिति का विश्लेषण करें, इस डेटा सेट के साथ सेल में कोई मान है या नहीं।
⧪ चरण 1: सेल की घोषणा करना
सबसे पहले, हमें उस सेल की घोषणा करें जिसका मूल्य हम विश्लेषण करना चाहते हैं। आइए विश्लेषण करें कि जेनिफर मार्लो भौतिक विज्ञान की परीक्षा में उपस्थित हुई या नहीं।
इसलिए, हमें यह जाँचने की आवश्यकता है कि सेल C12 में कोई मान है या नहीं।
ऐसा करने के लिए, सबसे पहले, हमें सेल C12 की घोषणा करनी होगी।
इसे पूरा करने के लिए कोड की पंक्ति होगी:
9875
⧪ चरण 2: यह जांचना कि सेल में शामिल है या नहीं एक मान (किसी विशेष मान सहित)
अगला, हमें यह जांचना है कि क्यासेल में कोई मान है या नहीं। हम इसे यदि स्थिति का उपयोग करके निष्पादित करेंगे। कोड की पंक्ति होगी:
5125
यदि सेल में कोई मान है तो इस कोड को निष्पादित किया जाएगा। किसी मान की जांच करने के लिए (उदाहरण के लिए, इसमें 100 है या नहीं), उस विशिष्ट मान का बराबर प्रतीक के साथ उपयोग करें।
8091
⧪ चरण 3: कार्य आवंटित करना
फिर आपको एक कार्य निर्धारित करना होगा जिसे सेल में एक मान (या एक विशिष्ट मान) होने पर निष्पादित किया जाएगा।
यहाँ, हम संदेश प्रदर्शित करना चाहते हैं "जेनिफर मार्लो भौतिकी की परीक्षा में शामिल हुई।" । तो कोड की पंक्ति होगी:
1123
⧪ चरण 4: इफ ब्लॉक को समाप्त करना
अंत में, आपको इफ ब्लॉक को समाप्त करने की घोषणा करनी होगी।
1473
तो पूरा VBA कोड होगा:
⧭ VBA कोड:
2155
⧭ आउटपुट:
टूलबार पर रन सब/यूजरफॉर्म बटन पर क्लिक करके इस कोड को रन करें।
यह संदेश प्रदर्शित करेगा "जेनिफर मार्लो भौतिकी परीक्षा में उपस्थित हुई।" क्योंकि सेल C12 में 50 का मान शामिल है।
अगर सेल में कोई वैल्यू है तो एक्सेल VBA के साथ एक निर्दिष्ट आउटपुट शामिल करने वाले उदाहरण
हमने विश्लेषण करना सीख लिया है कि सेल में कोई वैल्यू है या नहीं VBA में नहीं। अब, समझ को स्पष्ट करने के लिए कुछ उदाहरण तलाशते हैं।
1। किसी मान को फ़िल्टर करने के लिए एक मैक्रो का विकास करना यदि संबंधित सेल में कोई मान है तो Excel VBA
आइए एक विकसित करें मैक्रो प्रत्येक परीक्षा में उपस्थित होने वाले छात्रों को फ़िल्टर करने के लिए।
अर्थात्, हमें प्रत्येक विषय के अंकों वाले कक्षों की जांच करनी होगी और देखना होगा कि उनमें कोई मान है या नहीं या नहीं।
अगर वे ऐसा करते हैं, तो हमें संबंधित छात्र का नाम छाँटना होगा।
इसे पूरा करने के लिए पूरा VBA कोड होगा:<3
⧭ VBA कोड:
2263
⧭ आउटपुट:
डेटा सेट चुनें ( हेडर सहित) और इस मैक्रो को चलाएं।
सबसे पहले, आपको पहले का संदर्भ दर्ज करने के लिए कहा जाएगा वह सेल जहां आप फ़िल्टर किया गया डेटा चाहते हैं। मैंने G3 डाला है।
फिर ठीक क्लिक करें। आपको सेल G3 से शुरू होने वाले एक नए डेटा सेट में प्रत्येक परीक्षा ( हेडर सहित) में शामिल होने वाले छात्रों के नाम मिलेंगे।
2. एक मूल्य को छाँटने के लिए एक उपयोगकर्ता-परिभाषित फ़ंक्शन बनाना यदि संबंधित सेल में एक विशिष्ट मान होता है, तो एक्सेल VBA में
अब हम एक उपयोगकर्ता-परिभाषित फ़ंक्शन बनाएंगे जो छात्रों के नाम लौटाएगा जिन्हें प्रत्येक विषय में एक विशिष्ट अंक प्राप्त हुआ है।
प्रक्रिया लगभग उपरोक्त के समान ही है। हमें प्रत्येक विषय के अंकों वाले कक्षों की जांच करनी होगी और यह देखना होगा कि वे किसी विशिष्ट मान के बराबर हैं या नहीं।
यदि वे हैं, तो हम संबंधित छात्र का नाम वापस कर देंगे।
VBA कोड होगा:
⧭ VBAकोड:
3147
⧭ आउटपुट:
कोड Cells_with_Values नामक एक फ़ंक्शन बनाता है जो दो तर्क लेता है, एक श्रेणी और एक मान ।
आइए उन छात्रों का पता लगाएं, जिन्होंने इस फ़ंक्शन का उपयोग करके प्रत्येक विषय में 100 अंक प्राप्त किए हैं।
अपने कार्यपत्रक में कक्षों की श्रेणी का चयन करें और श्रेणी के पहले कक्ष में इस फ़ंक्शन को दर्ज करें:
=Cells_with_Values(B3:E13,100) [यहां B3: E3 मेरा डेटा सेट है ( हेडर सहित) और 100 मेरा मिलान मूल्य है। आप अपने एक का उपयोग करें।]
फिर CTRL + SHIFT + ENTER ( सरणी सूत्र ) दबाएं। यह शीर्षक सहित प्रत्येक विषय में 100 अंक प्राप्त करने वाले छात्रों के नामों की एक सरणी लौटाएगा।
3। यदि संबंधित सेल में एक्सेल VBA में कोई मान (या एक विशिष्ट मान) है तो मूल्य निकालने के लिए UserForm का विकास
अंत में, हम निकालने के लिए UserForm विकसित करेंगे कुछ विशिष्ट परीक्षाओं में उपस्थित होने वाले (या विशिष्ट अंक प्राप्त करने वाले) छात्रों के नाम।
⧪ चरण 1: UserForm को खोलना
Insert > VBA संपादक में UserForm विकल्प एक नया UserForm खोलने के लिए। UserForm1 नामक एक नया UserForm खोला जाएगा।
⧪ चरण 2: UserForm में टूल को ड्रैग करना<2
यूजरफॉर्म के अलावा, आपको टूलबॉक्स मिलेगा। अपने कर्सर को टूलबॉक्स पर ले जाएं और 4 लेबल (लेबल1, लेबल2,Label3, Label4) और 3 ListBoxes (ListBox1, ListBox2, ListBox3) और एक TextBox (TextBox1) एक आयताकार आकार में UserForm पर।
फिर एक और लेबल (लेबल5) और टेक्स्टबॉक्स (टेक्स्टबॉक्स2) को यूजरफॉर्म के निचले बाएं कोने में खींचें।
अंत में, एक कमांडबटन (कमांडबटन1) को नीचे दाएं कोने में खींचें।
लेबल के डिस्प्ले को लुकअप कॉलम , <में बदलें 1>रिटर्न कॉलम , कोई भी वैल्यू या एक विशिष्ट वैल्यू , वैल्यू, और स्टार्टिंग सेल।
इसके अलावा, कमांडबटन1 के डिस्प्ले को ठीक में बदलें।
⧪ चरण 3: ListBox3
ListBox3 पर डबल क्लिक करें। एक निजी उपप्रक्रिया जिसे ListBox3_Click कहा जाता है, खुल जाएगा। वहाँ निम्नलिखित कोड दर्ज करें। । दूसरा निजी उपप्रक्रिया जिसे कमांडबटन1_क्लिक कहा जाता है, खुल जाएगा। वहां निम्नलिखित कोड दर्ज करें।
2331
⧪ चरण 5: UserForm को चलाने के लिए कोड लिखना
अंत में, मॉड्यूल से एक नया डालें VBA टूलबार और वहां निम्न कोड डालें।
6310
⧪ चरण 6: UserForm चलाना (अंतिम आउटपुट) <3
आपका UserForm अब उपयोग के लिए तैयार है। वर्कशीट से डेटा सेट का चयन करें ( B3:E13 यहां) ( हेडर सहित) और मैक्रो चलायें जिसे Run_UserForm कहा जाता है।
UserForm को वर्कशीट में लोड किया जाएगा। लुकअप कॉलम तालिका से, मैंने भौतिकी और गणित का चयन किया है, क्योंकि मैं भौतिकी में आने वाले छात्रों के नाम प्राप्त करना चाहता हूं और गणित परीक्षा।
रिटर्न कॉलम तालिका से, मैंने छात्र का नाम चुना है, क्योंकि मैं छात्र के नाम प्राप्त करना चाहता हूं।
और कोई मान या विशिष्ट मान तालिका से, मैंने कोई मान चुना है।
अंत में, प्रारंभिक सेल में बॉक्स, मैंने G3 डाला है।
फिर ठीक क्लिक करें। आपको भौतिकी और गणित परीक्षाओं में शामिल होने वाले छात्रों के नाम सेल G3 से शुरू होंगे।
<3
यदि आपने किसी भी मान या विशिष्ट मान तालिका से विशिष्ट मान का चयन किया होता, तो आपको विशिष्ट मान दर्ज करने के लिए एक और टेक्स्टबॉक्स मिला होता।
यहाँ मैंने 100 दर्ज किया है।
ठीक क्लिक करें। और आपको वे छात्र मिलेंगे जिन्होंने भौतिकी और रसायन विज्ञान में 100 प्राप्त किया है।
याद रखने योग्य बातें
हमने यूज़र-डिफ़ाइंड फ़ंक्शन उदाहरण में वर्णित 2 <3 में छात्रों के नाम लौटाने के लिए द्वि-आयामी सरणी का उपयोग किया।
