metini hücreden ayırma

[ahmet altan]

11 13287078174 TUBA YILMAZ 3.595,55 0,00 30 0 0000.00



ARKADAŞLAR MERHABA HÜCRE İÇİNDEKİ METNİ AYIRAMADIM


=PARÇAAL(A2;MBUL(" ";A2)+1;UZUNLUK(A2))
FORMÜLÜ KULLANDIM AMA OLMADI

yardımcı olursanız sevinirm

 

[suleyman242]

=parçaal((sağdan(a5;uzunluk(a5)-15));1;12)

 

[Korhan Ayhan]

Merhaba,

Verileriniz değişken uzunlukta ise kullanıcı tanımlı fonksiyon daha sağlıklı sonuç verecektir. Ekteki örnek dosyayı inceleyiniz.

Kullanılan kod;

Function METİN_AYIR(Veri As Range)
    Dim Data, X
    
    Application.Volatile True
    
    Data = Split(Veri.Text, " ")
    
    For X = 0 To UBound(Data)
        If Not IsNumeric(Data(X)) Then METİN_AYIR = IIf(METİN_AYIR = "", Data(X), METİN_AYIR & " " & Data(X))
    Next
End Function

Hücrede aşağıdaki şekilde kullanabilirsiniz.

=METİN_AYIR(A1)