Kako razdeliti niz v polje v programu VBA (3 načini)

Hugh West

16-10-2023 Makri & amp; Excel VBA
  • Deliti To
Hugh West

V tem članku vam bom pokazal, kako lahko razdelimo niz v polje v VBA . Split je ena najpomembnejših in najpogosteje uporabljenih funkcij, ki jih uporabljamo v VBA . Naučili se boste razdeliti niz v VBA na vse možne načine.

Funkcija razdelitve VBA (hitri prikaz)

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

Prenesi delovni zvezek za prakso

Razdelitev niza v polje.xlsm

3 načini delitve niza v polje v programu VBA

Imejmo v roki vrvico "Za vizum smo zaprosili v ZDA, Kanadi, Avstraliji in Franciji." .

Pokazal vam bom, kako lahko ta niz razdelite v polje na vse možne načine z uporabo Funkcija razdelitve na spletnem mestu VBA .

1. Uporaba kateregakoli ločilnika za razdelitev niza v polje v programu VBA

Za delitev niza v polje lahko uporabite katerikoli niz kot ločilo v VBA .

Lahko je presledek (" ") , a vejica (",") , a podpičje (":") , en sam znak, niz znakov ali kar koli drugega.

⧭ Primer 1:

Razdelimo niz z uporabo vejica kot ločilo.

Vrstica kode bo:

Arr = Split(Besedilo, ",")

Celoten Koda VBA bo:

⧭ Koda VBA: 

 Sub Split_String() Besedilo = "Zaprosili smo za vizum ZDA, Kanade, Avstralije in Francije." Arr = Split(Text, ",") Izhod = "" For i = 0 To UBound(Arr) Output = Output + vbNewLine + vbNewLine + Arr(i) Next i MsgBox Output End Sub

⧭ Izhod:

Niz bo razdelil v polje, sestavljeno iz {"Zaprosili smo za vizum ZDA", " Kanade", " Avstralije", " Francije"}.

⧭ Primer 2:

Uporabite lahko tudi presledek (" ") kot ločilo.

Vrstica kode bo:

Arr = Split(Besedilo, " ")

Celoten Koda VBA bo:

⧭ Koda VBA: 

 Sub Split_String() Besedilo = "Zaprosili smo za vizum ZDA, Kanade, Avstralije in Francije." Arr = Split(Besedilo, " ") Izhod = "" For i = 0 To UBound(Arr) Output = Output + vbNewLine + vbNewLine + Arr(i) Next i MsgBox Output End Sub

⧭ Izhod:

Niz bo razdelil v polje, sestavljeno iz {"Mi", "uporablja", "za", "the", "vizum", "od", "ZDA", "Kanada", "Avstralija", "Francija", "}.

⧭ Ne pozabite:

  • Privzeta ločnica je presledek (" ") .
  • To pomeni, da če ne vstavite nobenega razmejitvenega elementa, bo uporabil prostor kot ločilo.

Preberite več: Razdelitev niza po znakih v Excelu (6 primernih načinov)

Podobna branja:

  • Razdelite besedilo v več celic v Excelu
  • VBA za pridobivanje edinstvenih vrednosti iz stolpca v polje v Excelu (3 merila)
  • Excel VBA: Kako filtrirati z več merili v polju (7 načinov)

2. Razdelite niz v polje s poljubnim številom elementov

Niz lahko razdelite v polje s poljubnim številom elementov po svoji želji.

Vstavite število elementov kot 3. argument Funkcija razdelitve .

⧭ Primer:

Razdelimo niz na prvi del 3 elementov z prostor kot ločilo.

Vrstica kode bo:

Arr = Split(Besedilo, " ", 3)

In Koda VBA bo:

⧭ Koda VBA: 

 Sub Split_String() Besedilo = "Zaprosili smo za vizum ZDA, Kanade, Avstralije in Francije." Arr = Split(Besedilo, " ", 3) Output = "" For i = 0 To UBound(Arr) Output = Output + vbNewLine + vbNewLine + Arr(i) Next i MsgBox Output End Sub

⧭ Izhod:

Niz bo razdelil v polje, sestavljeno iz prvih 3 elementov, ločenih z ločilom prostor .

⧭ Ne pozabite:

  • Privzet argument je -1 .
  • To pomeni, da če ne vnesete argumenta, bo niz razdelil na največje možno število krat.

Preberite več: Kako razdeliti niz po dolžini v Excelu (8 načinov)

3. Za delitev niza ali polja v VBA uporabite razmejitev, občutljivo na velikost črk in neobčutljivo na velikost črk

Spletna stran Funkcija razdelitve omogoča uporabo obeh , ki upošteva velike in male črke. in . razločevanje velikih in malih črk razmejitev.

Za razločevanje velikih in malih črk vstavite ločilo 4. argument kot 1.

In za razločevanje velikih in malih črk vstavite ločilo 4. argument kot 0 .

⧭ Primer 1: Razmejitev, ki ni občutljiva na velikost črk

V danem nizu upoštevajmo besedilo "ZA" kot ločilo in 2 kot skupno število elementov polja.

Zdaj za razločevanje velikih in malih črk v tem primeru bo vrstica kode naslednja:

Arr = Split(Besedilo, "ZA ", 3,1)

In celoten Koda VBA bo:

⧭ Koda VBA: 

 Sub Split_String() Besedilo = "Zaprosili smo za vizum ZDA, Kanade, Avstralije in Francije." Arr = Split(Besedilo, "ZA", 2, 1) Output = "" For i = 0 To UBound(Arr) Output = Output + vbNewLine + vbNewLine + Arr(i) Next i MsgBox Output End Sub

⧭ Izhod:

Ker je ločilo razločevanje velikih in malih črk tukaj je "ZA" bo deloval kot "za" in razdeli niz v polje dveh elementov.

⧭ Primer 2: Razmejitev, občutljiva na velikost črk

Tudi za , ki upošteva velike in male črke. v tem primeru bo vrstica kode naslednja:

Arr = Split(Besedilo, "ZA ", 3,0)

In celoten Koda VBA bo:

⧭ Koda VBA: 

 Sub Split_String() Besedilo = "Zaprosili smo za vizum ZDA, Kanade, Avstralije in Francije." Arr = Split(Besedilo, "FOR", 2, 0) Output = "" For i = 0 To UBound(Arr) Output = Output + vbNewLine + vbNewLine + Arr(i) Next i MsgBox Output End Sub

⧭ Izhod:

Ker je ločilo , ki upošteva velike in male črke. tukaj je "ZA" ne bo kot "za" in ne bo razdelil niza v polje dveh elementov.

Preberite več: Excel VBA: Odstranjevanje dvojnikov iz polja (2 primera)

⧭ Ne pozabite:

  • Privzeta vrednost argumenta je 0 .
  • To pomeni, da če ne vnesete vrednosti 4. argument, bo delovala za , ki upošteva velike in male črke. tekma.

Zaključek

Zato lahko s temi metodami uporabite Funkcija razdelitve na spletnem mestu VBA za razdelitev niza v polje elementov. Imate kakšno vprašanje? Vprašajte nas.

Prejšnja objava Kako odstraniti plošče v Excelu (4 metode)
Naslednja objava Kako izračunati starost v Excelu v dd/mm/yyyy (2 preprosta načina)

Hugh West je zelo izkušen trener Excela in analitik z več kot 10-letnimi izkušnjami v industriji. Po izobrazbi je diplomirani računovodstvo in finance ter magisterij poslovne administracije. Hugh ima strast do poučevanja in je razvil edinstven pristop k poučevanju, ki ga je enostavno slediti in razumeti. Njegovo strokovno znanje o Excelu je pomagalo na tisoče študentom in strokovnjakom po vsem svetu, da so izboljšali svoje sposobnosti in se izkazali v karieri. Prek svojega bloga Hugh deli svoje znanje s svetom, ponuja brezplačne vadnice za Excel in spletno usposabljanje, ki posameznikom in podjetjem pomaga doseči njihov polni potencial.