सामग्री तालिका
यस लेखमा, म तपाइँलाई VBA मा एरेमा स्ट्रिङलाई कसरी विभाजन गर्न सक्नुहुन्छ भनेर देखाउनेछु। विभाजन हामीले VBA मा प्रयोग गर्ने सबैभन्दा महत्त्वपूर्ण र व्यापक रूपमा प्रयोग हुने प्रकार्यहरू मध्ये एक हो। तपाईंले VBA मा सबै प्रकारका सम्भावित तरिकाहरूमा स्ट्रिङ विभाजन गर्न सिक्नुहुनेछ।
VBA विभाजन प्रकार्य (द्रुत दृश्य)
=Split(Expression As String, [Delimiter], [Limit As Long=1], [CompareAsVbCompareMethod=vbBinaryCompare]) 
अभ्यास कार्यपुस्तिका डाउनलोड गर्नुहोस्
एउटा स्ट्रिङलाई Array.xlsm मा विभाजन गर्नुहोस्
3 VBA मा एरेमा स्ट्रिङ विभाजन गर्ने तरिका
हाम्रो हातमा स्ट्रिङ राखौं “हामीले अमेरिका, क्यानडा, अष्ट्रेलिया र फ्रान्सको भिसाका लागि आवेदन दियौं। .” ।
म तपाईंलाई यो स्ट्रिङलाई कसरी VBA को स्प्लिट प्रकार्य प्रयोग गरेर सबै प्रकारका सम्भावित तरिकाहरूमा एरेमा विभाजन गर्न सक्नुहुन्छ भनेर देखाउनेछु। .
१. VBA मा एरेमा स्ट्रिङ विभाजन गर्न कुनै पनि डिलिमिटर प्रयोग गर्नुहोस्
तपाईले VBA मा एरेमा स्ट्रिङ विभाजन गर्न कुनै पनि स्ट्रिङलाई डिलिमिटरको रूपमा प्रयोग गर्न सक्नुहुन्छ।
यो एउटा स्पेस (““) , a अल्पविराम (“,”) , a सेमिकोलन (“:”) , एकल क्यारेक्टर, a क्यारेक्टरको स्ट्रिङ, वा केहि पनि।
⧭ उदाहरण १:
स्ट्रिङलाई अल्पविराम को रूपमा विभाजन गरौं। डिलिमिटर।
कोडको लाइन यस्तो हुनेछ:
Arr = Split(Text, ",") पूर्ण VBA कोड हुनेछ:
⧭ VBA कोड:
8042
⧭ आउटपुट:
यसले {"हामीले U.S. को भिसाका लागि आवेदन गर्यौं", "क्यानाडा", "अष्ट्रेलिया", "को एर्रेमा स्ट्रिङ विभाजित गर्नेछ।फ्रान्स”}।
⧭ उदाहरण २:
तपाईले स्पेस (“ ”) लाई डिलिमिटरको रूपमा पनि प्रयोग गर्न सक्नुहुन्छ।
कोडको लाइन यस्तो हुनेछ:
Arr = Split(Text, " ") पूर्ण VBA कोड हुनेछ:
⧭ VBA कोड:
1908
⧭ आउटपुट:
यसले {"हामी", "लागू गरिएको", "का लागि", "द", "भिसा", "को", "अमेरिका", "क्यानाडा", "अष्ट्रेलिया", "फ्रान्स,"}।
⧭ याद राख्नु पर्ने कुराहरू:
- पूर्वनिर्धारित डिलिमिटर स्पेस (“ ”) हो।
- अर्थात, यदि तपाईंले कुनै पनि सीमांकक सम्मिलित गर्नुभएन भने, यसले स्पेस लाई डिलिमिटरको रूपमा प्रयोग गर्नेछ।
थप पढ्नुहोस्: एक्सेलमा क्यारेक्टरद्वारा स्प्लिट स्ट्रिङ (6 उपयुक्त तरिकाहरू)
समान पढाइहरू:
- पाठलाई धेरैमा विभाजन गर्नुहोस् Excel मा कक्षहरू
- VBA स्तम्भबाट एरेमा Excel मा अद्वितीय मानहरू प्राप्त गर्न (3 मापदण्ड)
- Excel VBA: कसरी धेरैसँग फिल्टर गर्ने एरेमा मापदण्ड (७ तरिकाहरू)
2। स्ट्रिङलाई एरेमा वस्तुहरूको कुनै पनि संख्यामा विभाजन गर्नुहोस्
तपाईँले आफ्नो इच्छा अनुसार वस्तुहरूको संख्याको साथ एरेमा स्ट्रिङ विभाजन गर्न सक्नुहुन्छ।
वस्तुहरूको संख्या यस रूपमा घुसाउनुहोस् स्प्लिट प्रकार्य को 3rd तर्क।
⧭ उदाहरण:
विभाजित गरौं पहिलो 3 वस्तुहरूमा स्पेस लाई डिलिमिटरको रूपमा स्ट्रिङ गर्नुहोस्।
कोडको लाइन हुनेछ।be:
Arr = Split(Text, " ", 3) र VBA कोड हुनेछ:
⧭ VBA कोड:
5157
⧭ आउटपुट:
यसले स्ट्रिङलाई विभाजन गर्नेछ सीमांकक स्पेस द्वारा छुट्याएको पहिलो 3 वस्तुहरू समावेश भएको एरे।
⧭ याद राख्नु पर्ने कुराहरू:
- पूर्वनिर्धारित तर्क -1 हो।
- यसको मतलब, यदि तपाईंले तर्क इनपुट गर्नुभएन भने, यो विभाजित हुनेछ। स्ट्रिङलाई सम्भव भएसम्मको अधिकतम संख्यामा।
थप पढ्नुहोस्: एक्सेलमा लम्बाइद्वारा स्ट्रिङलाई कसरी विभाजन गर्ने (८ तरिका)
<९> ३. VBAस्प्लिट प्रकार्य ले तपाईंलाई केस-संवेदनशील र दुवै प्रयोग गर्न प्रस्ताव गर्दछ। 1 3>
र केस-असंवेदनशील डिलिमिटरको लागि, 4औ तर्कलाई 0 को रूपमा घुसाउनुहोस्।
⧭<2 उदाहरण १: केस-असंवेदनशील डिलिमिटर
दिईएको स्ट्रिङमा, पाठ “FOR” लाई परिसीमकको रूपमा र 2 लाई विचार गरौं। एरेका वस्तुहरूको कुल संख्या।
अब, केस-असंवेदनशील केसको लागि, कोडको रेखा यस्तो हुनेछ:
Arr = Split(Text, "FOR ", 3,1) र पूरा VBA कोड हुनेछ:
⧭ VBA कोड:
1271
⧭ आउटपुट:
यहाँ डिलिमिटर केस-असंवेदनशील छ, “का लागि " “का लागि” को रूपमा काम गर्नेछ र यसले स्ट्रिङलाई दुई वस्तुहरूको एर्रेमा विभाजन गर्नेछ।
⧭ उदाहरण २: केस-सेन्सेटिभ डिलिमिटर
फेरि, केस-सेन्सेटिभ केसको लागि, कोडको लाइन यस्तो हुनेछ:
Arr = Split(Text, "FOR ", 3,0) र पूरा VBA कोड हुनेछ:
⧭ VBA कोड:
4466
⧭ आउटपुट:
यहाँ डिलिमिटर केस-सेन्सेटिभ भएकोले “ FOR” “for” को रूपमा हुनेछैन र यसले स्ट्रिङलाई दुई वस्तुहरूको एर्रेमा विभाजन गर्दैन।
थप पढ्नुहोस्: Excel VBA: एरेबाट डुप्लिकेटहरू हटाउनुहोस् (२ उदाहरणहरू)
⧭ याद गर्नुपर्ने कुराहरू: <3
- तर्कको पूर्वनिर्धारित मान 0 हो।
- अर्थात, यदि तपाईंले 4थ तर्कको मान राख्नुभएको छैन भने, यसले केस-संवेदनशील मिलानको लागि काम गर्नेछ।
निष्कर्ष
त्यसैले, यी विधिहरू प्रयोग गरेर, तपाईंले <1 प्रयोग गर्न सक्नुहुन्छ। VBA को प्रकार्य विभाजित गर्नुहोस् वस्तुहरूको एर्रेमा स्ट्रिङ विभाजित गर्न। के तपाईंको कुनै प्रश्न छन्? हामीलाई सोध्न नहिचकिचाउनुहोस्।
