Semasa bekerja dengan VBA dalam Excel, kita selalunya perlu menggabungkan rentetan (s) dan pembolehubah (s) dalam lembaran kerja. Rentetan penggabungan dan pembolehubah digunakan secara meluas dalam hampir semua sektor dalam kerja kami, bermula daripada meringkaskan hasil pelajar kepada menganalisis perniagaan yang kompleks. Dalam artikel ini, saya akan menunjukkan kepada anda cara anda boleh menggabungkan rentetan (s) dan pembolehubah (s) dalam lembaran kerja dengan VBA dalam Excel. Saya akan menerangkan perkara tersebut dengan contoh dan ilustrasi yang betul.

Gabungkan Rentetan (s) dan Pembolehubah (s) dalam Excel VBA (Pandangan Pantas)

Muat Turun Buku Kerja Amalan

Muat turun buku kerja latihan ini untuk bersenam semasa anda membaca artikel ini.

Concatenate String (s) and Variable (s) in Excel VBA (Step by Step Analysis)

Pertama sekali, mari lihat bagaimana kita boleh menggabungkan rentetan (s) dan pembolehubah (s) dalam VBA langkah demi langkah.

⧪ Rentetan Menggabungkan (s):

Untuk menggabungkan dua atau lebih rentetan dalam VBA , anda boleh menggunakan simbol tambahan (+) aritmetik dan simbol ampersand (& ).

Sebagai contoh, untuk menggabungkan rentetan “Jangkaan Hebat” dan “Kisah Dua Bandar” dengan koma , anda boleh menggunakan:

8875

Atau,

1951

Jalankan mana-mana kod di atas. Ia akan memaparkan output yang digabungkan, Jangkaan Hebat,A Tale of Two Cities .

⧪ Concatenating Variable (s)

Jika semua pembolehubah mengandungi nilai rentetan, maka anda boleh menggunakan kedua-dua simbol tambahan (+) aritmetik dan simbol ampersand (&) .

Tetapi jika tidak, maka anda boleh menggunakan hanya simbol ampersand (&) untuk digabungkan.

Sebagai contoh, Mari kita ada dua pembolehubah, A dan B .

A mengandungi rentetan, “A Tale of Two Cities” dan B mengandungi rentetan lain, “The Forty Rules of Love” .

Anda boleh menggunakan kedua-dua simbol tambahan (+) dan simbol ampersand (&) untuk menggabungkannya.

7793

Atau,

9476

Dalam kedua-dua kes, mereka akan mengembalikan rentetan bercantum.

Tetapi jika A ialah rentetan ( “ Kisah Dua Bandar” ) dan B ialah integer ( 27 ), anda mesti menggunakan simbol amp; (&) untuk menggabungkan.

6707

Ia akan mengembalikan output yang digabungkan .

Contoh untuk Concat enate Rentetan dan Pembolehubah dalam Excel VBA (Melibatkan Makro, UDF dan Borang Pengguna)

Kami telah belajar untuk menggabungkan rentetan (s) dan pembolehubah (s) dengan VBA dalam Excel . Kali ini kita akan meneroka beberapa contoh yang melibatkan rentetan penggabungan (s) dan pembolehubah (s) dengan VBA .

Contoh 1: Membangunkan rentetan (s) Makro kepada Menggabungkan dan pembolehubah (s) dalam Excel VBA

Kami telah belajar untukgabungkan rentetan dan pembolehubah dengan VBA . Kali ini kita akan membangunkan Makro untuk menggabungkan rentetan dan pembolehubah berbilang lajur dalam lembaran kerja.

Di sini kami mempunyai set data dengan nama buku , pengarang dan harga beberapa buku kedai buku bernama Martin Bookstore.

Mari kita bangunkan Makro untuk menggabungkan lajur 1, 2, dan 3 set data B4:D14 dalam sel F4 .

Kod VBA ialah:

⧭ Kod VBA:

1385

⧭ Output :

Jalankan kod ini. Anda akan mendapat lajur 3 yang digabungkan dalam julat F4:F14.

Baca Lagi: Makro ke Gabungkan Berbilang Lajur dalam Excel (dengan UDF dan UserForm)

Contoh 2: Mencipta Fungsi Ditentukan Pengguna untuk Menggabungkan rentetan (s) dan pembolehubah (s) dalam Excel VBA

Kami telah belajar untuk membangunkan Makro untuk menggabungkan berbilang lajur set data. Kali ini kita akan mencipta Fungsi Ditakrifkan Pengguna untuk menggabungkan rentetan atau pembolehubah dalam Excel.

Kod VBA yang lengkap ialah:

⧭ Kod VBA:

5004

⧭ Output:

Pilih lajur di mana anda ingin menggabungkan julat dan masukkan formula ini:

Ia akan mengembalikan She, H. Rider Haggard sebagai output.

Sekali lagi, masukkan formula:

[ Formula Tatasusunan . Jadi jangan lupa untuktekan CTRL + SHIFT + ENTER melainkan anda berada di Office 365 .]

Ia akan menggabungkan 30 dengan semua nilai julat B4:B14 .

Akhir sekali, masukkan:

[Sekali lagi Formula Tatasusunan . Jadi jangan lupa tekan CTRL + SHIFT + ENTER melainkan anda berada di Office 365 .]

Ia akan menggabungkan semua nilai julat B4: B14 dengan C4:C14 .

Baca Lagi: Cara Menggabungkan dalam Excel (3 Cara yang Sesuai)

Bacaan Serupa:

• Cara Menggabungkan Teks daripada Dua atau Lebih Sel menjadi Satu Sel dalam Excel (5 Kaedah)
• Gabungkan Baris menjadi Satu Sel dalam Excel
• Sambungkan Nombor dalam Excel (4 Formula Pantas)
• Teks Gabung dalam Excel (8 Cara Yang Sesuai)
• Cara Menggabungkan Apostrof dalam Excel (6 Cara Mudah)

Contoh 3: Membangunkan UserForm untuk Menggabungkan rentetan (s) dan pembolehubah (s) dalam Lembaran Kerja Berbeza dalam Excel VBA

Kami telah belajar untuk membangunkan Makro dan Ditentukan Pengguna fungsi untuk menggabungkan rentetan dan nilai. Akhir sekali, kami akan membangunkan UserForm untuk menggabungkan rentetan dan nilai ke lokasi yang dikehendaki bagi lembaran kerja yang diingini.

⧪ Langkah 1: Memasukkan UserForm

Pergi ke Sisipkan > Pilihan UserForm dalam bar alat VBA untuk memasukkan UserForm baharu.

⧪ Langkah 2: Menyeret Alat untukUserForm

A UserForm dipanggil UserForm1 akan dibuka, bersama dengan Toolbox dipanggil Control .

Alihkan tetikus anda ke atas e Kotak Alat dan seret 2 Kotak Senarai, 5 Kotak Teks, 7 Label dan1 Butang Comman dalam Borang Pengguna .

Tukar paparan Label seperti yang ditunjukkan dalam rajah.

Begitu juga, tukar paparan CommandButton kepada OK .

⧪ Langkah 3: Menulis Kod untuk TextBox1

Klik dua kali pada TextBox1 . Subprosedur Peribadi yang dipanggil TextBox1_Change akan dibuka. Masukkan kod berikut di sana.

1797

⧪ Langkah 4: Menulis Kod untuk TextBox3

Begitu juga, klik dua kali pada TextBox3 . Satu lagi Subprosedur Peribadi dipanggil TextBox3_Change akan dibuka. Masukkan kod berikut di sana.

7598

⧪ Langkah 5: Menulis Kod untuk TextBox4

Selain itu, klik dua kali pada TextBox3 . Satu lagi Subprosedur Peribadi dipanggil TextBox3_Change akan dibuka. Masukkan kod berikut di sana.

4433

⧪ Langkah 6: Menulis Kod untuk ListBox2

Kemudian klik dua kali pada ListBox2 . Apabila Subprosedur Peribadi yang dipanggil ListBox2_Click dibuka, masukkan kod ini di sana.

9736

⧪ Langkah 7: Menulis Kod untuk CommanButton1

Juga, dwiklik pada CommandButton1 . Selepas Subprosedur Peribadi dipanggil But Perintah1_Tukar dibuka, masukkan kod berikut di sana.

3868

⧪ Langkah 7: Menulis Kod untuk Menjalankan Borang Pengguna

Sekarang adalah langkah terakhir. Masukkan Modul baharu daripada bar alat VBA dan masukkan kod berikut.

8533

⧪ Langkah 8: Berjalan Borang Pengguna

Borang Pengguna Anda kini sedia untuk digunakan. Untuk menjalankannya, pilih set data daripada lembaran kerja (Termasuk Pengepala ) dan jalankan Makro yang dipanggil Run_UserForm .

Borang Pengguna akan dimuatkan dengan semua pilihan. Alamat julat yang dipilih akan ditunjukkan pada TextBox1 ( B3:D4 di sini). Jika anda mahu, anda boleh mengubahnya. Julat yang dipilih dalam lembaran kerja akan berubah.

Pilih lajur yang anda ingin gabungkan daripada Lajur kepada Concat ListBox. Di sini saya telah memilih Nama Buku dan Harga .

Masukkan Pemisah . Di sini saya telah memasukkan koma ( , ).

Pilih nama lembaran kerja di mana anda mahu meletakkan julat bercantum daripada Bercantum Dalam kotak senarai. Di sini saya telah memasukkan Helaian3 .

(Apabila anda memilih helaian, ia akan diaktifkan, walaupun ia bukan helaian yang aktif.)

Kemudian masukkan Lokasi Output . Ia adalah rujukan sel bagi sel pertama julat bercantum. Di sini saya telah meletakkan B3 .

(Apabila anda memasuki Lokasi Output , julat output akan dipilih).

Dan akhirnya , masuk kenama Kepala Output (Kepala Julat Output). Di sini saya telah meletakkan Julat Bersambung .

(Apabila anda meletakkan Pengepala Output , pengepala lajur output akan ditetapkan.)

Klik OK . Anda akan mendapat output yang diingini di lokasi yang diingini.

Baca Lagi: Cara Menggabungkan Rentetan dan Integer menggunakan VBA

Kesimpulan

Jadi ini adalah beberapa contoh di mana anda boleh menggunakan Excel VBA untuk menggabungkan rentetan dan pembolehubah. Harap contoh membuat semuanya jelas untuk anda. Adakah anda mempunyai sebarang soalan? Jangan ragu untuk bertanya kepada kami. Dan jangan lupa untuk melawati tapak kami ExcelWIKI untuk lebih banyak siaran dan kemas kini.