सामग्री तालिका
Excel मा VBA सँग काम गर्दा, हामीले प्रायः कार्यपत्रमा स्ट्रिङ (हरू) र चर (हरू) जोड्नुपर्छ। विद्यार्थीहरूको नतिजा संक्षेपदेखि जटिल व्यवसायको विश्लेषण गर्नदेखि लिएर हाम्रा कार्यहरूमा लगभग सबै क्षेत्रहरूमा कन्काटेनेटिङ स्ट्रिङ (हरू) र चर (हरू) व्यापक रूपमा प्रयोग गरिन्छ। यस लेखमा, म तपाईंलाई एक्सेलमा VBA को साथ कार्यपत्रमा स्ट्रिङ (हरू) र चर (हरू) कसरी जोड्न सक्नुहुन्छ भनेर देखाउनेछु। म उपयुक्त उदाहरणहरू र दृष्टान्तहरूका साथ चीजहरू व्याख्या गर्नेछु।
एक्सेल VBA (द्रुत दृश्य) मा कन्केटनेट स्ट्रिङ (हरू) र भेरिएबल (हरू)
अभ्यास कार्यपुस्तिका डाउनलोड गर्नुहोस्
तपाईंले यो लेख पढिरहँदा अभ्यास गर्न यो अभ्यास कार्यपुस्तिका डाउनलोड गर्नुहोस्।
Concatenate String and Variable.xlsm<एक्सेल VBA (स्टेप बाइ स्टेप एनालिसिस) मा 0>Concatenate String (s) र variable (s)
सबैभन्दा पहिले, हामी कसरी स्ट्रिङ (हरू) लाई जोड्न सक्छौं हेरौं। र चर (हरू) VBA चरणबद्ध रूपमा।
⧪ कनकेटेनेटिङ स्ट्रिङ (हरू):
मा दुई वा बढी स्ट्रिङहरू जोड्न VBA , तपाईंले अंकगणित अतिरिक्त (+) प्रतीक र एम्परसेन्ड (& ) प्रतीक दुवै प्रयोग गर्न सक्नुहुन्छ।
उदाहरणका लागि, संयोजन गर्न "महान अपेक्षाहरू" र "अ टेल अफ टु सिटिज" अल्पविराम को साथमा, तपाईंले प्रयोग गर्न सक्नुहुन्छ:
4276
वा,
2995
माथिको कुनै पनि कोडहरू चलाउनुहोस्। यसले कन्कटेनेट गरिएको आउटपुट, ठूलो अपेक्षाहरू प्रदर्शन गर्नेछ,ए टेल अफ टु सिटिज ।
⧪ कन्केटेनेटिङ भेरिएबल (हरू)
यदि सबै चरहरूमा स्ट्रिङ मानहरू छन् भने, त्यसोभए तपाईले अंकगणित अतिरिक्त (+) प्रतीक र एम्परसेन्ड (&) प्रतीक प्रयोग गर्न सक्नुहुन्छ।
तर यदि तिनीहरूले गर्दैनन् भने, तपाइँ प्रयोग गर्न सक्नुहुन्छ। केवल एम्परसेन्ड (&) प्रतीक जोड्नको लागि।
उदाहरणका लागि, दुई चरहरू राखौं, A र B ।
1 ।
तपाईँले थप (+) प्रतीक र एम्परसेन्ड (&) प्रतीकलाई जोड्न प्रयोग गर्न सक्नुहुन्छ।
3416
वा,
3360
दुवै अवस्थामा, तिनीहरूले जोडिएको स्ट्रिङ फर्काउनेछन्।
तर यदि A एउटा स्ट्रिङ हो ( "ए टेल अफ टु सिटीज" ) र B पूर्णांक हो ( 27 ), तपाईँले कन्कटेनेट गर्न एम्परसेन्ड (&) प्रतीक प्रयोग गर्नुपर्छ।
7931
यसले कन्कटेनेट गरिएको आउटपुट फर्काउनेछ। .
Concat को उदाहरणहरू एक्सेल VBA (म्याक्रो, UDF, र UserForm सम्मिलित) मा स्ट्रिङहरू र चरहरू enate गर्नुहोस्
हामीले एक्सेलमा VBA सँग स्ट्रिङ (हरू) र चर (हरू) जोड्न सिकेका छौं। । यस पटक हामी VBA संग जोड्ने स्ट्रिङ (हरू) र चर (हरू) समावेश गर्ने केही उदाहरणहरू अन्वेषण गर्नेछौं।
उदाहरण 1: स्ट्रिङ (हरू) लाई कन्कटेनेट गर्न म्याक्रोको विकास गर्दै र एक्सेल VBA मा चर (हरू)
हामीले सिकेका छौं VBA सँग स्ट्रिङ र चरहरू जोड्नुहोस्। यस पटक हामी वर्कशीटमा धेरै स्तम्भहरूको स्ट्रिङ र चरहरू जोड्नको लागि म्याक्रो विकास गर्नेछौं।
यहाँ हामीले पुस्तक नामहरू सँग डाटा सेट पाएका छौं, मार्टिन बुकस्टोर नामक पुस्तक पसलका केही पुस्तकहरूको लेखकहरू , र मूल्य ।
एक म्याक्रो<2 विकास गरौं।> कक्ष F4 मा डेटा सेट B4:D14 को स्तम्भहरू 1, 2, र 3 जोड्न।
VBA कोड हुनेछ:
⧭ VBA कोड:
9160
⧭ आउटपुट :
यो कोड चलाउनुहोस्। तपाईंले 3 स्तम्भहरू दायरा F4:F14 मा मिल्नुहुनेछ।
थप पढ्नुहोस्: म्याक्रो देखि एक्सेलमा बहु स्तम्भहरू जोड्नुहोस् (UDF र UserForm सँग)
उदाहरण २: एक्सेल VBA मा स्ट्रिङ (हरू) र चर (हरू) जोड्नको लागि प्रयोगकर्ता-परिभाषित प्रकार्य सिर्जना गर्दै
हामीले डेटा सेटको धेरै स्तम्भहरू जोड्न म्याक्रो विकास गर्न सिकेका छौं। यस पटक हामी एक्सेलमा स्ट्रिङ वा चरहरू जोड्नको लागि प्रयोगकर्ता-परिभाषित प्रकार्य सिर्जना गर्नेछौं।
पूरा VBA कोड हुनेछ:
⧭ VBA Code:
3282
⧭ आउटपुट:
तपाईँले जोड्न चाहनुभएको स्तम्भ चयन गर्नुहोस् दायरा र यो सूत्र प्रविष्ट गर्नुहोस्:
=ConcatenateValues("She","H. Rider Haggard",", ") यसले She, H. Rider Haggard आउटपुटको रूपमा फर्काउनेछ।
फेरि, सूत्र प्रविष्ट गर्नुहोस्:
=ConcatenateValues(B4:B14,30,", ") [ एरे सूत्र । त्यसैले नबिर्सनुहोस्तपाईं Office 365 मा नभएसम्म CTRL + SHIFT + ENTER थिच्नुहोस्।]
यसले दायरा B4:B14 को सबै मानहरूसँग 30 जोड्नेछ। .
अन्तमा, प्रविष्ट गर्नुहोस्:
=ConcatenateValues(B4:B14,C4:C14,", ") [फेरि एरे सूत्र<२>। त्यसैले तपाईं Office 365 मा नभएसम्म CTRL + SHIFT + ENTER थिच्न नबिर्सनुहोस्।]
यसले दायरा B4 को सबै मानहरू जोड्नेछ: B14 ती मध्ये C4:C14 ।
थप पढ्नुहोस्: एक्सेलमा कसरी जोड्ने (३ उपयुक्त तरिकाहरू)
समान पढाइहरू:
- कसरी दुई वा बढी कक्षहरूबाट पाठलाई एक्सेलमा एक कक्षमा जोड्ने (५ विधिहरू)
- Excel मा एउटा कक्षमा पङ्क्तिहरू जोड्नुहोस्
- एक्सेलमा सङ्ख्याहरू जोड्नुहोस् (४ द्रुत सूत्रहरू)
- पाठ जोड्नुहोस् एक्सेलमा (८ उपयुक्त तरिकाहरू)
- एक्सेलमा एपोस्ट्रोफलाई कसरी जोड्ने (६ सजिलो तरिका)
उदाहरण ३: विकास गर्दै एक्सेल VBA
हामीले म्याक्रो र प्रयोगकर्ता-परिभाषित विकास गर्न सिकेका छौं। प्रकार्य तार र मानहरू जोड्न। अन्तमा, हामी एक UserForm विकास गर्नेछौं वांछित कार्यपत्रको इच्छित स्थानमा स्ट्रिङ र मानहरू जोड्न।
⧪ चरण 1: UserForm घुसाउनुहोस्
जानुहोस् घुसाउनुहोस् > नयाँ UserForm घुसाउनको लागि VBA उपकरणपट्टीमा UserForm विकल्प।
⧪ चरण २: तान्दै उपकरणहरूUserForm
A UserForm लाई UserForm1 भनिन्छ, साथै Toolbox Control भनिन्छ।
तपाईँको माउसलाई यस e Toolbox माथि सार्नुहोस् र 2 ListBoxes, 5 TextBoxes, 7 Labels र 1 CommanButtons UserForm मा तान्नुहोस्।
लेबलहरूको प्रदर्शन परिवर्तन गर्नुहोस् चित्रमा देखाइए अनुसार।
त्यसैगरी, कमान्ड बटन को डिस्प्लेलाई ठीक छ मा परिवर्तन गर्नुहोस्।
⧪ चरण 3: TextBox1 को लागि कोड लेखन
TextBox1 मा डबल क्लिक गर्नुहोस्। एउटा निजी उपप्रक्रिया भनिन्छ TextBox1_Change खुल्नेछ। त्यहाँ निम्न कोड प्रविष्ट गर्नुहोस्।
4189
⧪ चरण 4: TextBox3 को लागि कोड लेखन
त्यसै गरी, मा डबल क्लिक गर्नुहोस् TextBox3 । अर्को निजी उपप्रक्रिया भनिन्छ TextBox3_Change खुल्नेछ। त्यहाँ निम्न कोड प्रविष्ट गर्नुहोस्।
4204
⧪ चरण 5: TextBox4 को लागि कोड लेखन
साथै, मा डबल क्लिक गर्नुहोस् TextBox3 । अर्को निजी उपप्रक्रिया भनिन्छ TextBox3_Change खुल्नेछ। त्यहाँ निम्न कोड प्रविष्ट गर्नुहोस्।
6557
⧪ चरण 6: ListBox2 को लागि कोड लेखन
त्यसपछि ListBox2 मा डबल क्लिक गर्नुहोस् । जब निजी उपप्रक्रिया भनिन्छ ListBox2_Click खुल्छ, त्यहाँ यो कोड प्रविष्ट गर्नुहोस्।
3894
⧪ चरण 7: लेखन कोड CommanButton1
का लागि पनि, CommanButton1 मा डबल-क्लिक गर्नुहोस्। पछि निजी उपप्रक्रिया भनिन्छ कमान्डबटन1_परिवर्तन खोल्छ, त्यहाँ निम्न कोड घुसाउनुहोस्।
4424
⧪ चरण 7: UserForm चलाउनको लागि कोड लेख्नुहोस्
Now अन्तिम चरण हो। VBA उपकरणपट्टीबाट नयाँ मोड्युल घुसाउनुहोस् र निम्न कोड घुसाउनुहोस्।
4021
⧪ चरण 8: चलिरहेको छ। UserForm
तपाईंको UserForm अब प्रयोगको लागि तयार छ। यसलाई चलाउनको लागि, कार्यपत्रबाट डेटा सेट चयन गर्नुहोस् ( हेडरहरू सहित) र चलाउनुहोस् Macro भनिन्छ Run_UserForm ।
UserForm सबै विकल्पहरूसँग लोड हुनेछ। चयन गरिएको दायरा ठेगाना TextBox1 ( B3:D4 यहाँ) मा देखाइनेछ। यदि तपाईं चाहनुहुन्छ भने, तपाईं यसलाई परिवर्तन गर्न सक्नुहुन्छ। कार्यपत्रमा चयन गरिएको दायरा परिवर्तन हुनेछ।
तपाईँले स्तम्भहरू कन्क्याट सूचीबक्सबाट कन्क्याट गर्न चाहनुभएको स्तम्भहरू चयन गर्नुहोस्। यहाँ मैले पुस्तकको नाम र मूल्य चयन गरेको छु।
विभाजक प्रविष्ट गर्नुहोस्। यहाँ मैले अल्पविराम ( , ) प्रविष्ट गरेको छु।
कार्यपत्रको नाम चयन गर्नुहोस् जहाँ तपाईँले कन्कटेनेटेड इन<2 बाट जोडिएको दायरा राख्न चाहनुहुन्छ।> सूची बाकस। यहाँ मैले Sheet3 प्रविष्ट गरेको छु।
(तपाईंले पाना चयन गर्ने क्षणमा, यो सक्रिय नभए पनि सक्रिय हुनेछ।)
त्यसपछि घुसाउनुहोस् आउटपुट स्थान । यो संगठित दायराको पहिलो कक्षको सेल सन्दर्भ हो। यहाँ मैले B3 राखेको छु।
(तपाईले आउटपुट स्थान प्रविष्ट गर्ने क्षणमा, आउटपुट दायरा चयन हुनेछ)।
र अन्तमा , प्रविष्ट गर्नुहोस् आउटपुट हेडर (आउटपुट दायराको हेडर) को नाम। यहाँ मैले Concatenated दायरा राखेको छु।
(तपाईले आउटपुट हेडर राख्नुभएको क्षण, आउटपुट स्तम्भको हेडर सेट हुनेछ।)
ठीक छ क्लिक गर्नुहोस्। तपाईंले इच्छित स्थानमा इच्छित आउटपुट प्राप्त गर्नुहुनेछ।
थप पढ्नुहोस्: VBA प्रयोग गरेर स्ट्रिङ र पूर्णांक कसरी जोड्ने
निष्कर्ष
त्यसैले यी केही उदाहरणहरू हुन् जसमा तपाईँले स्ट्रिङ र चरहरू जोड्न Excel VBA प्रयोग गर्न सक्नुहुन्छ। आशा छ उदाहरणहरूले तपाईंको लागि सबै कुरा स्पष्ट पारेको छ। के तपाईंको कुनै प्रश्न छन्? हामीलाई सोध्न नहिचकिचाउनुहोस्। र थप पोष्ट र अद्यावधिकहरूको लागि हाम्रो साइट ExcelWIKI भ्रमण गर्न नबिर्सनुहोस्।
