VBA osztott funkció (példák) - Hogyan lehet felosztani a húrokat az Excel VBA-ban?

Tartalomjegyzék

Mi az a VBA Split funkció az Excelben?

Mi az a VBA Split funkció az Excelben?

A VBA split függvény egy nagyon hasznos karakterlánc-függvény, amelyet a karakterláncok felosztására használnak a függvényhez adott elválasztó és összehasonlító módszer alapján, több függvényre osztva. Vannak más karakterlánc-függvények is, amelyek egy karakterláncot alakítanak át részsávra, de a split függvény hasíthat egy karaktersorozat több részstringbe.

A normál munkalap LEFT függvényében a MID és az RIGHT in excel függvényeket szöveges függvényként használják az excelben a mondat egy részének kivonására. Például a keresztnév, a középnév és a vezetéknév kinyerése a leggyakoribb forgatókönyv. De a VBA-ban van egy SPLIT nevű sokoldalúbb funkció, amely hasonló munkát fog végezni az Ön számára. Az SPLIT egy beépített függvény az Excel VBA-ban, amely az elválasztó alapján fel tudja osztani a mellékelt mondatot. Például, ha az e-mail címet különböző részekre kívánja osztani, akkor az e-mail cím általános eleme az összes e-mail azonosítóban „@”, így a „@” itt lesz elválasztó.

VBA Split String Function

Mint a többi funkciónak, a splitnek is megvan a maga szintaxisa. Az alábbiakban bemutatjuk az excel VBA Split string függvény paramétereit.

Érték vagy kifejezés: Ez nem más, mint az a tényleges érték, amelyet megpróbálunk felosztani. Például, ha el akarja osztani a keresztnevet és a vezetéknevet, akkor itt a teljes név az érték.
(Elhatároló): Mi a közös elem az Érték vagy a kifejezés felosztásához? Az e-mailben Id „@” a közös eleme, a cím vesszőjében (,) a közös elem. Ha ezt figyelmen kívül hagyja, akkor a szóköz karaktert tekinti alapértelmezett értéknek.
(Limit): Hány alszöveget szeretne a megadott értékből vagy kifejezésből. Például, ha az érték „A nevem Excel”, ha a 3 értéket adja meg korlátként, akkor az eredményt három sorban jeleníti meg, például „My”, „name”, „is Excel”.
(Összehasonlítás): Mivel nem használjuk az argumentum összehasonlítását, hagyja ki ezt az opcionális érvet.

A cikk következő szakaszaiban megnézzük, hogyan lehet az SPLIT függvényt gyakorlatilag használni az excel VBA-ban.

Példák a VBA Split String függvényre

Az alábbiakban bemutatjuk az Excel VBA Split Function funkciójának gyakorlati példáit.

1. példa - A mondat felosztása

A Split a tömbben 0-tól kezdődő eredményt adja vissza. Az összes tömb 0-tól kezdődik, nem pedig 1-től.

Tegyük fel, hogy az A1 cellában szerepel a „A nevem Excel VBA” szó.

Ezt a mondatot most olyan darabokra szeretné felosztani, mint a „Saját”, „Név”, „van”, „Excel”, „VBA”. Az Excel VBA SPLIT String függvény segítségével visszaadhatjuk ezt az eredményt.

1. lépés: Indítsa el a makrót a névvel.

Kód:

Részfelosztás_Példa1 () Vége 2. allépés: Nyújtson be három változót.

Kód:

Sub Split_Példa1 () Dim MyText mint karakterlánc Dim i mint egész Dim Dim MyResult () mint karakterlánc End Sub

3. lépés: Most a definiált változóhoz a My Text hozzárendeli a „My Name is Excel VBA” szót .

Kód:

Sub Split_Example1 () Dim MyText mint karakterlánc Dim i egész számként Dim MyResult () As String MyText = "A nevem Excel VBA" End Sub

4. lépés: Most a My Result változónál alkalmazza a VBA split string függvényt.

Kód:

Sub Split_Example1 () Dim MyText mint karakterlánc Dim i egész számként Dim MyResult () As String MyText = "A nevem Excel VBA" MyResult = Split (End Sub

5. lépés: A kifejezés a szöveges értékünk. Mivel a szöveges értékünket már hozzárendeltük a My Text változóhoz, írja be ide ezt az argumentumot.

Kód:

Sub Split_Példa1 () Dim MyText mint karakterlánc Dim i egész számként Dim MyResult () As String MyText = "A nevem Excel VBA" MyResult = Split (MyText) End Sub

Megjegyzés: A mostani módon hagyja figyelmen kívül az összes többi paramétert.

6. lépés: Tehát most az Eredményem tartja ezt a megosztott eredményt. Amint azt korábban a posztban elmondtam, a split függvény tömbként tárolja az eredményt, így itt

Eredményem (0) = „Saját”
Eredményem (1) = „Név”
Eredményem (2) = „van”
Eredményem (3) = „Excel”
Eredményem (4) = „VBA”

Annak ellenére, hogy ez a kód nem befolyásolja az SPLIT funkció elindítását, használhatjuk ezt a kódot.

2. példa - VBA SPLIT karakterlánc UBOUND funkcióval

Az SPLIT függvény eredményének tárolásához használhatjuk az vba UBOUND függvényt az SPLIT funkcióval együtt.

Az UBOUND visszaadja a tömb maximális hosszát. A fenti példában a tömb maximális hossza 5 volt.

Vegyük ugyanazt a szót: „A nevem Excel VBA”. Osszuk el ezt a szót, és tároljuk az A1 cellától kezdve.

Step 1: Let’s continue from where we left off in the previous example.

Step 2: Now apply FOR NEXT LOOP in VBA from 0 to maximum length of the array i.e. UBOUND.

The reason we started from zero because SPLIT will store the result from zero, not from 1.

Step 3: Now apply VBA CELLS property and store the result.

Code:

Cells(i + 1, 1).Value = MyResult(i)

Step 4: Run this code, we would have split values.

Complete Code:

Sub Split_Example1() Dim MyText As String Dim i As Integer Dim MyResult() As String MyText = "My Name is Excel VBA" MyResult = Split(MyText) For i = 0 To UBound(MyResult) Cells(i + 1, 1).Value = MyResult(i) Next i End Sub

Return Word Count

We can also show the total number of words in the supplied value. Use the below code to show the total number of word counts. Code:

Sub Split_Example2() Dim MyText As String Dim i As Integer Dim MyResult() As String MyText = "My Name is Excel VBA" MyResult = Split(MyText) i = UBound(MyResult()) + 1 MsgBox "Total Words Count is " & i End Sub

Copy and paste the above VBA code and run it, the message box will return the result.

Things to Remember

If the delimiter is not supplied SPLIT automatically thinks the delimiter as space.
If you want to split except space then you need to specify the delimiter in double-quotes.
SPLIT stores the result as array results.
UBOUND function returns the maximum length of the array.