Bagaimana untuk Memisahkan Rentetan menjadi Array dalam VBA (3 Cara)

Hugh West

16-10-2023 Makro & Excel VBA
  • Berkongsi Ini
Hugh West

Dalam artikel ini, saya akan menunjukkan kepada anda cara anda boleh memisahkan rentetan kepada tatasusunan dalam VBA . Split ialah salah satu fungsi yang paling penting dan digunakan secara meluas yang kami gunakan dalam VBA . Anda akan belajar untuk memisahkan rentetan dalam VBA dalam semua jenis cara yang mungkin.

Fungsi Pemisahan VBA (Paparan Pantas)

=Split(Expression As String, [Delimiter], [Limit As Long=1], [CompareAsVbCompareMethod=vbBinaryCompare])

Muat Turun Buku Kerja Latihan

Pisah Rentetan kepada Tatasusunan.xlsm

3 Cara Membahagikan Rentetan kepada Array dalam VBA

Mari kita miliki rentetan di tangan kita “Kami memohon visa A.S., Kanada, Australia dan Perancis .” .

Saya akan menunjukkan kepada anda bagaimana anda boleh memisahkan rentetan ini kepada tatasusunan dalam semua jenis cara yang mungkin menggunakan Fungsi Split VBA .

1. Gunakan Sebarang Pembatas untuk Memisahkan Rentetan kepada Tatasusunan dalam VBA

Anda boleh menggunakan sebarang rentetan sebagai pembatas untuk memisahkan rentetan kepada tatasusunan dalam VBA .

Ia boleh menjadi ruang (“ “) , koma (“,”) , titik bertitik (“:”) , aksara tunggal, a rentetan aksara, atau apa-apa sahaja.

⧭ Contoh 1:

Mari kita belah rentetan menggunakan koma sebagai pembatas.

Barisan kod ialah:

Arr = Split(Text, ",")

Kod VBA yang lengkap ialah:

⧭ Kod VBA: 

7571

⧭ Output:

Ia akan membahagikan rentetan kepada tatasusunan yang terdiri daripada {“Kami memohon visa A.S”, “ Kanada”, “ Australia”, “Perancis”}.

⧭ Contoh 2:

Anda juga boleh menggunakan ruang (“ ”) sebagai pembatas.

Barisan kod ialah:

Arr = Split(Text, " ")

Kod VBA yang lengkap ialah:

⧭ Kod VBA: 

4497

⧭ Output:

Ia akan memisahkan rentetan kepada tatasusunan yang terdiri daripada {“We”, “applied”, “for”, “the”, “visa”, “of”, “A.S,”, “Canada,”, “Australia,”, “France,”}.

⧭ Perkara yang Perlu Diingati:

  • Pembatas lalai ialah ruang (“ ”) .
  • Iaitu, jika anda tidak memasukkan sebarang pembatas, ia akan menggunakan ruang sebagai pembatas.

Baca Lagi: Pisah Rentetan mengikut Aksara dalam Excel (6 Cara yang sesuai)

Bacaan Serupa:

  • Pisah teks kepada berbilang sel dalam Excel
  • VBA untuk Mendapatkan Nilai Unik daripada Lajur ke Array dalam Excel (3 Kriteria)
  • Excel VBA: Cara Menapis dengan Berbilang Kriteria dalam Tatasusunan (7 Cara)

2. Pisahkan Rentetan menjadi Tatasusunan dengan Sebarang Bilangan Item

Anda boleh memisahkan rentetan kepada tatasusunan dengan sebarang bilangan item mengikut kehendak anda.

Masukkan bilangan item sebagai hujah 3 bagi fungsi Split .

⧭ Contoh:

Mari kita bahagikan rentetan ke dalam item 3 pertama dengan ruang sebagai pembatas.

Barisan kod akanmenjadi:

Arr = Split(Text, " ", 3)

Dan kod VBA ialah:

⧭ Kod VBA: 

5324

⧭ Output:

Ia akan memisahkan rentetan menjadi tatasusunan yang terdiri daripada item 3 pertama yang dipisahkan oleh pembatas ruang .

⧭ Perkara yang Perlu Diingati:

  • Argumen lalai ialah -1 .
  • Ini bermakna, jika anda tidak memasukkan argumen, ia akan berpecah rentetan ke dalam bilangan maksimum kali yang mungkin.

Baca Lagi: Cara Memisahkan Rentetan mengikut Panjang dalam Excel (8 Cara)

3. Gunakan Kedua-dua Pembatas Sensitif Huruf dan Tidak Sensitif untuk Memisahkan Rentetan Array dalam VBA

Fungsi Split menawarkan anda untuk menggunakan kedua-dua sensitif huruf besar dan kecil dan Pembatas tidak peka huruf besar-kecil .

Untuk pembatas tidak peka huruf besar-kecil , masukkan argumen ke-4 sebagai 1.

Dan untuk pembatas tidak peka huruf besar-kecil , masukkan argumen ke-4 sebagai 0 .

⧭ Contoh 1: Pembatas Tidak Peka Huruf Besar

Dalam rentetan yang diberikan, mari kita pertimbangkan teks “UNTUK” sebagai pembatas dan 2 sebagai jumlah bilangan item tatasusunan.

Kini, untuk kes tidak peka huruf besar/kecil , baris kod ialah:

Arr = Split(Text, "FOR ", 3,1)

Dan Kod VBA yang lengkap ialah:

⧭ Kod VBA: 

7240

⧭ Output:

Memandangkan pembatas adalah tidak peka huruf besar-kecil di sini, “UNTUK ” akan berfungsi sebagai “untuk” dan ia akan memisahkan rentetan kepada tatasusunan dua item.

⧭ Contoh 2: Pembatas Sensitif Huruf

Sekali lagi, untuk kes sensitif huruf besar , baris kod ialah:

Arr = Split(Text, "FOR ", 3,0)

Dan Kod VBA yang lengkap ialah:

⧭ Kod VBA: 

1175

⧭ Output:

Memandangkan pembatas adalah sensitif huruf besar/kecil di sini, “ FOR” tidak akan menjadi “for” dan ia tidak akan memisahkan rentetan kepada tatasusunan dua item.

Baca Lagi: Excel VBA: Alih Keluar Pendua daripada Tatasusunan (2 Contoh)

⧭ Perkara yang Perlu Diingati:

  • Nilai lalai argumen ialah 0 .
  • Iaitu, jika anda tidak meletakkan nilai argumen ke-4 , ia akan berfungsi untuk padanan sensitif huruf besar/kecil .

Kesimpulan

Oleh itu, menggunakan kaedah ini, anda boleh menggunakan Pisah fungsi daripada VBA untuk memisahkan rentetan kepada tatasusunan item. Adakah anda mempunyai sebarang soalan? Jangan ragu untuk bertanya kepada kami.

Catatan sebelum ini Bagaimana untuk mengalih keluar anak tetingkap dalam Excel (4 Kaedah)
Post seterusnya Cara Mengira Umur dalam Excel dalam dd/mm/yyyy (2 Cara Mudah)

Hugh West ialah jurulatih dan penganalisis Excel yang sangat berpengalaman dengan lebih 10 tahun pengalaman dalam industri. Beliau memiliki Ijazah Sarjana Muda Perakaunan dan Kewangan serta Ijazah Sarjana dalam Pentadbiran Perniagaan. Hugh mempunyai minat untuk mengajar dan telah membangunkan pendekatan pengajaran yang unik yang mudah diikuti dan difahami. Pengetahuan pakar Excel beliau telah membantu beribu-ribu pelajar dan profesional di seluruh dunia meningkatkan kemahiran mereka dan cemerlang dalam kerjaya mereka. Melalui blognya, Hugh berkongsi pengetahuannya dengan dunia, menawarkan tutorial Excel percuma dan latihan dalam talian untuk membantu individu dan perniagaan mencapai potensi penuh mereka.