Tabela e përmbajtjes
Ndërsa punojmë me VBA në Excel, shpesh na duhet të lidhim vargun (et) dhe variablat (të) në një fletë pune. Lidhja e vargut (s) dhe variablave (s) përdoret gjerësisht në pothuajse të gjithë sektorët e punimeve tona, duke filluar nga përmbledhja e rezultateve të studentëve deri te analizimi i një biznesi kompleks. Në këtë artikull, unë do t'ju tregoj se si mund të lidhni vargun (t) dhe variablat (s) në një fletë pune me VBA në Excel. Unë do t'i shpjegoj gjërat me shembuj dhe ilustrime të duhura.
Lidh vargun (t) dhe variablat (t) në Excel VBA (Shikimi i shpejtë)
Shkarko librin e punës praktike
Shkarko këtë libër pune praktike për ta ushtruar ndërkohë që je duke lexuar këtë artikull.
Lidh vargun dhe variablin.xlsm
Lidh vargun (t) dhe variablat (t) në Excel VBA (Analiza hap pas hapi)
Së pari, le të shohim se si mund të lidhim vargun (t) dhe variabla (s) në VBA hap pas hapi.
⧪ Lidhja e vargut (s):
Për të bashkuar dy ose më shumë vargje në VBA , mund të përdorni si simbolin aritmetik shtesë (+) dhe simbolin ampersand (& ).
Për shembull, për të bashkuar vargjet "Pritjet e mëdha" dhe "Përralla e dy qyteteve" me një presje , mund të përdorni:
2570
Ose,
7514
ekzekutoni cilindo nga kodet e mësipërme. Do të shfaqë daljen e bashkuar, Pritjet e mëdha,Një përrallë e dy qyteteve .
⧪ Variabla (t) bashkuese
Nëse të gjitha variablat përmbajnë vlera vargu, atëherë mund të përdorni si simbolin aritmetik shtesë (+) dhe simbolin ampersand (&) .
Por nëse nuk e bëjnë, atëherë mund të përdorni vetëm simboli ampersand (&) për t'u bashkuar.
Për shembull, le të kemi dy ndryshore, A dhe B .
A përmban një varg, "Një përrallë e dy qyteteve" dhe B përmban një varg tjetër, "Dyzet rregullat e dashurisë" .
Mund të përdorni simbolin shtesë (+) dhe simbolin ampersand (&) për t'i bashkuar ato.
5001
Ose,
9671
Në të dyja rastet, ata do të kthejnë vargun e bashkuar.
Por nëse A është një varg ( " Një përrallë e dy qyteteve" ) dhe B është një numër i plotë ( 27 ), duhet të përdorni simbolin ampersand (&) për t'u bashkuar.
8574
Do të kthejë daljen e bashkuar .
Shembuj për Concat ndërthurni vargjet dhe variablat në Excel VBA (përfshin makro, UDF dhe UserForm)
Ne kemi mësuar të lidhim vargun (et) dhe variablat (të) me VBA në Excel . Këtë herë ne do të shqyrtojmë disa shembuj që përfshijnë lidhjen e vargut (s) dhe variablit (s) me VBA .
Shembulli 1: Zhvillimi i një makro për të lidhur vargun (t) dhe variabla (t) në Excel VBA
Ne kemi mësuar të bëjmëbashkoni vargjet dhe variablat me VBA . Këtë herë ne do të zhvillojmë një Makro për të bashkuar vargjet dhe variablat e kolonave të shumta në një fletë pune.
Këtu kemi një grup të dhënash me emrat e librave , autorët dhe çmimet të disa librave të një librari të quajtur Martin Bookstore.
Le të zhvillojmë një Makro për të lidhur kolonat 1, 2, dhe 3 të grupit të të dhënave B4:D14 në qelizën F4 .
Kodi VBA do të jetë:
⧭ Kodi VBA:
3488
⧭ Dalja :
Ekzekutoni këtë kod. Ju do të merrni kolonat 3 të bashkuara në rangun F4:F14.
Lexo më shumë: Makro në Lidhni disa kolona në Excel (me UDF dhe UserForm)
Shembulli 2: Krijimi i një funksioni të përcaktuar nga përdoruesi për të bashkuar vargun (t) dhe variablat (t) në Excel VBA
Ne kemi mësuar të zhvillojmë një Makro për të lidhur kolona të shumta të një grupi të dhënash. Këtë herë ne do të krijojmë një funksion të përcaktuar nga përdoruesi për të bashkuar vargjet ose variablat në Excel.
Kodi i plotë VBA do të jetë:
⧭ Kodi VBA:
9954
⧭ Prodhimi:
Zgjidhni kolonën ku dëshironi të lidhni varg dhe fut këtë formulë:
=ConcatenateValues("She","H. Rider Haggard",", ")
Do të kthehet She, H. Rider Haggard si rezultat.
Përsëri, futni formulën:
=ConcatenateValues(B4:B14,30,", ")
<[ Formula e grupit . Pra, mos harroni tështyp CTRL + SHIFT + ENTER nëse nuk jeni në Office 365 .]
Do të bashkojë 30 me të gjitha vlerat e diapazonit B4:B14 .
Më në fund, shkruani:
=ConcatenateValues(B4:B14,C4:C14,", ")
[Përsëri Formula e grupit . Pra, mos harroni të shtypni CTRL + SHIFT + ENTER nëse nuk jeni në Office 365 .]
Do të bashkojë të gjitha vlerat e gamës B4: B14 me ato të C4:C14 .
Lexo më shumë: Si të bashkohemi në Excel (3 mënyra të përshtatshme)
Lexime të ngjashme:
- Si të kombinoni tekst nga dy ose më shumë qeliza në një qelizë në Excel (5 metoda)
- Kombinoni rreshtat në një qelizë në Excel
- Lidhni numrat në Excel (4 formula të shpejta)
- Kombinoni tekstin në Excel (8 mënyra të përshtatshme)
- Si të lidhni apostrofën në Excel (6 mënyra të thjeshta)
Shembulli 3: Zhvillimi i një UserForm për të bashkuar vargun (t) dhe variablat (s) në një fletë pune të ndryshme në Excel VBA
Ne kemi mësuar të zhvillojmë një Makro dhe një Përcaktuar nga Përdoruesi funksioni për të bashkuar vargjet dhe vlerat. Së fundi, ne do të zhvillojmë një UserForm për të lidhur vargjet dhe vlerat në vendndodhjen e dëshiruar të fletës së dëshiruar të punës.
⧪ Hapi 1: Futja e Formës së Përdoruesit
Shko te Fut > Opsioni UserForm në shiritin e veglave VBA për të futur një UserForm të ri.
⧪ Hapi 2: Zvarritja Mjetet për tëUserForm
A UserForm i quajtur UserForm1 do të hapet, së bashku me një Toolbox të quajtur Control .
Lëvizni miun mbi Toolbox dhe tërhiqni 2 List Boxes, 5 Text Boxes, 7 Etiketa dhe 1 CommanButtons në UserForm .
Ndrysho pamjet e Etiketave siç tregohet në figurë.
Në mënyrë të ngjashme, ndryshoni ekranin e CommandButton në OK .
⧪ Hapi 3: Shkrimi i kodit për TextBox1
Klikoni dy herë në TextBox1 . Do të hapet një Nënprocedurë private e quajtur TextBox1_Change . Futni kodin e mëposhtëm atje.
9695
⧪ Hapi 4: Shkrimi i kodit për TextBox3
Në mënyrë të ngjashme, klikoni dy herë në TextBox3 . Do të hapet një nënprocedurë tjetër private e quajtur TextBox3_Change . Futni kodin e mëposhtëm atje.
1345
⧪ Hapi 5: Shkrimi i kodit për TextBox4
Gjithashtu, klikoni dy herë në TextBox3 . Do të hapet një nënprocedurë tjetër private e quajtur TextBox3_Change . Futni kodin e mëposhtëm atje.
7516
⧪ Hapi 6: Shkrimi i kodit për ListBox2
Më pas klikoni dy herë në ListBox2 . Kur të hapet Nënprocedura private e quajtur ListBox2_Click , futeni këtë kod atje.
8539
⧪ Hapi 7: Shkrimi i kodit për CommanButton1
Gjithashtu, klikoni dy herë në CommandButton1 . Pas Nënprocedurës private të quajtur CommandButton1_Change hapet, fut kodin e mëposhtëm atje.
8158
⧪ Hapi 7: Shkrimi i kodit për ekzekutimin e UserForm
Tani është hapi i fundit. Fut një Modul të ri nga shiriti i veglave VBA dhe fut kodin e mëposhtëm.
9075
⧪ Hapi 8: Po ekzekutohet UserForm
Your UserForm tani është gati për t'u përdorur. Për ta ekzekutuar, zgjidhni grupin e të dhënave nga fleta e punës (përfshirë Titujt ) dhe ekzekutoni Makro të quajtur Run_UserForm .
UserForm do të ngarkohet me të gjitha opsionet. Adresa e përzgjedhur e intervalit do të shfaqet në TextBox1 ( B3:D4 këtu). Nëse dëshironi, mund ta ndryshoni. Gama e zgjedhur në fletën e punës do të ndryshojë.
Zgjidhni kolonat që dëshironi të bashkoni nga Kollonat në Concat ListBox. Këtu kam zgjedhur Emri i librit dhe Çmimi .
Fut Ndarës . Këtu kam futur një presje ( , ).
Zgjidhni emrin e fletës së punës ku dëshironi të vendosni gamën e bashkuar nga Concatenated In kutia e listave. Këtu kam futur Fleta3 .
(Në momentin që zgjidhni fletën, ajo do të aktivizohet, edhe nëse nuk është ajo aktive.)
Më pas futeni Vendndodhja e daljes . Është referenca e qelizës së qelizës së parë të diapazonit të bashkuar. Këtu kam vendosur B3 .
(Në momentin që futni Vendndodhja e daljes , do të zgjidhet diapazoni i daljes).
Dhe në fund , futni nëemri i Titulli i daljes (Header of Output Range). Këtu kam vendosur Rapja e bashkuar .
(Në momentin që vendosni Titullën e daljes , titulli i kolonës së daljes do të vendoset.)
Klikoni OK . Ju do të merrni daljen e dëshiruar në vendndodhjen e dëshiruar.
Lexo më shumë: Si të lidhni vargun dhe numrin e plotë duke përdorur VBA
Përfundim
Këta janë disa shembuj në të cilët mund të përdorni Excel VBA për të bashkuar vargjet dhe variablat. Shpresojmë që shembujt të bëjnë gjithçka mjaft të qartë për ju. A keni ndonjë pyetje? Mos ngurroni të na pyesni. Dhe mos harroni të vizitoni faqen tonë ExcelWIKI për më shumë postime dhe përditësime.