/ / एक्सेल वीबीए नियंत्रण संग्रह

एक्सेल वीबीए नियंत्रण संग्रह

उपयोगकर्ताforms बनाते समय एक्सेल VBA, आप इसका उपयोग कर सकते हैं नियंत्रण संग्रह नियंत्रण के माध्यम से आसानी से लूप करने के लिए और प्रत्येक नियंत्रण की एक संपत्ति को एक विशिष्ट मूल्य पर सेट करें।

उपयोगकर्ताफॉर्म हम इस प्रकार दिखने जा रहे हैं:

एक्सेल वीबीए में नियंत्रण संग्रह

इस उपयोगकर्ताफॉर्म को बनाने के लिए, निम्न चरणों को निष्पादित करें:

1. विजुअल बेसिक एडिटर खोलें। यदि प्रोजेक्ट एक्सप्लोरर दिखाई नहीं दे रहा है, तो देखें, प्रोजेक्ट एक्सप्लोरर पर क्लिक करें।

2. सम्मिलित करें, उपयोगकर्ताफॉर्म पर क्लिक करें। यदि टूलबॉक्स स्वचालित रूप से प्रकट नहीं होता है, तो व्यू, टूलबॉक्स पर क्लिक करें। आपकी स्क्रीन नीचे के रूप में स्थापित की जानी चाहिए।

एक्सेल वीबीए में उपयोगकर्ताफॉर्म स्क्रीन सेटअप

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

4. उपयोगकर्ताफॉर्म, लेबल और कमांड बटन के कैप्शन को बदलने के लिए, व्यू, प्रॉपर्टी विंडो पर क्लिक करें और प्रत्येक नियंत्रण पर क्लिक करें।

5. उपयोगकर्ताफॉर्म दिखाने के लिए, अपनी वर्कशीट पर एक कमांड बटन रखें और निम्न कोड लाइन जोड़ें:

Private Sub CommandButton1_Click()

UserForm1.Show vbModeless

End Sub

स्पष्टीकरण: vbModeless जोड़कर, आप उपयोगकर्ता वर्कशीट में एक ही समय में उपयोगकर्ताform का उपयोग कर सकते हैं और काम कर सकते हैं।

हमने अब उपयोगकर्ताफॉर्म का पहला हिस्सा बनाया है। यद्यपि यह पहले से ही साफ दिखता है, फिर भी कुछ भी नहीं होगा जब हम उपयोगकर्ताफॉर्म पर कमांड बटन पर क्लिक करेंगे।

6. विजुअल बेसिक एडिटर खोलें।

7. प्रोजेक्ट एक्सप्लोरर में, UserForm1 पर डबल क्लिक करें।

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

9. निम्नलिखित कोड लाइन जोड़ें:

Private Sub CommandButton1_Click()

Dim i As Integer

For i = 1 To 10
    Controls("TextBox" & i).Value = Cells(i + 1, 1).Value
Next i

End Sub

स्पष्टीकरण: कोड की कुछ पंक्तियों के साथ, हम चादर से फोन नंबरों के साथ टेक्स्ट बॉक्स भर सकते हैं। हमने तत्वों को संयोजित करने (शामिल) करने के लिए ऑपरेटर का उपयोग किया। ये कोड लाइनें काम करती हैं क्योंकि हमने टेक्स्ट बॉक्स नियंत्रणों (टेक्स्टबॉक्स 1, टेक्स्टबॉक्स 2, टेक्स्टबॉक्स 3, आदि) के नामों को नहीं बदला है। नियंत्रणों के नाम बदलने के लिए, देखें, गुण विंडो पर क्लिक करें और प्रत्येक नियंत्रण पर क्लिक करें।

जब आप पत्रक पर आदेश बटन क्लिक करते हैं, तो परिणाम:

नियंत्रण संग्रह परिणाम

यह भी पढ़ें: