VBA लॉजिकल Operaटोर: एक्सेल VBA में AND, OR, NOT, IF NOT
एक्सेल VBA लॉजिकल Operaमरोड़
मान लीजिए कि आप किसी ग्राहक के ऑर्डर को प्रोसेस करना चाहते हैं। इसके लिए, आपको सबसे पहले यह देखना होगा कि ऑर्डर किया गया उत्पाद मौजूद है या नहीं। अगर वह मौजूद है, तो आप यह भी जांचना चाहेंगे कि उपलब्ध मात्रा पर्याप्त है या नहीं। ऐसे मामलों में लॉजिकल ऑपरेटर काम आते हैं। लॉजिकल ऑपरेटर का इस्तेमाल एक से ज़्यादा शर्तों का मूल्यांकन करने के लिए किया जाता है।
मुख्य Excel VBA तार्किक ऑपरेटर AND, OR, NOT नीचे दी गई तालिका में सूचीबद्ध हैं:
एस / एन | Operaटो | विवरण | उदाहरण | उत्पादन |
---|---|---|---|---|
1 | और | AND: इसका उपयोग एक से अधिक शर्तों को संयोजित करने के लिए किया जाता है। यदि सभी शर्तें सत्य हैं, तो AND का मान सत्य होता है। यदि कोई भी शर्त असत्य है, तो AND का मान असत्य होता है | यदि सत्य = सत्य और असत्य = सत्य तो | असत्य |
2 | OR | OR: इसका उपयोग एक से अधिक शर्तों को संयोजित करने के लिए किया जाता है। यदि कोई भी शर्त सत्य है, तो OR सत्य लौटाता है। यदि वे सभी असत्य हैं, तो OR असत्य लौटाता है | यदि सत्य = सत्य या सत्य = असत्य तो | <strong>उद्देश्य</strong> |
3 | नहीं | नोट: यह एक व्युत्क्रम फ़ंक्शन की तरह काम करता है। यदि शर्त सत्य है, तो यह गलत लौटाता है, और यदि शर्त गलत है, तो यह सत्य लौटाता है। | यदि नहीं (सत्य) तो | असत्य |
VBA लॉजिकल Operators उदाहरण स्रोत कोड
सरलता के लिए, हम हार्ड कोडेड संख्याओं की तुलना करेंगे।
“सम्मिलित करें विकल्प” से शीट में ActiveX बटन जोड़ें।
नीचे दी गई छवि में दिखाए अनुसार गुण सेट करें
निम्न तालिका उन गुणों को दर्शाती है जिन्हें आपको बदलने की आवश्यकता है और उन मानों को भी दर्शाती है जिन्हें आपको अपडेट करने की आवश्यकता है।
एस / एन | नियंत्रण | संपत्ति | वैल्यू |
---|---|---|---|
1 | कमांडबटन1 | नाम | btnAND |
शीर्षक | और Operaटोर (0 = 0) | ||
2 | कमांडबटन2 | नाम | बीटीएनओआर |
शीर्षक | OR Operaटोर (1 = 1) या (5 = 0) | ||
3 | कमांडबटन3 | नाम | btnनहीं |
शीर्षक | नहीं Operaटोर नहीं (0 = ) |
btnAND_Click में निम्न कोड जोड़ें
Private Sub btnAND_Click() If (1 = 1) And (0 = 0) Then MsgBox "AND evaluated to TRUE", vbOKOnly, "AND operator" Else MsgBox "AND evaluated to FALSE", vbOKOnly, "AND operator" End If End Sub
VBA यदि AND Operaटो
- “यदि (1 = 1) और (0 = 0) तो” if कथन दो स्थितियों (1 = 1) और (0 = 0) को संयोजित करने के लिए AND तार्किक ऑपरेटर का उपयोग करता है। यदि दोनों स्थितियाँ सत्य हैं, तो 'Else' कीवर्ड के ऊपर का कोड निष्पादित होता है। यदि दोनों स्थितियाँ सत्य नहीं हैं, तो 'Else' कीवर्ड के नीचे का कोड निष्पादित होता है।
btnOR_Click में निम्न कोड जोड़ें
Private Sub btnOR_Click() If (1 = 1) Or (5 = 0) Then MsgBox "OR evaluated to TRUE", vbOKOnly, "OR operator" Else MsgBox "OR evaluated to FALSE", vbOKOnly, "OR operator" End If End Sub
VBA यदि OR Operaटो
- “यदि (1 = 1) या (5 = 0) तो” if कथन दो स्थितियों (1 = 1) और (5 = 0) को संयोजित करने के लिए OR तार्किक ऑपरेटर का उपयोग करता है। यदि कोई भी स्थिति सत्य है, तो Else कीवर्ड के ऊपर का कोड निष्पादित होता है। यदि दोनों स्थितियाँ असत्य हैं, तो Else कीवर्ड के नीचे का कोड निष्पादित होता है।
btnNOT_Click में निम्न कोड जोड़ें
Private Sub btnNOT_Click() If Not (0 = 0) Then MsgBox "NOT evaluated to TRUE", vbOKOnly, "NOT operator" Else MsgBox "NOT evaluated to FALSE", vbOKOnly, "NOT operator" End If End Sub
VBA यदि नहीं Operaटो
- “यदि नहीं (0 = 0) तो” VBA If Not फ़ंक्शन if स्टेटमेंट कंडीशन के परिणाम को नकारने के लिए NOT लॉजिकल ऑपरेटर का उपयोग करता है। यदि कंडीशन सत्य है, तो 'Else' कीवर्ड के नीचे का कोड निष्पादित होता है। यदि कंडीशन सत्य है, तो Else कीवर्ड के ऊपर का कोड निष्पादित होता है।
उपरोक्त कोड युक्त Excel डाउनलोड करें