सामग्री तालिका
एक्सेलमा, एकल स्ट्रिङ बनाउनका लागि दुईवटा स्ट्रिङहरू एकसाथ जोड्ने प्रक्रिया हो। सरल रूपमा भन्नुपर्दा, यदि हामीसँग एउटा स्तम्भमा पहिलो नामहरू र अर्कोमा अन्तिम नामहरू भएको तालिका छ भने, हामीले विभाजन प्रक्रियालाई एक सेकेन्डमा एकल कक्षमा जोड्न र संयोजन गर्न प्रयोग गर्न सक्छौं। एक्सेलमा, हामीसँग CONCATENATE () नामक प्रकार्य छ जसले हामीलाई यो संयोजन गर्न अनुमति दिन्छ। यद्यपि, VBA मा, यस प्रकारको प्रकार्यलाई अनुमति छैन। हामीले VBA कोडमा CONCATENATE () प्रयोग गर्न सक्दैनौं किनभने यसले काम गर्दैन। किनभने VBA मा बिल्ट-इन प्रकार्यहरू छैनन् र हामी स्प्रेडसिट प्रकार्यहरू प्रयोग गर्न सक्दैनौं। त्यसोभए, यस पाठले एक्सेलमा धेरै कक्षहरू, स्तम्भहरू र पङ्क्तिहरू संयोजन गर्न कसरी VBA कन्काटेनेट प्रयोग गर्ने भनेर देखाउनेछ।
अभ्यास कार्यपुस्तिका डाउनलोड गर्नुहोस्
यो अभ्यास कार्यपुस्तिका डाउनलोड गर्नुहोस्। यो लेख पढिरहँदा व्यायाम गर्न।
VBA Concatenate Function.xlsm
VBA Concatenate प्रकार्यको परिचय
जस्तो हामीसँग छ VBA Concatenate को लागि एक्सेलमा कुनै बिल्ट-इन प्रकार्य छैन, तर हामी यसलाई अपरेटरहरूसँग विभिन्न स्ट्रिङहरू संयोजन गरेर एक प्रकार्यको रूपमा काम गर्न सक्छौं। यहाँ हामीले ampersand (&) हाम्रो अपरेटरको रूपमा प्रयोग गर्छौं।
⟴ सिन्ट्याक्स
String1 = “ पहिलो पाठ”<9
String2 = “ दोस्रो पाठ”
⟴ फिर्ता मान
Return_value = String1 & String2
4 VBA Concatenate को विभिन्न प्रयोगहरूएक्सेलमा फंक्शन
यहाँ, हामी कन्कटेनेट प्रक्रिया गर्न 4 फरक दृष्टिकोणहरू प्रयोग गर्नेछौं। हामी यसलाई प्राप्त गर्न VBA कोडसँग संयोजनमा विभिन्न अपरेटरहरू लागू गर्नेछौं।
1. VBA Concatenate
मा देखाइए अनुसार कक्षहरूमा सामेल हुन एम्परसेन्ड (&) अपरेटर प्रयोग गर्नुहोस्। तलको स्क्रिनसटमा, हामीसँग एउटा स्तम्भमा पहिलो नाम र अर्कोमा अन्तिम नामहरू सहित दुई-स्तम्भ डेटा संग्रह छ। दुई स्तम्भहरू मर्ज गरेर, हामी अब सम्पूर्ण नामहरू प्राप्त गर्न सक्छौं। किनकी VBA सँग जडानको लागि कुनै निर्मित विधिहरू छैनन्, हामी एम्परसेन्ड (&) अपरेटरलाई तलका निर्देशनहरूमा विस्तृत रूपमा प्रयोग गर्नेछौं।
चरण 1:
- सबैभन्दा पहिले, थिच्नुहोस् Alt + F11 खोल्नको लागि म्याक्रो-सक्षम कार्यपत्र।
- त्यसपछि, क्लिक गर्नुहोस्
- मोड्युल चयन गर्नुहोस्।
चरण 2:
- दुई कक्षहरू एकमा मिलाउन, निम्न प्रतिलिपि गरेर टाँस्नुहोस् VBA
9747
यहाँ,
- String1 = कक्षहरू(5, 2)।मान पहिलो कक्ष स्थान हो B5 , पङ्क्ति 5, र स्तम्भ 2 ।
- String2 = कक्षहरू(5, 3)।मान दोस्रो कक्ष स्थान हो C5 , पङ्क्ति 5, र स्तम्भ 3 ।
- सेलहरू(5, 5)।मान = String1 & String2 परिणाम कक्ष स्थान हो E5 , पङ्क्ति 5 र स्तम्भ 5 ।
- String1 & String2 Ampersand (&)
चरणले जोडेका दुई स्ट्रिङहरू हुन्3:
- सुरक्षित गर्नुहोस् र कार्यक्रम चलाउन F5 थिच्नुहोस्।
त्यसैले, तपाईंले मा परिणाम प्राप्त गर्नुहुनेछ। E5 तपाईँको हालको कार्यपत्रको कक्ष।
चरण 4:
- को लागि चरणहरू पछ्याउनुहोस् र दोहोर्याउनुहोस्। बाँकी कक्षहरू र तलको छविमा देखाइएअनुसार परिणामहरू प्राप्त गर्नुहोस्।
नोट। VBA<2 चलाउनको लागि।> कोड, प्रत्येक पटक सुनिश्चित गर्नुहोस् कि तपाईको एक्सेल फाइल एक्सेल म्याक्रो-सक्षम कार्यपत्र (xlsm।) ढाँचामा बचत गरिएको छ।
थप पढ्नुहोस्: एक्सेलमा VBA StrComp कसरी प्रयोग गर्ने ( ५ सामान्य उदाहरणहरू)
2. VBA Concatenate मा सेलहरू सामेल हुन प्लस (+) अपरेटर प्रयोग गर्नुहोस्
अघिल्लो खण्डमा वर्णन गरिए अनुसार, हामीले एम्परसेन्ड (&) प्रयोग गरेका छौं। ;) सेल स्ट्रिङमा सामेल हुन अपरेटर। तपाईंले एम्परसेन्ड (&) अपरेटरको सट्टामा प्लस (+) साइन इन लागू गरेर समान परिणाम प्राप्त गर्न सक्नुहुन्छ। यो गर्नका लागि यी चरणहरू पालना गर्नुहोस्।
चरण 1:
- खोल्न म्याक्रो Excel मा, Alt + F11 थिच्नुहोस्।
- Insert क्लिक गर्नुहोस् र चयन गर्नुहोस्
- कार्यक्रम पृष्ठ खोलिसकेपछि, टाँस्नुहोस्। निम्न VBA
5015
यहाँ,
- सेलहरू(5, 5)।Value = String1 + String2 यो लाइन हो हामी एम्परसेन्ड (&)
चरण 2 को सट्टा प्लस (+) चिन्ह प्रयोग गर्छौं :
- पास्ट गरेपछि, कार्यक्रम चलाउन F5 बचाउनुहोस् र थिच्नुहोस्। फलस्वरूप, तपाईंले कक्षमा परिवर्तन देख्नुहुनेछ E5 ।
- अन्तिम परिणामहरू प्राप्त गर्न, अघिल्लो चरणहरू पुन: प्रदर्शन गरेर आवश्यक कक्षहरू भर्नुहोस्।
थप पढ्नुहोस्: VBA StrConv प्रकार्य कसरी प्रयोग गर्ने (५ उदाहरणहरू)
समान पढाइहरू:
- एक्सेलमा VBA मा सबलाई कसरी कल गर्ने (4 उदाहरणहरू)
- VBA प्रकार्यमा मान फर्काउनुहोस् (दुबै एरे र गैर-एरे मानहरू)
- एक्सेलमा VBA DIR प्रकार्य कसरी प्रयोग गर्ने (७ उदाहरणहरू)
- एक्सेलमा VBA UCASE प्रकार्य प्रयोग गर्नुहोस् ( ४ उदाहरणहरू)
- VBA मा InStr प्रकार्य कसरी प्रयोग गर्ने (३ उदाहरणहरू)
3. VBA Concatenate प्रयोग गरेर धेरै स्तम्भहरू थप्नुहोस्
अघिल्लो दुई दृष्टिकोणहरूमा, हामीले दुई कक्षहरू कसरी संयोजन गर्ने भनेर छलफल गर्यौं। यद्यपि, यदि हामी यसलाई सम्पूर्ण स्तम्भमा लागू गर्न चाहन्छौं भने, एक एक गरेर थप्न धेरै समय लाग्नेछ। हामी तपाईंलाई यसका लागि VBA कोडको साथ पूर्ण रूपमा धेरै स्तम्भहरू कसरी थप्ने भनेर सिकाउनेछौं।
चरण 1:
- सर्वप्रथम, म्याक्रो खोल्न Alt + F11
- बाट मोड्युल छनौट गर्नुहोस् 1>Insert ट्याब
- त्यसपछि, निम्न VBA
7502
यहाँ,
- साथ टाँस्नुहोस् Worksheets(“Sheet3”) तपाईको हालको कार्यपत्रको नाम हो।
- LastRow = .Cells(.Rows.Count, “B”)।End(xlUp)।Row हो। पहिलो स्तम्भको नाम।
- . दायरा(“E5:E” र LastRow) परिणाम फिर्ता कक्ष दायरा हो।
- ।सूत्र = “= B5&C5" जोडिने सूत्र होदायराको पहिलो कक्ष।
चरण 2:
- त्यसपछि, अन्त्यमा, बचत गर्नुहोस् र <थिच्नुहोस् 1>F5 कार्यक्रम चलाउनको लागि।
परिणामको रूपमा, तपाईंले पूर्ण रूपमा स्तम्भमा परिणामहरू प्राप्त गर्नुहुनेछ।
थप पढ्नुहोस्: एक्सेलमा VBA Rnd कसरी प्रयोग गर्ने (4 विधिहरू)
4. VBA Concatenate प्रयोग गरेर धेरै पङ्क्तिहरूमा सामेल हुनुहोस्
बहु स्तम्भहरू थप्नुका साथै, हामी पनि आवेदन दिन सक्छौं। VBA एउटामा धेरै पङ्क्तिहरू जोड्नको लागि कोड। तलको स्क्रिनसटमा देखाइएको अनुसार, हामी तीन पङ्क्तिहरूलाई एकमा जोड्न चाहन्छौं। पङ्क्तिहरू जोड्न, तलका सरल चरणहरू पालना गर्नुहोस्।
चरण 1:
- एक्सेलमा म्याक्रो सक्रिय गर्नको लागि, Alt + F11 थिच्नुहोस्।
- त्यसपछि, Insert
- बाट Module Concatenate गर्न चयन गर्नुहोस्। पङ्क्तिहरू, टाँस्नुहोस् VBA
8175
यहाँ,
- Set SourceRange = दायरा("B5:D5") स्रोत सेल दायरा हो।
- दायरा(“B8”)।Value = Trim(i) फिर्ता सेल नम्बर हो।
चरण 2:
- अन्तमा, कार्यक्रम बचत गर्नुहोस् र चलाउन F5 थिच्नुहोस्।
यसरी , तीन पङ्क्तिहरू जोड्ने अन्तिम परिणाम सेल B8 मा देखाइनेछ।
थप पढ्नुहोस्: कसरी एक्सेलमा शीर्ष पङ्क्तिहरू लुकाउनुहोस् (७ विधिहरू)
निष्कर्ष
संक्षेपमा, मलाई आशा छ कि यो पोष्टले कसरी प्रयोग गर्ने भन्ने बारे स्पष्ट निर्देशनहरू प्रदान गरेको छ VBA विभिन्न तरिकामा एक्सेल। सबैयी प्रविधिहरू तपाइँको डाटामा सिक्न र प्रयोग गर्नुपर्छ। अभ्यास पुस्तक जाँच गर्नुहोस् र आफ्नो नयाँ ज्ञान प्रयोग गर्न राख्नुहोस्। तपाईंको दयालु सहयोगको कारण, हामी यस प्रकारको कार्यशालाहरू सिर्जना गर्न जारी राख्न उत्प्रेरित छौं।
यदि तपाईंसँग कुनै प्रश्नहरू छन् भने कृपया हामीलाई सम्पर्क गर्न नहिचकिचाउनुहोस्। कृपया तलको टिप्पणी क्षेत्रमा तपाई के सोच्नुहुन्छ हामीलाई थाहा दिनुहोस्।
द Exceldemy टोलीले तपाइँका प्रश्नहरूको निरन्तर जवाफ दिनेछ।