TOP

Metnin belirtilen ayırıcıya göre otomatik bölünmesi

GETSUBSTR() Açıklama

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 için VBA kodu

Makro eklemek için Visual Basic düzenleyicisini açın (Alt+F11), sokmak yeni bir boş yazılım modülü (Insert - Module) ve bu işlevin metnini buraya kopyalayın:

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:

Konuyla ilgili makaleler: