Aşağıda, metni belirtilen ayırıcıya göre parçalara ayırmanıza yardımcı olacak bir işlev bulacaksınız.
Makro eklemek için Visual Basic düzenleyicisini açın (Alt+F11), sokmak yeni bir boş yazılım modülü
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
Kaydedin ve Excel'ye dönün. Artık özel işlevlerde GETSUBSTR() işlevimizi bulabilirsiniz.
=GETSUBSTR(metin; sınırlayıcı; parça_sayı_sayısı)
Neresi: