ВБА сплит функција (примери) - Како поделити жице у програму Екцел ВБА?

Преглед садржаја

Шта је ВБА функција поделе у програму Екцел?

Шта је ВБА функција поделе у програму Екцел?

Функција раздвајања у ВБА је врло корисна функција низа која се користи за раздвајање низова у више поднизова на основу граничника који је дат функцији и методе поређења, постоје и друге функције низа које претварају низ у подниз, али функција раздвајања може подијелити низ низ у више поднизова.

У нормалном радном листу функције ЛЕВО, МИД функције и ДЕСНО у Екцелу користе се као текстуалне функције у Екцелу за издвајање дела реченице. На пример, издвајање имена, средњег имена и презимена су уобичајени сценарији које смо видели. Али у ВБА имамо свестранију функцију звану СПЛИТ која ће за вас обавити сличан посао. СПЛИТ је уграђена функција у програму Екцел ВБА која може раздвојити испоручену реченицу на основу граничника. На пример, ако желите да е-адресу поделите на различите делове, заједнички елемент у е-адреси је „@“ у свим ИД-овима е-поште, па „@“ овде постаје разграничење.

ВБА функција подељеног низа

Као и све остале функције и сплит има своју синтаксу. Испод су параметри функције низа екцел ВБА Сплит.

Вредност или израз: Ово није ништа друго до стварна вредност коју покушавамо да поделимо. На пример, ако желите да поделите име и презиме, овде је вредност пуно име.
(Разграничник): Који је уобичајени елемент за поделу вредности или израза? У е-пошти је заједнички елемент „@“, а у адреси зарез (,) заједнички елемент. Ако ово занемарите, размак ће узети као подразумевану вредност.
(Ограничење): Колико поднизова желите од вредности или израза који сте навели. На пример, ако је вредност „Ми наме ис Екцел“, ако наведете 3 као ограничење, резултат ће се приказати у три реда као што су „Ми“, „наме“, „ис Екцел“.
(Упореди): Пошто не користимо аргумент упоређивања, прескочите овај опционални аргумент.

У следећим одељцима чланка видећемо како се практично користи функција СПЛИТ у екцелу ВБА.

Примери ВБА функције подељеног низа

Испод су практични примери функције раздвајања у програму Екцел ВБА.

Пример # 1 - Поделите реченицу

Сплит враћа резултат у низу који ће почети од 0. Сви низови почињу од 0, а не од 1.

Претпоставимо да имате реч „Моје име је Екцел ВБА“ у ћелији А1.

Сада желите подијелити ову реченицу на дијелове попут „Моје“, „Име“, „је“, „Екцел“, „ВБА“. Коришћењем функције Екцел ВБА СПЛИТ Стринг можемо вратити овај резултат.

Корак 1: Покрените макро са именом.

Шифра:

Суб Сплит_Екампле1 () Крај поткорак 2: Наведите три променљиве.

Шифра:

Суб Сплит_Екампле1 () Затамни МиТект као низ Дим и Ас Интегер Дим МиРесулт () Као стринг Енд Енд

Корак 3: Сада за дефинисану променљиву, Ми Тект додељује реч „Ми Наме ис Екцел ВБА“ .

Шифра:

Суб Сплит_Екампле1 () Затамни МиТект као низ Дим и Ас Интегер Дим МиРесулт () Ас Стринг МиТект = "Ми Наме ис Екцел ВБА" Енд Суб

Корак 4: Сада за променљиву Мој резултат примените ВБА функцију подељеног низа.

Шифра:

Суб Сплит_Екампле1 () Дим МиТект Ас Стринг Дим Дим Ас Ас Интегер Дим МиРесулт () Ас Стринг МиТект = "Ми Наме ис Екцел ВБА" МиРесулт = Сплит (Енд Суб

Корак 5: Израз је наша текстуална вредност. Будући да смо већ задали своју текстуалну вредност променљивој Мој текст, унесите овај аргумент овде.

Шифра:

Суб Сплит_Екампле1 () Затамни МиТект као стринг Дим и Ас Интегер Дим МиРесулт () Ас Стринг МиТект = "Ми Наме ис Екцел ВБА" МиРесулт = Сплит (МиТект) Енд Суб

Напомена: Као и сада, занемарите све остале параметре.

Корак 6: Дакле, Мој резултат садржи овај подељени резултат. Као што сам рекао раније у посту, функција сплит чува резултат као низ, па овде

Мој резултат (0) = "Мој"
Мој резултат (1) = „Име“
Мој резултат (2) = “је”
Мој резултат (3) = "Екцел"
Мој резултат (4) = “ВБА”

Иако овај код не утиче на покретање функције СПЛИТ, можемо га користити.

Пример # 2 - ВБА СПЛИТ низ са функцијом УБОУНД

Да бисмо сачували резултат функције СПЛИТ, можемо користити функцију вба УБОУНД заједно са функцијом СПЛИТ.

УБОУНД враћа максималну дужину низа. У горњем примеру, максимална дужина низа је била 5.

Узмите исту реч „Ми Наме ис Екцел ВБА“. Поделимо ову реч и чувајмо од ћелије А1 надаље.

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.