एक्सेल के लिए VBA का "इनपुट बॉक्स" फ़ंक्शन

लेखक: Lewis Jackson
निर्माण की तारीख: 7 मई 2021
डेट अपडेट करें: 2 जुलाई 2024
Anonim
एक्सेल के लिए VBA का "इनपुट बॉक्स" फ़ंक्शन - सामग्री
एक्सेल के लिए VBA का "इनपुट बॉक्स" फ़ंक्शन - सामग्री

विषय

एक्सेल के लिए VBA में "इनपुट बॉक्स" फ़ंक्शन के बारे में सीखना इस टूल के साथ प्रोग्राम बनाने का पहला चरण है। "इनपुट बॉक्स" VBA कार्यक्रमों के मैनुअल लेखन का एक आसान परिचय है, क्योंकि यह केवल एक तर्क लेता है, लेकिन उपयोगकर्ता इनपुट प्राप्त करने का महत्वपूर्ण कार्य करता है। "MsgBox" फ़ंक्शन के बारे में सीखने पर भी विचार करें, क्योंकि इसकी भूमिका, जो उपयोगकर्ताओं को संदेश दिखाने के लिए है, "बॉयो बॉक्स" का पूरक है।


संवाद बॉक्स उपयोगकर्ताओं को बताते हैं कि क्या होता है (स्टॉकबाइट / स्टॉकबाइट / गेटी इमेज)

उद्देश्य

"इनपुट बॉक्स" फ़ंक्शन आपको डेटा दर्ज करने और इसे प्राप्त करने के लिए संकेत देता है। उदाहरण के लिए, एक "इनपुट बॉक्स" एक उपयोगकर्ता को किसी व्यक्ति की उम्र दर्ज करने के लिए उसे एक्सेल वर्कशीट में "बर्थडे लिस्ट" नामक तालिका में संग्रहीत करने के लिए प्रेरित कर सकता है।

बहस

एक "इनपुट बॉक्स" कई तर्क लेता है, लेकिन उनमें से केवल एक की आवश्यकता होती है: वह पाठ जो उपयोगकर्ता को इनपुट डेटा के लिए संकेत देता है। वैकल्पिक तर्कों में संवाद बॉक्स का शीर्षक और डिफ़ॉल्ट तर्क शामिल हैं। आप "Xpos" और "Ypos" तर्कों का उपयोग करके बॉक्स को एक विशिष्ट स्थिति में रख सकते हैं।

वापसी मूल्य

"इनपुटबॉक्स" एक पाठ स्ट्रिंग लौटाता है, जिसका आमतौर पर मतलब है कि आपको इसे प्राप्त करने के लिए एक चर घोषित करना चाहिए। यह कथन दो रूपों में से एक ले सकता है। पहले एक मान प्रकार निर्दिष्ट नहीं करता है (उदाहरण के लिए, आप "डिम मान रिटर्न" टाइप कर सकते हैं या "डिम वैल्यू रिटर्न स्ट्रिंग" की घोषणा के साथ चर के प्रकार को इंगित कर सकते हैं)। सामान्य तौर पर, हम एक अधिक विशिष्ट प्रकार का उपयोग करने की सलाह देते हैं ताकि वीबीए टाइप-संबंधी त्रुटियों को पकड़ सके, उदाहरण के लिए, जब "स्ट्रिंग" चर में एक संख्या डालने की कोशिश की जा रही है।


नमूना कार्यक्रम

एक नमूना प्रोग्राम आज़माएं जो एक्सेल के साथ "इनपुट बॉक्स" को एकीकृत करता है। VBA प्रोग्रामिंग वातावरण को खोलने के लिए एक्सेल डेवलपर टैब पर "विज़ुअल बेसिक" बटन पर क्लिक करें। निम्नलिखित कोड की प्रतिलिपि बनाएँ:

सार्वजनिक उप GetEmailAdr () Dim str_email As String (InStr (str_email, "@") = 0) str_email = InputBox ("एक वैध ईमेल पता दर्ज करें।") लूप रेंज ("A1 A1") = str_email End Sub।

विंडो में कोड पेस्ट करें और "F5" दबाकर प्रोग्राम चलाएं। यह प्रोग्राम आपको एक उपयोगकर्ता इनपुट के लिए संकेत देगा, उस पर एक सरल जांच करेगा, और यदि यह वैध है तो रिटर्न वैल्यू को सेल में डाल सकता है। अन्यथा, प्रोग्राम उपयोगकर्ता से दूसरे मूल्य के लिए पूछेगा।

विकल्प और फायदे

एक्सेल में उपयोगकर्ता इनपुट प्राप्त करने के लिए "इनपुट बॉक्स" कई तरीकों में से एक है। आप इसे कैप्चर करने के लिए वर्कशीट सेल या "टेक्स्टबॉक्स" कंट्रोल का भी उपयोग कर सकते हैं। क्योंकि इनपुट बॉक्स टेक्स्ट इनपुट का समर्थन करता है, इसलिए यह "हां / नहीं" प्रश्नों के लिए सबसे अच्छा विकल्प नहीं है। हालांकि, फ़ंक्शन का एक फायदा यह है कि आपको इसका उपयोग करने के लिए एक विशेष रूप बनाने की आवश्यकता नहीं है, अन्य VBA नियंत्रणों के विपरीत। एक सूची बॉक्स नियंत्रण, उदाहरण के लिए, एक उपयोगकर्ता प्रपत्र की आवश्यकता होती है जिसे आपको एक वर्कशीट बनाना होगा जिसमें नियंत्रण स्थान लेगा। "इनपुट बॉक्स" जगह नहीं लेगा: यह दिखाई देगा, यह उपयोगकर्ता इनपुट प्राप्त करेगा और यह गायब हो जाएगा, जो बहुत ही विचारशील है।


दशकों तक, कॉमिक बुक के प्रशंसकों ने यह स्वीकार किया कि वूल्वरिन के बाल कटवाने - उसके छीनने वाले टांके और प्रचुर कटलेट के साथ - वास्तविक जीवन में पुन: पेश नहीं किया जा सकता है। एक्स-मेन फिल्मों ने साबि...

हालांकि कबूतर आमतौर पर अपने पिल्लों की देखभाल करते हैं, कभी-कभी लोगों को अधिक नाजुक पिल्लों की मदद करने के लिए हस्तक्षेप करने की आवश्यकता होती है। जन्म के बाद के पहले कुछ हफ्ते कबूतरों के जीवन में महत...

लोकप्रिय पोस्ट