Text içindeki aynı karakterin sonuncusu

[bmutlu966]

Arkadaşlar selam,

Aşağıdaki gibi bir text içerisindeki aynı karakterlerden sonuncusunun kaçıncı sırada olduğunu nasıl bulabilirim. Aşağıdaki bold olarak işaretlediğim a harfi mesela?

xxaxxxxaxxxaxxxaxxxxxx

 

[Haluk]

Bahsettiğiniz veri A1 hücresindeyse;

=SEARCH("|";SUBSTITUTE(A1;"a";"|";LEN(A1)-LEN(SUBSTITUTE(A1;"a";""))))

.

 

[YUSUF44]

Aşağıdaki kullanıcı tanımlı fonksiyonla istediğiniz sonucu alabilirsiniz. Hücrede kullanım şekli =sonharf(hücreadresi,arananharf) şeklindedir:

Function sonharf(Rng As Range, ara As String)
    Dim r As Range
    Dim t
    aranan = 0
    adres = Empty
    If Rng <> "" Then
        For harf = Len(Rng) To 1 Step -1
            If Mid(Rng, harf, 1) = ara Then
                sonharf = harf
                aranan = 1
                harf = 1
            End If
        Next
        If aranan = 0 Then
            sonharf = "YOK"
        End If
    Else
        sonharf = "Hücre Boş"
    End If
End Function

 

[bmutlu966]

Haluk&Yusuf hocam elinize sağlık çok teşekkürler.

 

[Erdem Akdemir]

Alternatif,

=BUL("#";YERİNEKOY(A1;"a";"#";TOPLA.ÇARPIM(--(PARÇAAL(A1;SATIR(1:999);1)="a")));1)

Alternatif dizi formülü.

=UZUNLUK(A1)-KAÇINCI("a"&"*";SAĞDAN(A1;SATIR(1:999));0)+1

=MAK(EĞERHATA(MBUL("a";A1;SATIR(1:999));0))

=KAÇINCI(1;BUL("a";SAĞDAN(A1;SATIR(1:999));1);0)

 

[bmutlu966]

Çok Teşekkürler Erdem hocam.