Ynhâldsopjefte
Yn Excel is gearhing it proses fan it ferbinen fan twa snaren om ien tekenrige te foarmjen. Gewoan sein, as wy in tabel hawwe mei foarnammen yn ien kolom en efternammen yn in oare, kinne wy de gearhingproseduere brûke om se yn ien sel te kombinearjen yn in split sekonde. Yn Excel hawwe wy in funksje mei de namme CONCATENATE () wêrtroch wy dizze gearhing kinne dwaan. Yn VBA is dit type funksje lykwols net tastien. Wy kinne CONCATENATE () net brûke yn 'e VBA-koade, om't it net wurket. Om't VBA ynboude funksjes mist en wy kinne gjin spreadsheetfunksjes brûke. Dat, dizze les sil jo demonstrearje hoe't jo VBA konkatenearje brûke om meardere sellen, kolommen en rigen yn Excel te kombinearjen.
Oefenwurkboek downloade
Download dit praktykwurkboek om te oefenjen wylst jo dit artikel lêze.
VBA Concatenate Function.xlsm
Ynlieding ta de VBA Concatenate Function
As wy hawwe neamd dat Excel hat gjin ynboude funksje foar de VBA Concatenate, mar wy kinne meitsje it wurket as in funksje troch kombinearjen ferskillende stringen mei operators. Hjir brûke wy it ampersand (&) as ús operator.
⟴ Syntaksis
String1 = " Earste tekst"
String2 = " Twadde tekst"
⟴ Return Value
Return_value = String1 & String2
4 Ferskillende gebrûk fan VBA ConcatenateFunksje yn Excel
Hjir sille wy 4 ferskillende oanpak brûke om it gearhingjende proses út te fieren. Wy sille ferskate operators tapasse yn kombinaasje mei VBA koade om dit te berikken.
1. Brûk Ampersand (&) Operator om sellen te ferbinen yn VBA Concatenate
As werjûn yn de ûndersteande skermprint, wy hawwe in twa-kolom gegevens kolleksje mei foarnammen yn ien kolom en lêste nammen yn de oare. Troch de twa kolommen gear te foegjen kinne wy no de hiele nammen krije. Om't VBA gjin ynboude metoaden hat foar gearfoeging, brûke wy de ampersand (&) operator lykas detaillearre yn de ynstruksjes hjirûnder.
Stap 1:
- Druk earst op Alt + F11 om de Makro-ynskeakele wurkblêd.
- Dan klikke op
- Selektearje Module .
Stap 2:
- Om twa sellen yn ien te kombinearjen, kopiearje en plakke de folgjende VBA
5544
Hjir,
- String1 = Cells(5, 2).Wearde is de earste sellokaasje B5 , rige 5, en kolom 2 .
- String2 = Cells(5, 3).Wearde is de twadde sel lokaasje C5 , rige 5, en kolom 3 .
- Sellen(5, 5).Wearde = String1 & String2 is de resultaatsellokaasje E5 , rige 5 en kolom 5 .
- String1 & String2 binne de twa snaren ferbûn troch it ampersand (&)
Stap3:
- Bewarje en druk op F5 om it programma út te fieren.
Dêrom krije jo it resultaat yn de E5 sel fan jo hjoeddeistige wurkblêd.
Stap 4:
- Folgje en werhelje de stappen foar de rest sellen en krije de resultaten lykas werjûn yn de ûnderste ôfbylding.
Opmerking. Om VBA<2 út te fieren> koade, elke kear soargje derfoar dat jo Excel-bestân bewarre is yn Excel Macro-ynskeakele wurkblêd (xlsm.) -formaat.
Lês mear: Hoe kinne jo VBA StrComp yn Excel brûke ( 5 Algemiene foarbylden)
2. Brûk Plus (+) Operator om mei te dwaan oan sellen yn VBA Concatenate
Lykas beskreaun yn 'e foarige paragraaf, hawwe wy it ampersand (&) brûkt ;) operator om sellenstrings te ferbinen. Jo kinne itselde resultaat krije troch it plus (+) teken te brûken yn plak fan it ampersand (&) operator. Om it te dwaan folgje dizze stappen.
Stap 1:
- Om Makro te iepenjen yn Excel, druk op Alt + F11 .
- Klik op Ynfoegje en selektearje
- Nei it iepenjen fan de programmaside, plak de folgjende VBA
4197
Hjir,
- Sellen(5, 5).Wearde = String1 + String2 is dizze rigel wy brûke plus (+) teken ynstee fan it ampersand (&)
Stap 2 :
- Nei it plakke, bewarje en druk op F5 om it programma út te fieren. Dêrtroch sille jo de feroaring yn sel sjen E5 .
- Om de definitive resultaten te krijen, folje de fereaske sellen yn troch de foarige stappen nochris út te fieren.
Lês mear: Hoe kinne jo de VBA StrConv-funksje brûke (5 foarbylden)
Silkens Lêzingen:
- Hoe kinne jo in sub oproppe yn VBA yn Excel (4 foarbylden)
- In wearde weromjaan yn VBA-funksje (beide Array- en non-array-wearden)
- Hoe kinne jo de VBA DIR-funksje brûke yn Excel (7 foarbylden)
- Brûk de VBA UCASE-funksje yn Excel ( 4 Foarbylden)
- Hoe kinne jo InStr-funksje brûke yn VBA (3 foarbylden)
3. Meardere kolommen tafoegje mei VBA-konkatenate
Yn 'e foargeande twa oanpakken hawwe wy besprutsen hoe't jo twa sellen kombinearje kinne. As wy it lykwols tapasse wolle op de hiele kolom, sil it tafoegjen fan ien foar ien lang duorje. Wy sille jo leare hoe't jo meardere kolommen folslein tafoegje kinne mei VBA koade hjirfoar.
Stap 1:
- Earst, om Makro te iepenjen, druk op Alt + F11
- Kies Module út de Foegje tab
- Dan plakke de folgjende VBA
7578
Hjir,
- Mei Wurkblêden(“Sheet3”) is jo hjoeddeiske wurkblêdnamme.
- LastRow = .Cells(.Rows.Count, "B").End(xlUp).Row is de earste kolom namme.
- Mei .Range(“E5:E” & LastRow) is it resultaat werom sel berik.
- .Formula = "= B5&C5” is de formule om mei te dwaan oan deearste sel fan it berik.
Stap 2:
- Dan, as lêste, bewarje en druk op F5 om it programma út te fieren.
Dêrtroch krije jo de resultaten folslein yn in kolom.
Lês mear: Hoe kinne jo VBA Rnd brûke yn Excel (4 metoaden)
4. Join meardere rigen mei help fan VBA Concatenate
Njonken it tafoegjen fan meardere kolommen, kinne wy ek tapasse VBA koade om meardere rigen yn ien te ferbinen. Lykas werjûn yn 'e ûnderste skermôfbylding, wolle wy de trije rigen yn ien gearfoegje. Om de rigen te ferbinen, folgje de ienfâldige stappen hjirûnder.
Stap 1:
- Foar it aktivearjen fan Makro yn Excel, druk op Alt + F11 .
- Selektearje dan Module út de Ynfoegje
- Om gearfoegje de rigen, plak de VBA
8464
Hjir,
- Set SourceRange = Range(“B5:D5”) is it boarneselberik.
- Range(“B8”).Wearde = Trim(i) is it weromkommende selnûmer.
Stap 2:
- Bewarje as lêste it programma en druk op F5 om út te fieren.
Sawol , sil it einresultaat dat de trije rigen gearfoege wurdt werjûn yn sel B8 .
Lês Mear: Hoe kinst Ferbergje boppeste rigen yn Excel (7 metoaden)
Konklúzje
Om gearfetsje, hoopje ik dat dizze post dúdlike ynstruksjes hat levere oer hoe't jo VBA konkatenearje yn brûke Excel op ferskate manieren. Allesdizze techniken moatte wurde leard en brûkt op jo gegevens. Undersykje it praktykboek en brûk jo nijfûne kennis. Fanwegen jo freonlike stipe binne wy motivearre om troch te gean mei it meitsjen fan workshops lykas dizze.
Neem as jo fragen hawwe, nim dan gerêst kontakt mei ús op. Lit ús asjebleaft witte wat jo tinke yn it kommentaargebiet hjirûnder.
It Exceldemy Team sil konstant reagearje op jo fragen.