Þegar við vinnum með VBA í Excel verðum við oft að sameina streng(ir) og breytur(ir) í vinnublað. Samtenging strengs (s) og breytu (s) er mikið notaður í næstum öllum geirum í verkum okkar, allt frá því að draga saman niðurstöður nemenda til að greina flókið fyrirtæki. Í þessari grein mun ég sýna þér hvernig þú getur samtengd streng (s) og breytu (s) í vinnublaði með VBA í Excel. Ég mun útskýra hlutina með réttum dæmum og myndskreytingum.

Sameina strengi (s) og breytu (s) í Excel VBA (Quick View)

Sæktu æfingarvinnubók

Sæktu þessa æfingabók til að æfa á meðan þú ert að lesa þessa grein.

Sengja saman streng(ir) og breytu(ir) í Excel VBA (skref fyrir skref greining)

Í fyrsta lagi skulum við sjá hvernig við getum samtengd streng(ir) og breytu(ir) í VBA skref fyrir skref.

⧪ Sameinastrengur(ir):

Til að sameina tvo eða fleiri strengi í VBA , þú getur notað bæði talna samlagningartáknið (+) og ampersand (& ) táknið.

Til dæmis, til að sameina strengina “Great Expectations” og “A Tale of Two Cities” með kommu , þú getur notað:

5401

Eða,

1640

Keyddu einhvern af ofangreindum kóða. Það mun birta samtengda úttakið, Frábærar væntingar,A Tale of Two Cities .

⧪ Sameinaða breytu(r)

Ef allar breyturnar innihalda strengjagildi, þá geturðu notað bæði talna samlagningartáknið (+) og ampersand (&) táknið.

En ef þau gera það ekki, þá geturðu notað aðeins og-táknið (&) til að sameina.

Til dæmis skulum við hafa tvær breytur, A og B .

A inniheldur streng, „A Tale of Two Cities“ og B inniheldur annan streng, „The Forty Rules of Love“ .

Þú getur notað bæði samlagningartáknið (+) og ampersand (&) táknið til að tengja þau saman.

3727

Eða,

8690

Í báðum tilfellum munu þeir skila samtengda strengnum.

En ef A er strengur ( “ Saga um tvær borgir” ) og B er heiltala ( 27 ), verður þú að nota ampersand (&) táknið til að sameina.

3355

Það mun skila samruna úttakinu .

Dæmi til samþ enate strengi og breytur í Excel VBA (sem felur í sér Macro, UDF og UserForm)

Við höfum lært að sameina streng(ir) og breytu(ir) við VBA í Excel . Að þessu sinni skoðum við nokkur dæmi sem fela í sér að tengja saman streng(ir) og breytu(ir) með VBA .

Dæmi 1: Að þróa fjölva til að sameina streng(ir) og breytu(r) í Excel VBA

Við höfum lært aðtengja saman strengi og breytur með VBA . Að þessu sinni munum við þróa Macro til að sameina strengi og breytur margra dálka í vinnublaði.

Hér höfum við gagnasett með bókanöfnum , höfundar og verð sumra bóka bókabúðar sem heitir Martin Bookstore.

Við skulum þróa Macro til að sameina dálka 1, 2, og 3 gagnasettsins B4:D14 í reit F4 .

Kóðinn VBA verður:

⧭ VBA kóði:

5152

⧭ Output :

Keyra þennan kóða. Þú færð 3 dálkana samkeyrða á bilinu F4:F14.

Lesa meira: Macro to Sameina marga dálka í Excel (með UDF og UserForm)

Dæmi 2: Að búa til notendaskilgreinda aðgerð til að sameina streng(ir) og breytu(ir) í Excel VBA

Við höfum lært að þróa Macro til að sameina marga dálka í gagnasafni. Að þessu sinni munum við búa til notendaskilgreint fall til að sameina strengi eða breytur í Excel.

Heill VBA kóðinn verður:

⧭ VBA kóði:

4742

⧭ Úttak:

Veldu dálkinn þar sem þú vilt sameina svið og sláðu inn þessa formúlu:

Það mun skila She, H. Rider Haggard sem úttakið.

Sláðu aftur inn formúluna:

[ Array Formula . Svo ekki gleyma þvíýttu á CTRL + SHIFT + ENTER nema þú sért í Office 365 .]

Það mun sameina 30 við öll gildi bilsins B4:B14 .

Sláðu loksins inn:

[Aftur Array Formula . Svo ekki gleyma að ýta á CTRL + SHIFT + ENTER nema þú sért í Office 365 .]

Það mun sameina öll gildi bilsins B4: B14 með C4:C14 .

Lesa meira: Hvernig á að sameina í Excel (3 hentugar leiðir)

Svipuð lesning:

• Hvernig á að sameina texta úr tveimur eða fleiri frumum í eina reit í Excel (5 aðferðir)
• Samaneinaðu línur í eina reit í Excel
• Tengdu tölur saman í Excel (4 fljótlegar formúlur)
• Samana texta í Excel (8 hentugar leiðir)
• Hvernig á að sameina frávik í Excel (6 auðveldar leiðir)

Dæmi 3: Þróun a UserForm til að sameina streng(ir) og breytu(ir) í mismunandi vinnublaði í Excel VBA

Við höfum lært að þróa Macro og User-Defined fall til að sameina strengi og gildi. Að lokum munum við þróa UserForm til að sameina strengi og gildi á viðkomandi stað á viðkomandi vinnublaði.

⧪ Skref 1: Setja inn UserForm

Farðu í Insert > UserForm valmöguleikann á VBA tækjastikunni til að setja inn nýtt UserForm .

⧪ Skref 2: Draga Verkfæri tilUserForm

A UserForm sem heitir UserForm1 verður opnað ásamt Toolbox sem heitir Control .

Færðu músina yfir eða verkfærakistuna og dragðu 2 listakassa, 5 textakassa, 7 merki og 1 skipunarhnappa í notandaformi .

Breyttu skjánum á merkjunum eins og sýnt er á myndinni.

Á sama hátt skaltu breyta skjánum á Command Button í OK .

⧪ Skref 3: Að skrifa kóða fyrir TextBox1

Tvísmelltu á TextBox1 . Privat undirferli sem kallast TextBox1_Change mun opnast. Sláðu inn eftirfarandi kóða þar.

3892

⧪ Skref 4: Að skrifa kóða fyrir TextBox3

Á sama hátt, tvísmelltu á Textabox3 . Önnur einkaundiraðferð sem kallast TextBox3_Change mun opnast. Sláðu inn eftirfarandi kóða þar.

8752

⧪ Skref 5: Að skrifa kóða fyrir TextBox4

Tvísmelltu líka á Textabox3 . Önnur einkaundiraðferð sem kallast TextBox3_Change mun opnast. Sláðu inn eftirfarandi kóða þar.

5135

⧪ Skref 6: Að skrifa kóða fyrir ListBox2

Smelltu síðan á ListBox2 . Þegar Private Subprocedure sem heitir ListBox2_Click opnast skaltu slá inn þennan kóða þar.

9175

⧪ Skref 7: Að skrifa kóða fyrir CommanButton1

Einnig, tvísmelltu á CommandButton1 . Eftir Private Subprocedure sem heitir CommandButton1_Change opnast, settu inn eftirfarandi kóða þar.

5909

⧪ Skref 7: Að skrifa kóða til að keyra notandaformið

Nú er lokaskrefið. Settu inn nýja einingu af VBA tækjastikunni og settu inn eftirfarandi kóða.

4631

⧪ Skref 8: Í gangi UserForm

Þitt UserForm er nú tilbúið til notkunar. Til að keyra það skaltu velja gagnasettið úr vinnublaðinu (þar á meðal hausarnir ) og keyra Macro sem heitir Run_UserForm .

UserForm mun hlaðast með öllum valkostum. Valið sviðsfang verður sýnt á TextBox1 ( B3:D4 hér). Ef þú vilt geturðu breytt því. Valið svið í vinnublaðinu mun breytast.

Veldu dálkana sem þú vilt sameina úr dálkum í Concat ListBox. Hér hef ég valið Bókarheiti og Verð .

Sláðu inn Skiljuna . Hér hef ég slegið inn kommu ( , ).

Veldu heiti vinnublaðsins þar sem þú vilt setja samtengingasviðið úr Concatenated In listakassi. Hér hef ég slegið inn Sheet3 .

(Þegar þú velur blaðið verður það virkt, jafnvel þótt það sé ekki það virka.)

Setjið síðan inn úttaksstaðsetningin . Það er frumutilvísun fyrsta reitsins á samstæðu sviðinu. Hér hef ég sett B3 .

(Þegar þú slærð inn úttaksstaðsetningu verður úttakssviðið valið).

Og að lokum , sláðu innheiti Output Header (Header Output Range). Hér hef ég sett Concatenated Range .

(Þegar þú setur Output Header , verður hausinn á úttaksdálknum stilltur.)

Smelltu á Í lagi . Þú færð æskilega úttak á þeim stað sem þú vilt.

Lesa meira: Hvernig á að sameina streng og heiltölu með VBA

Niðurstaða

Svo eru þetta nokkur dæmi þar sem þú getur notað Excel VBA til að sameina strengi og breytur. Vona að dæmin hafi gert allt nokkuð ljóst fyrir þig. Hefur þú einhverjar spurningar? Ekki hika við að spyrja okkur. Og ekki gleyma að heimsækja síðuna okkar ExcelWIKI fyrir fleiri færslur og uppfærslur.