एक्सेल VBA (उदाहरण) में सूची बॉक्स - एक्सेल में लिस्ट बॉक्स कैसे बनाएं?

विषय - सूची

एक्सेल VBA में सूची बॉक्स क्या है?

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

एक्सेल VBA में सूची बॉक्स क्या है?

एक सूची बॉक्स एक सूची है जहां से उपयोगकर्ता किसी आइटम का चयन कर सकता है। एक्सेल VBA में सूची बॉक्स का उपयोग किया जा सकता है यदि आप उन मानों की सूची प्रदर्शित करना चाहते हैं जिन्हें उपयोगकर्ता चुन सकते हैं।

एक्सेल में लिस्ट बॉक्स कैसे बनाएं?

एक्सेल वर्कशीट में सूची बॉक्स बनाने के लिए, इन चरणों का पालन करें:

सबसे पहले, आपको डेवलपर टैब को रिबन पर दिखाई देने के लिए सक्षम करने की आवश्यकता है ताकि आप VBA और ActiveX नियंत्रण कमांड पर पहुंच सकें। डेवलपर टैब प्राप्त करने के लिए , Excel विकल्प डायलॉग बॉक्स लाएं, एक्सेल में रिबन को कस्टमाइज़ करें पर क्लिक करें और डेवलपर चेकबॉक्स चुनें।

एक्सेल रिबन पर क्लिक करें, फिर डेवलपर टैब चुनें और फिर सम्मिलित करें पर क्लिक करें फिर एक्सेल वर्कशीट में नई सूची बॉक्स को सम्मिलित करने के लिए सूची बॉक्स नियंत्रण पर क्लिक करें।

उसके बाद, एक्सेल वर्कशीट में एक्सेल में लिस्ट बॉक्स बनाने के लिए एक आयत बनाएँ।

सूची बॉक्सिन एक्सेल का चयन करते समय, डेवलपर टैब पर क्लिक करें और गुण चुनें। गुण विंडो खुल जाएगा।

गुण विंडो में, सूची भरण रेंज सेटिंग के लिए, सप्ताह के दिनों के साथ दिन- नामित सीमा दर्ज करें।

बहु-चयन संपत्ति में क्लिक करें, और ड्रॉप-डाउन सूची से, 1-fmMultiSelectMulti चुनें, जैसा कि नीचे स्क्रीनशॉट में दिखाया गया है।

सूची शैली गुण में, और ड्रॉप-डाउन सूची से, 1-fmListStyleOption चुनें। यह सूची आइटम के बाईं ओर चेकबॉक्स जोड़ता है, जैसा कि नीचे स्क्रीनशॉट में दिखाया गया है।

गुण विंडो बंद करें।

आप डिज़ाइन मोड को क्लिक करने पर डिज़ाइन मोड को बंद कर सकते हैं।

एक्सेल VBA में लिस्ट बॉक्स कैसे बनाएं?

आप VBA सूची बॉक्स की बेहतर समझ के लिए निम्नलिखित उदाहरण पर विचार कर सकते हैं:

उदाहरण 1

इस सूची बॉक्स को एक सेल से जोड़ने के लिए, सूची बॉक्स पर राइट-क्लिक करें (सुनिश्चित करें कि डिज़ाइन मोड का चयन किया गया है) और गुण पर क्लिक करें। लिंक्ड सेल के लिए B17 भरें, जैसा कि नीचे स्क्रीनशॉट में दिखाया गया है।

महीना सूची नाम के रूप में महीना गुणों के लिए जाता है और महीना के रूप में सूची भरण रेंज का चयन करें।

जब आप नीचे दिए गए स्क्रीनशॉट में दिखाए गए अनुसार सूची बॉक्स में अपनी पसंद बदलेंगे तो सेल B17 कोशिकाओं में डेटा बदल जाएगा।

उदाहरण 2 - उपयोगकर्ता-सुधार पर सूची बॉक्स कैसे बनाएं?

डेवलपर टैब पर जाएं और फिर कोड से विजुअल बेसिक पर क्लिक करें या Alt + F11 दबाएँ।

मेनू सम्मिलित करने के लिए जाओ, UserForm पर क्लिक करें।

टूलबॉक्स से यूजरफॉर्म पर सूची बॉक्स नियंत्रण को खींचें।

UserForm पर डबल क्लिक करें, और नीचे स्क्रीनशॉट में दिखाए अनुसार यूजरफॉर्म इवेंट का चयन करें।

अब, इन-बीच प्रक्रिया के लिए निम्न कोड जोड़ें।

निजी उप उपयोगकर्ताForm_Initialize ()

ListBox1.AddItem "एमबीए"

ListBox1.AddItem "MCA"

ListBox1.AddItem "एमएससी"

ListBox1.AddItem "MECS"

ListBox1.AddItem "CA"

अंत उप

अब कोड को चलाने के लिए 'F5' दबाएं।

उदाहरण # 3 - डायनेमिक सूची बॉक्स नियंत्रण कैसे जोड़ें

VBA का उपयोग करते हुए उपयोगकर्ता पर एक डायनामिक सूची बॉक्स नियंत्रण जोड़ें।

टूलबॉक्स से यूजरफॉर्म पर कमांड बटन जोड़ें।

कमांड बटन पर राइट-क्लिक करें, गुण क्लिक करें।

कमांड बटन कैप्शन को 'Create_Listbox' में बदलें

कमांड बटन पर डबल क्लिक करें

अब, यह निम्नलिखित कोड दिखाता है।

निजी उप कमांडबटन १_ क्लिक ()

अंत उप

नीचे दी गई प्रक्रिया को 'Add_Dynamic_Listbox' नाम दें और चलाने के लिए नीचे की प्रक्रिया खोजें।

उप Add_Dynamic_Listbox ()

'डायनामिक सूची बॉक्स जोड़ें और इसे' LstBx 'ऑब्जेक्ट पर नियत करें

LstBx = UserForm3.Controls.Add ("फ़ॉर्म। लिस्टबॉक्स 1") सेट करें

'सूची बॉक्स स्थिति

LstBx.Left = 20

LstBx.Top = 10

अंत उप

अब, मैक्रो को चलाने के लिए F5 पर क्लिक करें।

वीबीए में बॉक्स नियंत्रण की सूची में आइटम कैसे जोड़ें?

निजी उप प्रविष्टि _Items _To_LstBox ()

ListBox1.AddItem "आइटम 1"

ListBox1.AddItem "आइटम 2"

ListBox1.AddItem "आइटम 3"

ListBox1.AddItem "आइटम 4"

ListBox1.AddItem "आइटम 5"

अंत उप

VBA का उपयोग करके सूची बॉक्स नियंत्रण से आइटम कैसे साफ़ करें?

उप Clr_LstBx ()

UserForm3.ListBox1.Clear

अंत उप

उदाहरण # 4

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