Daptar eusi
Dina tulisan ieu, kuring bakal nunjukkeun anjeun kumaha anjeun tiasa ngabagi senar kana array dina VBA . Split mangrupikeun salah sahiji fungsi anu paling penting sareng seueur dianggo anu kami anggo dina VBA . Anjeun bakal diajar ngabagi string dina VBA dina sagala rupa cara anu mungkin.
Fungsi Pamisah VBA (Témbongkeun Gancang)
=Split(Expression As String, [Delimiter], [Limit As Long=1], [CompareAsVbCompareMethod=vbBinaryCompare])
Unduh Buku Latihan Praktek
Pisahkeun String kana Array.xlsm
3 Cara Ngabagi String kana Array dina VBA
Hayu urang gaduh string dina leungeun kami “Kami ngalamar visa AS, Kanada, Australia, sareng Perancis. .” .
Kuring bakal nunjukkeun anjeun kumaha anjeun tiasa ngabagi string ieu kana array dina sagala jinis cara anu mungkin nganggo fungsi Split tina VBA .
1. Anggo Wates Sakur Pikeun Ngabagi String kana Array dina VBA
Anjeun tiasa nganggo senar naon waé salaku pembatas pikeun ngabagi string jadi array dina VBA .
Bisa jadi spasi (“ “) , koma (“,”) , titik koma (“:”) , karakter tunggal, a string karakter, atawa naon bae.
⧭ Conto 1:
Hayu urang ngabagi string make koma salaku delimiter.
Baris kode bakal:
Arr = Split(Text, ",")
Kumplit Kode VBA bakal kieu:
⧭ Kode VBA:
7753
⧭ Kaluaran:
Ieu bakal ngabagi string jadi array anu diwangun ku {"Kami ngalamar visa AS", "Kanada", "Australia", "Perancis”}.
⧭ Conto 2:
Anjeun ogé tiasa nganggo spasi (“ ”) salaku pangwatesan.
Baris kode bakal:
Arr = Split(Text, " ")
Kode VBA lengkep bakal:
⧭ Kode VBA:
1836
⧭ Kaluaran:
Ieu baris ngabagi string jadi array nu diwangun ku {"Urang", "dilarapkeun", "kanggo", "éta", "visa", "tina", "AS", "Kanada", "Australia", "Perancis,"}.
⧭ Hal-hal anu Perlu Diinget:
- Pangwatesan standar nyaéta spasi (“ ”) .
- Nyaéta, upami anjeun henteu nyelapkeun pembatas, éta bakal nganggo spasi salaku pangwatesan.
Baca Selengkapnya: Pisah String dumasar Karakter dina Excel (6 Cara anu cocog)
Bacaan Sarupa:
- Bagi téks jadi sababaraha sél dina Excel
- VBA Pikeun Meunangkeun Nilai Unik tina Kolom kana Array dina Excel (3 Kriteria)
- Excel VBA: Kumaha Nyaring sareng Sababaraha Kriteria dina Array (7 Cara)
2. Bagikeun String kana Array kalayan Sakur Jumlah Item
Anjeun tiasa ngabagi string jadi array sareng sajumlah item numutkeun kahayang anjeun.
Selapkeun jumlah item salaku argumen ka-3 tina fungsi Split .
⧭ Conto:
Hayu urang ngabagi string kana 3 item munggaran kalayan spasi salaku pangwatesan.
Baris kode bakaljanten:
Arr = Split(Text, " ", 3)
Jeung kode VBA bakal:
⧭ Kodeu VBA:
8185
⧭ Kaluaran:
Bakal ngabagi string jadi Asép Sunandar Sunarya diwangun ku 3 item kahiji anu dipisahkeun ku pangwatesan spasi .
⧭ Hal-hal anu Diinget:
- Argumen standar nyaéta -1 .
- Hartina, mun anjeun teu ngasupkeun argumen, éta bakal beulah. string kana jumlah maksimum kali mungkin.
Baca Leuwih lengkep: Kumaha Ngabagi String dumasar Panjangna dina Excel (8 Cara)
3. Paké Boh Case-Sensitive jeung Insensitive Delimiter pikeun Beulah String hiji Array dina VBA
The Split function nawarkeun anjeun ngagunakeun duanana a case-sensitive jeung Pembatas huruf-huruf .
Pikeun pembatas non-huruf leutik , selapkeun argumen 4th salaku 1.
Jeung pikeun pembatas huruf leutik , selapkeun argumen 4th salaku 0 .
⧭ Conto 1: Pembatas Henteu Sénsitip Husus
Dina senar anu dipasihkeun, hayu urang anggap téks “KEUN” salaku pembatas sareng 2 salaku jumlah total item tina array.
Ayeuna, pikeun kasus henteu sensitip-huruf , baris kode bakal:
Arr = Split(Text, "FOR ", 3,1)
Jeung Kode VBA lengkep bakal:
⧭ Kode VBA:
8634
⧭ Kaluaran:
Sabab pangwatesanna henteu sensitip hurup leutik di dieu, “KEUN ” bakal dianggo salaku “pikeun” sareng bakal ngabagi senar janten dua item.
⧭ Conto 2: Pembatas Sénsitip Husus
Sakali deui, pikeun kasus sénsitip hurup , baris kode bakal kieu:
Arr = Split(Text, "FOR ", 3,0)
Jeung Kode VBA lengkep bakal:
⧭ Kode VBA:
8349
⧭ Kaluaran:
Kusabab pembatasna sénsitip hurup leutik di dieu, “ FOR" moal jadi "for" jeung moal ngabagi string jadi dua item.
Maca deui: Excel VBA: Hapus Duplikat tina Array (2 Conto)
⧭ Hal-hal anu Perlu Diinget:
- Nilai standar tina argumen nyaéta 0 .
- Nyaéta, upami anjeun henteu nempatkeun nilai tina argumen 4th , éta bakal dianggo pikeun pertandingan sénsitip-kasus .
Kacindekan
Ku kituna, ngagunakeun métode ieu, anjeun tiasa nganggo Pisah fungsi tina VBA pikeun ngabagi string jadi hiji Asép Sunandar Sunarya item. Dupi anjeun gaduh patarosan? Punten naroskeun ka kami.