Unten finden Sie eine Funktion, die Ihnen hilft, den Text anhand des angegebenen Trennzeichens in Teile aufzuteilen.
Um ein Makro hinzuzufügen, öffnen Sie den Editor Visual Basic (Alt+F11), einfügen ein neues leeres Programmmodul (Insert - Module) und kopieren Sie den Text dieser Funktion dorthin:
Function GETSUBSTR(Txt, Delimiter, n) As String 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
Speichern und zu Excel zurückkehren. Jetzt finden Sie in benutzerdefinierten Funktionen unsere Funktion GETSUBSTR().
GETSUBSTR(Text; Trennzeichen; Fragmentsequenznummer)
Wo: