Üçüncü kelimenin ilk harfi

[TheGreatest]

MID(A1,SEARCH(" ",A1,1)+1,1)

bu formül sayesinde A1 hücresinde bulunan kelimelerden, ikinci kelimenin ilk harfini bulabiliyorum.

üçüncü kelimenin ilk harfini bulmak için nasıl bir formül kullanmam gerek?

Şimdiden teşekkürler.

 

[Zeki Gürsoy]

Merhaba,

Makro isterseniz şu fonksiyonu kullanabilirsiniz.

Function ucuncu_ilk(arg As String) As String
Dim arr() As String

arr = Split(arg, " ")
If UBound(arr) < 2 Then
    ucuncu_ilk = "3 kelime bulunmuyor"
Else
    ucuncu_ilk = Left$(Trim$(arr(2)), 1)
End If

End Function

 

[mami68]

Merhabalar

A1=Abcdefg Hıjkl Mnopqrs

A2=PARÇAAL(A1;15;1)

Netice "M" harfini gösterir.

İyi çalışmalar.

Not:Formül boşluklarıda saymaktadır.

 

[Ömer]

Merhaba,

Alternatif..

=PARÇAAL(A1;BUL(" ";A1;BUL(" ";A1)+1)+1;1)

=MID(A1,FIND(" ",A1,FIND(" ",A1)+1)+1,1)

.

 

[TheGreatest]

Tesekkurler arkadaslar.

 

[newsehir]

Merhabalar

A1=Abcdefg Hıjkl Mnopqrs

A2=PARÇAAL(A1;15;1)

Netice "M" harfini gösterir.

İyi çalışmalar.

Not:Formül boşluklarıda saymaktadır.

Formül değişken değil. Sonuç herzaman onbeşinci karakterdir.Verilen örnekte "l" harfinin sonuna bir harf eklendiğinde sonuç boşluk olur.Saygılar.