Автоматичний поділ тексту по заданому розділювачу

GETSUBSTR() Опис

Нижче ви знайдете функцію, яка допоможе поділити текст на частини по вказаному розділювачу.

VBA код для макросу

Щоби добавити макрос, відкрийте редактор Visual Basic (Alt+F11), вставте новий порожній програмний модуль (Insert - Module) і скопіюйте туди текст цієї функції:

Function GETSUBSTR(Txt, Delimiter, n) As String
   'moonexcel.com.ua
   Dim x As Variant
      x = Split(Txt, Delimiter)
      If n > 0 And n - 1 <= UBound(x) Then
        GETSUBSTR = x(n - 1)
      Else
        GETSUBSTR = ""
      End If
End Function

Збережіть та поверніться в Excel. Тепер у користувацьких функціях ви зможете знайти нашу функцію GETSUBSTR().

=GETSUBSTR(текст; розділювач; порядковий_номер_фрагменту)

де:

• текст - текст в комірці, з якого плануємо вилучати фрагменти;
• розділювач - символ, по якому будем ділити текст;
• порядковий номер фрагменту - число, яке відображатиме, який фрагмент по-порядку ми хочемо отримати.

Використання розширення

Ви також можете скористатись функцією GETSUBSTR() встановивши безкоштовне розширення YouLibreCalc.xlam.

Після цього, дана функція буде доступна у всіх файлах, які будуть відкриті в Excel.

Статті по темі:

• Розбиття тексту на декілька стовпців
• Виокремлення частини символів з тексту (LEFT, RIGHT, MID)
• З'єднання тексту з різних комірок (CONCATENATE)
• З'єднання тексту по умові (CONCATIF)