वीबीए: हां/नहीं उत्तर के साथ एक संदेश बॉक्स कैसे बनाएं

आप उपयोगकर्ता के लिए हां या नहीं का चयन करने के लिए एक संदेश बॉक्स बनाने के लिए वीबीए में निम्नलिखित सिंटैक्स का उपयोग कर सकते हैं:

 Sub MsgBoxYesNo()

    'ask user if they want to multiply two cells
    UserResponse = MsgBox(" Do you want to multiply cells A1 and B1? ", vbYesNo)

    'perform action based on user response
    If UserResponse = vbYes Then
      Range(" C1 ") = Range(" A1 ") * Range(" B1 ")
    Else
      MsgBox “ No Multiplication was Performed ”
   End If

End Sub

यह विशेष मैक्रो एक संदेश बॉक्स बनाता है जो उपयोगकर्ता से पूछता है कि क्या वे सेल A1 और B1 को गुणा करना चाहते हैं।

यदि उपयोगकर्ता “हाँ” पर क्लिक करता है, तो दोनों सेल गुणा हो जाते हैं और परिणाम सेल C1 में प्रदर्शित होता है।

यदि उपयोगकर्ता “नहीं” पर क्लिक करता है, तो एक नया संदेश बॉक्स प्रकट होता है जो उन्हें बताता है कि कोई गुणा नहीं किया गया है।

ध्यान दें कि vbyesNo कथन वह है जो उपयोगकर्ता को क्लिक करने के लिए “हां” और “नहीं” बटन सम्मिलित करता है।

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

उदाहरण: हां/नहीं उत्तर वाला एक संदेश बॉक्स बनाएं

मान लीजिए कि हमारी एक्सेल शीट के सेल A1 और B1 में निम्नलिखित दो मान हैं:

मान लें कि हम एक मैक्रो बनाना चाहते हैं जो उपयोगकर्ता को एक संदेश बॉक्स प्रदर्शित करता है और पूछता है कि क्या वे सेल A1 और B1 में मानों को गुणा करना चाहते हैं या नहीं।

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

 Sub MsgBoxYesNo()

    'ask user if they want to multiply two cells
    UserResponse = MsgBox(" Do you want to multiply cells A1 and B1? ", vbYesNo)

    'perform action based on user response
    If UserResponse = vbYes Then
      Range(" C1 ") = Range(" A1 ") * Range(" B1 ")
    Else
      MsgBox “ No Multiplication was Performed ”
   End If

End Sub

जब हम इस मैक्रो को चलाते हैं, तो निम्न संदेश बॉक्स प्रकट होता है:

यदि हम हाँ पर क्लिक करते हैं, तो मैक्रो सेल A1 और B2 में मानों को गुणा करेगा और सेल C1 में परिणाम प्रदर्शित करेगा:

हालाँकि, यदि हम No पर क्लिक करते हैं, तो एक नया संदेश बॉक्स दिखाई देगा:

संदेश बॉक्स हमें बताता है कि पिछले संदेश बॉक्स में नहीं पर क्लिक करने के बाद से कोई गुणा नहीं किया गया था।

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

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

वीबीए: संदेश बॉक्स में एक नई लाइन कैसे जोड़ें
वीबीए: नई शीट कैसे जोड़ें
वीबीए: पैन को फ़्रीज़ कैसे करें