सामग्री सारणी
या लेखात, मी तुम्हाला दाखवेन की तुम्ही VBA मध्ये अॅरेमध्ये स्ट्रिंग कशी विभाजित करू शकता. विभाजन हे सर्वात महत्वाचे आणि मोठ्या प्रमाणावर वापरले जाणारे फंक्शन आहे जे आम्ही VBA मध्ये वापरतो. तुम्ही VBA मध्ये सर्व प्रकारच्या मार्गांनी स्ट्रिंग विभाजित करायला शिकाल.
VBA स्प्लिट फंक्शन (क्विक व्ह्यू)
=Split(Expression As String, [Delimiter], [Limit As Long=1], [CompareAsVbCompareMethod=vbBinaryCompare]) 
सराव वर्कबुक डाउनलोड करा
स्ट्रिंगला Array.xlsm मध्ये विभाजित करा
VBA मधील अॅरेमध्ये स्ट्रिंग विभाजित करण्याचे 3 मार्ग
आपल्या हातात एक स्ट्रिंग असू द्या “आम्ही यू.एस., कॅनडा, ऑस्ट्रेलिया आणि फ्रान्सच्या व्हिसासाठी अर्ज केला आहे. .” .
मी तुम्हाला दाखवतो की तुम्ही VBA चे स्प्लिट फंक्शन वापरून या स्ट्रिंगला अॅरेमध्ये कसे विभाजित करू शकता. .
१. VBA मधील अॅरेमध्ये स्ट्रिंग विभाजित करण्यासाठी कोणतेही परिसीमक वापरा
तुम्ही VBA मधील अॅरेमध्ये स्ट्रिंग विभाजित करण्यासाठी कोणत्याही स्ट्रिंगचा वापर डिलिमिटर म्हणून करू शकता.
हे एक स्पेस (““) , एक स्वल्पविराम (“,”) , एक अर्धविराम (“:”) , एकल वर्ण, a वर्णांची स्ट्रिंग, किंवा काहीही.
⧭ उदाहरण 1:
चला स्वल्पविराम वापरून स्ट्रिंग विभाजित करू. डिलिमिटर.
कोडची ओळ असेल:
Arr = Split(Text, ",") पूर्ण VBA कोड असेल:
⧭ VBA कोड:
8846
⧭ आउटपुट:
हे स्ट्रिंगला {“आम्ही यू.एस.च्या व्हिसासाठी अर्ज केला आहे”, “कॅनडा”, “ऑस्ट्रेलिया”, “अॅरेमध्ये विभाजित करेलफ्रान्स”}.
⧭ उदाहरण 2:
डिलिमिटर म्हणून तुम्ही स्पेस (“ ”) देखील वापरू शकता.
कोडची ओळ असेल:
Arr = Split(Text, " ") पूर्ण VBA कोड असेल:
⧭ VBA कोड:
6495
⧭ आउटपुट:
हे स्ट्रिंगला {“आम्ही”, “लागू”, “साठी”, असलेल्या अॅरेमध्ये विभाजित करेल. “द”, “व्हिसा”, “चा”, “यूएस”, “कॅनडा,”, “ऑस्ट्रेलिया,”, “फ्रान्स,”}.
<2
⧭ लक्षात ठेवण्याच्या गोष्टी:
- डिफॉल्ट डिलिमिटर हे स्पेस (“ ”) आहे.
- म्हणजे, जर तुम्ही कोणतेही परिसीमक घातले नाही, तर ते स्पेस परिसीमक म्हणून वापरेल.
अधिक वाचा: एक्सेलमधील वर्णानुसार स्ट्रिंग विभाजित करा (6 योग्य मार्ग)
समान वाचन:
- मल्टिपलमध्ये विभाजित करा Excel मधील सेल
- VBA कॉलममधून अनन्य मूल्ये मिळवण्यासाठी Excel मधील अॅरेमध्ये (3 निकष)
- Excel VBA: एकाधिक सह फिल्टर कसे करावे अॅरेमधील निकष (7 मार्ग)
2. कोणत्याही आयटमच्या संख्येसह अॅरेमध्ये स्ट्रिंग विभाजित करा
तुम्ही तुमच्या इच्छेनुसार आयटमच्या संख्येसह अॅरेमध्ये स्ट्रिंग विभाजित करू शकता.
आयटमची संख्या म्हणून घाला स्प्लिट फंक्शन चा 3रा वितर्क.
⧭ उदाहरण:
चला विभाजित करूया पहिल्या 3 आयटममध्ये स्पेस डिलिमिटर म्हणून स्ट्रिंग करा.
कोडची ओळ असेलअसेल:
Arr = Split(Text, " ", 3) आणि VBA कोड असेल:
⧭ VBA कोड:
4141
⧭ आउटपुट:
हे स्ट्रिंगला एका मध्ये विभाजित करेल डिलिमिटर स्पेस ने विभक्त केलेल्या पहिल्या 3 आयटमचा समावेश असलेला अ‍ॅरे.
⧭ लक्षात ठेवण्यासारख्या गोष्टी:
- डिफॉल्ट युक्तिवाद -1 आहे.
- याचा अर्थ, तुम्ही युक्तिवाद इनपुट न केल्यास, ते विभाजित होईल स्ट्रिंग शक्य तितक्या जास्तीत जास्त वेळा.
अधिक वाचा: एक्सेलमध्ये लांबीनुसार स्ट्रिंग कसे विभाजित करावे (8 मार्ग)
3. VBA
स्प्लिट फंक्शन तुम्हाला केस-संवेदी आणि दोन्ही वापरण्याची ऑफर देते. केस-असंवेदनशील परिसीमक.
केस-असंवेदनशील परिसीमकासाठी, चौथा वितर्क 1. <म्हणून घाला. 3>
आणि केस-असंवेदनशील डिलिमिटरसाठी, 4था युक्तिवाद 0 म्हणून घाला.
⧭<2 उदाहरण 1: केस-असंवेदनशील परिसीमक
दिलेल्या स्ट्रिंगमध्ये, मजकूर “FOR” हा परिसीमक आणि 2 म्हणून विचारात घेऊ. अॅरेच्या एकूण आयटमची संख्या.
आता, केस-असंवेदनशील केससाठी, कोडची ओळ असेल:
Arr = Split(Text, "FOR ", 3,1) आणि पूर्ण VBA कोड असेल:
⧭ VBA कोड:
3116
⧭ आउटपुट:
जसे परिसीमक येथे केस-असंवेदनशील आहे, “साठी ” “साठी” म्हणून कार्य करेल आणि ते दोन आयटमच्या अॅरेमध्ये स्ट्रिंग विभाजित करेल.
⧭ उदाहरण 2: केस-सेन्सिटिव्ह डिलिमिटर
पुन्हा, केस-सेन्सिटिव्ह केससाठी, कोडची ओळ असेल:
Arr = Split(Text, "FOR ", 3,0) आणि पूर्ण VBA कोड असेल:
⧭ VBA कोड:
3571
⧭ आउटपुट:
विसीमक येथे केस-संवेदी असल्याने, “ FOR” “for” असे होणार नाही आणि ते स्ट्रिंगला दोन आयटमच्या अॅरेमध्ये विभाजित करणार नाही.
अधिक वाचा: Excel VBA: अॅरेमधून डुप्लिकेट काढा (2 उदाहरणे)
⧭ लक्षात ठेवण्याच्या गोष्टी: <3
- वितर्काचे डीफॉल्ट मूल्य 0 आहे.
- म्हणजे, जर तुम्ही चौथा युक्तिवादाचे मूल्य ठेवले नाही, हे केस-संवेदनशील जुळणीसाठी कार्य करेल.
निष्कर्ष
म्हणून, या पद्धतींचा वापर करून, तुम्ही <1 वापरू शकता VBA पैकी>स्प्लिट फंक्शन आयटमच्या अॅरेमध्ये स्ट्रिंग विभाजित करा. तुला काही प्रश्न आहेत का? आम्हाला विचारण्यास मोकळ्या मनाने.
