Tabela e përmbajtjes
Në Excel, bashkimi është procesi i bashkimit të dy vargjeve së bashku për të formuar një varg të vetëm. E thënë thjesht, nëse kemi një tabelë me emrat e parë në një kolonë dhe mbiemrat në një tjetër, ne mund të përdorim procedurën e lidhjes për t'i bashkuar dhe kombinuar ato në një qelizë të vetme në një pjesë të sekondës. Në Excel, ne kemi një funksion të quajtur CONCATENATE () që na lejon të bëjmë këtë lidhje. Megjithatë, në VBA , ky lloj funksioni nuk lejohet. Nuk mund të përdorim CONCATENATE () në kodin VBA pasi nuk do të funksionojë. Sepse VBA i mungojnë funksionet e integruara dhe ne nuk mund të përdorim funksionet e fletëllogaritjes. Pra, ky mësim do t'ju tregojë se si të përdorni VBA lidhni për të kombinuar shumë qeliza, kolona dhe rreshta në Excel.
Shkarkoni Librin e Punës Praktike
Shkarko këtë libër pune praktike për të ushtruar ndërkohë që jeni duke lexuar këtë artikull.
VBA Concatenate Function.xlsm
Hyrje në funksionin VBA Concatenate
Siç kemi përmendi se Excel nuk ka ndonjë funksion të integruar për VBA Concatenate, por ne mund ta bëjmë atë të funksionojë si funksion duke kombinuar vargje të ndryshme me operatorë. Këtu përdorim ampersand (&) si operatorin tonë.
⟴ Sintaksa
String1 = " Teksti i parë"
String2 = " Teksti i dytë"
⟴ Vlera e kthimit
Vlera e_kthimit = String1 & String2
4 Përdorime të ndryshme të VBA ConcatenateFunksioni në Excel
Këtu, ne do të përdorim 4 qasje të ndryshme për të kryer procesin e bashkimit. Ne do të aplikojmë operatorë të ndryshëm në kombinim me kodin VBA për ta arritur këtë.
1. Përdorni Operatorin Ampersand (&) për të bashkuar qelizat në VBA Concatenate
Siç tregohet në pamjen e mëposhtme të ekranit, ne kemi një koleksion të dhënash me dy kolona me emrat në njërën kolonë dhe mbiemrat në tjetrën. Duke bashkuar dy kolonat, tani mund të marrim emrat e plotë. Për shkak se VBA nuk ka ndonjë metodë të integruar për lidhjen, ne do të përdorim ampersand-in (&) siç detajohet në udhëzimet më poshtë.
Hapi 1:
- Së pari, shtypni Alt + F11 për të hapur Fletë pune e aktivizuar me makro.
- Më pas, kliko
- Zgjidh Modulin .
Hapi 2:
- Për të kombinuar dy qeliza në një, kopjoni dhe ngjisni VBA
3667
Këtu,
- String1 = Cells(5, 2). Vlera është vendndodhja e parë e qelizës B5 , rreshti 5, dhe kolona 2 .
- String2 = Cells(5, 3). Vlera është vendndodhja e dytë e qelizës C5 , rreshti 5, dhe kolona 3 .
- Qelizat(5, 5).Vlera = String1 & String2 është vendndodhja e qelizës së rezultatit E5 , rreshti 5 dhe kolona 5 .
- String1 & String2 janë dy vargjet e bashkuara me ampersand (&)
Hapi3:
- Ruaj dhe shtypni F5 për të ekzekutuar programin.
Prandaj, do të merrni rezultatin në E5 qeliza e fletës tuaj aktuale të punës.
Hapi 4:
- Ndiq dhe përsërit hapat për pushoni qelizat dhe merrni rezultatet siç tregohet në imazhin e mëposhtëm.
Shënim. Për të ekzekutuar VBA kodi, çdo herë sigurohuni që skedari juaj Excel të ruhet në formatin Excel Makro-Enabled Worksheet (xlsm.) .
Lexo më shumë: Si të përdorni VBA StrComp në Excel ( 5 shembuj të zakonshëm)
2. Përdorni Operatorin Plus (+) për të bashkuar qelizat në VBA Concatenate
Siç përshkruhet në seksionin e mëparshëm, ne kemi përdorur ampersand (& ;) operator për të bashkuar vargjet e qelizave. Mund të merrni të njëjtin rezultat duke aplikuar plusin (+) në vend të ampersand-it (&) . Për ta bërë atë, ndiqni këto hapa.
Hapi 1:
- Për të hapur Makro në Excel, shtypni Alt + F11 .
- Klikoni Insert dhe zgjidhni
- Pasi hapni faqen e programit, ngjitni duke ndjekur VBA
9351
Këtu,
- Qelizat(5, 5). Vlera = String1 + String2 është kjo linjë ne përdorim plus (+) shenjën në vend të ampersand (&)
Hapi 2 :
- Pas ngjitjes, ruajeni dhe shtypni F5 për të ekzekutuar programin. Rrjedhimisht, do të shihni ndryshimin në qelizë E5 .
- Për të marrë rezultatet përfundimtare, plotësoni qelizat e kërkuara duke kryer përsëri hapat e mëparshëm.
Lexo më shumë: Si të përdoret funksioni VBA StrConv (5 shembuj)
I ngjashëm Leximet:
- Si të telefononi një nën në VBA në Excel (4 shembuj)
- Kthejeni një vlerë në funksionin VBA (të dyja Vlerat e grupit dhe jo-array)
- Si të përdorni funksionin VBA DIR në Excel (7 shembuj)
- Përdorni funksionin VBA UCASE në Excel ( 4 shembuj)
- Si të përdoret funksioni InStr në VBA (3 shembuj)
3. Shto kolona të shumta duke përdorur VBA Concatenate
Në dy qasjet e mëparshme, ne diskutuam se si të kombinojmë dy qeliza. Megjithatë, nëse duam ta aplikojmë në të gjithë kolonën, shtimi një nga një do të marrë shumë kohë. Ne do t'ju mësojmë se si të shtoni shumë kolona plotësisht me kodin VBA për këtë.
Hapi 1:
- Së pari, për të hapur Macro shtypni Alt + F11
- Zgjidhni Modulin nga Fut skedën
- Më pas, ngjit VBA
2847
Këtu,
- Me Fletët e punës ("Fleta 3") është emri juaj aktual i fletës së punës.
- Rreshti i fundit = .Cells(.Rreshtat.Count, "B"). Fund(xlUp).Rreshti është emri i kolonës së parë.
- Me .Range("E5:E" & LastRow) është diapazoni i qelizave të kthimit të rezultatit.
- .Formula = "= B5&C5" është formula për t'u bashkuarqeliza e parë e diapazonit.
Hapi 2:
- Më në fund, ruani dhe shtypni F5 për të ekzekutuar programin.
Si rezultat, ju do t'i merrni rezultatet tërësisht në një kolonë.
Lexo më shumë: Si të përdorni VBA Rnd në Excel (4 Metoda)
4. Bashkoni rreshtat e shumëfishtë duke përdorur VBA Concatenate
Përveç shtimit të kolonave të shumta, ne gjithashtu mund të aplikojmë Kodi VBA për të bashkuar shumë rreshta në një. Siç tregohet në pamjen e mëposhtme të ekranit, ne duam t'i bashkojmë tre rreshtat në një. Për të lidhur rreshtat, ndiqni hapat e thjeshtë më poshtë.
Hapi 1:
- Për aktivizimin e Macro në Excel, shtyp Alt + F11 .
- Më pas, zgjidhni Modulin nga Fut
- Për t'u bashkuar rreshtat, ngjitni VBA
8583
Këtu,
- Cakto SourceRange = Range(“B5:D5”) është diapazoni i qelizës burimore.
- Range(“B8”).Vlera = Trim(i) është numri i qelizës së kthimit.
Hapi 2:
- Më në fund, ruani programin dhe shtypni F5 për të ekzekutuar.
Kështu , rezultati përfundimtar që lidh tre rreshtat do të shfaqet në qelizën B8 .
Lexo më shumë: Si të Shfaq rreshtat e lartë në Excel (7 Metoda)
Përfundim
Për ta përmbledhur, shpresoj se ky postim ka dhënë udhëzime të qarta se si të përdoret VBA lidhja në Excel në mënyra të ndryshme. Të gjitha tëkëto teknika duhet të mësohen dhe të përdoren në të dhënat tuaja. Shqyrtoni librin e praktikës dhe vini në përdorim njohuritë tuaja të reja. Për shkak të mbështetjes suaj, ne jemi të motivuar të vazhdojmë të krijojmë seminare të tilla.
Ju lutemi mos hezitoni të na kontaktoni nëse keni ndonjë pyetje. Ju lutemi, na tregoni se çfarë mendoni në zonën e komenteve më poshtë.
Ekipi Exceldemy do t'u përgjigjet vazhdimisht pyetjeve tuaja.