Împărțirea automată a textului după separatorul specificat

GETSUBSTR() Descriere

Mai jos veți găsi o funcție care vă va ajuta să împărțiți textul în părți pe baza separatorului specificat.

Codul VBA pentru macrocomandă

Pentru a adăuga o macrocomandă, deschideți editorul Visual Basic (Alt+F11), introduce un nou modul software gol (Insert - Module) și copiați textul acestei funcții acolo:

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

Salvați și reveniți la Excel. Acum, în funcțiile personalizate, puteți găsi funcția noastră GETSUBSTR().

 =GETSUBSTR(text; delimitator; secvență_număr_fragment) 

Unde:

• text - textul din celula din care intenționăm să extragem fragmente;
• separator - simbolul prin care vom împărți textul;
• numărul de secvență al fragmentului - un număr care va arăta ce fragment în ordine dorim să obținem.

Articole pe tema:

• Împărțirea textului în mai multe coloane
• Extragerea unei părți a caracterelor din text (LEFT, RIGHT, MID)
• Concatenarea textului din celule diferite (CONCATENATE)
• Concatenarea textului după condiție (CONCATIF)