VBA लॉजिकल Operaटोर: एक्सेल VBA में AND, OR, NOT, IF NOT

VBA लॉजिकल Operaटोर: और, या, नहीं

एक्सेल VBA लॉजिकल Operaमरोड़

मान लीजिए कि आप किसी ग्राहक के ऑर्डर को प्रोसेस करना चाहते हैं। इसके लिए, आपको सबसे पहले यह देखना होगा कि ऑर्डर किया गया उत्पाद मौजूद है या नहीं। अगर वह मौजूद है, तो आप यह भी जांचना चाहेंगे कि उपलब्ध मात्रा पर्याप्त है या नहीं। ऐसे मामलों में लॉजिकल ऑपरेटर काम आते हैं। लॉजिकल ऑपरेटर का इस्तेमाल एक से ज़्यादा शर्तों का मूल्यांकन करने के लिए किया जाता है।

मुख्य Excel VBA तार्किक ऑपरेटर AND, OR, NOT नीचे दी गई तालिका में सूचीबद्ध हैं:

एस / एन Operaटो विवरण उदाहरण उत्पादन
1 और AND: इसका उपयोग एक से अधिक शर्तों को संयोजित करने के लिए किया जाता है। यदि सभी शर्तें सत्य हैं, तो AND का मान सत्य होता है। यदि कोई भी शर्त असत्य है, तो AND का मान असत्य होता है यदि सत्य = सत्य और असत्य = सत्य तो असत्य
2 OR OR: इसका उपयोग एक से अधिक शर्तों को संयोजित करने के लिए किया जाता है। यदि कोई भी शर्त सत्य है, तो OR सत्य लौटाता है। यदि वे सभी असत्य हैं, तो OR असत्य लौटाता है यदि सत्य = सत्य या सत्य = असत्य तो <strong>उद्देश्य</strong>
3 नहीं नोट: यह एक व्युत्क्रम फ़ंक्शन की तरह काम करता है। यदि शर्त सत्य है, तो यह गलत लौटाता है, और यदि शर्त गलत है, तो यह सत्य लौटाता है। यदि नहीं (सत्य) तो असत्य

VBA लॉजिकल Operators उदाहरण स्रोत कोड

सरलता के लिए, हम हार्ड कोडेड संख्याओं की तुलना करेंगे।

“सम्मिलित करें विकल्प” से शीट में ActiveX बटन जोड़ें।

नीचे दी गई छवि में दिखाए अनुसार गुण सेट करें

VBA लॉजिकल Operaमरोड़
VBA लॉजिकल Operaमरोड़

निम्न तालिका उन गुणों को दर्शाती है जिन्हें आपको बदलने की आवश्यकता है और उन मानों को भी दर्शाती है जिन्हें आपको अपडेट करने की आवश्यकता है।

एस / एन नियंत्रण संपत्ति वैल्यू
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 डाउनलोड करें