ad ve soyadın ilk harflerinin yazılması..

Katılım
14 Ekim 2006
Mesajlar
408
Excel Vers. ve Dili
excel 2003 TR
selamlar,

a1 hücresinde ad ve soyad yazıyor. b1 hücresine ad ve soyadın ilk harflerinin araya nokta koyarak yazılmasını istiyorum. buna benzer bir örnek forumda görmüştüm ancak şimdi bulamadım. eğer 3 isim varsa üçünün de baş harflerine ihtiyacım var.

örnek:

a1= Hıncal Uluç
b1= H.U.

a2= Mehmet Akif Ersoy
b2= M.A.E.
şeklinde olsun istiyorum.

nasıl yapabilirim değerli dostlar?
 
Son düzenleme:
Katılım
5 Nisan 2006
Mesajlar
449
Excel Vers. ve Dili
Office Excel 2003
TÜRKÇE
a1 hücresine yazacağınız isim ve soyisim için aşağıdaki formülü a2 hücresine kopyalarsanız sanırım işinizi görür.....


=SOLDAN(A1;1)&"."&(PARÇAAL(A1&" ";BUL(" ";A1&" ")+1;1))&"."&(PARÇAAL(A1&" ";1+BUL("#"; YERİNEKOY(A1&" ";" ";"#";2));1))&"."
 
Katılım
14 Ekim 2006
Mesajlar
408
Excel Vers. ve Dili
excel 2003 TR
sn. enteresan;

ilginize ve yardımınıza çok teşekkür ederim. ancak birleştir formulu gereği 2 ismi olan kişilerde en sonda bir nokta fazla oluyor. yani :

a1=Hıncal ULUÇ
b1=H.U..

sondaki bir fazla noktayı kaldırmak için nasıl bir düzenleme yapabiliriz. yani üçüncü isim yoksa tek nokta kalsın. eğerle bir düzenleme yapabilir miyiz?
 

Korhan Ayhan

Administrator
Yönetici
Admin
Katılım
15 Mart 2005
Mesajlar
42,245
Excel Vers. ve Dili
Microsoft 365 Tr-En 64 Bit
Selamlar,

Alternatif olarak ekteki örnek dosyayı incelermisiniz. Formül biraz uzun oldu ama sonuca ulaştı. Dört isimli kişilere kadar problemsiz çalışır. Umarım faydası olur.

Kod:
=EĞER(UZUNLUK(A2)-(UZUNLUK(YERİNEKOY(A2;" ";"")))=3;SOLDAN(A2;1)&"."&PARÇAAL(A2;MBUL(" ";A2;1)+1;1)&"."&PARÇAAL(A2;MBUL(" ";A2;MBUL(" ";A2;1)+1)+1;1)&"."&PARÇAAL(A2;MBUL(" ";A2;MBUL(" ";A2;MBUL(" ";A2;1)+1)+1)+1;1)&".";EĞER(UZUNLUK(A2)-(UZUNLUK(YERİNEKOY(A2;" ";"")))=2;SOLDAN(A2;1)&"."&PARÇAAL(A2;MBUL(" ";A2;1)+1;1)&"."&PARÇAAL(A2;MBUL(" ";A2;MBUL(" ";A2;1)+1)+1;1)&".";EĞER(UZUNLUK(A2)-(UZUNLUK(YERİNEKOY(A2;" ";"")))=1;SOLDAN(A2;1)&"."&PARÇAAL(A2;MBUL(" ";A2;1)+1;1)&".";EĞER(VE(A2<>"";UZUNLUK(A2)-(UZUNLUK(YERİNEKOY(A2;" ";""))=0));SOLDAN(A2;1)&".";""))))
 
Katılım
14 Ekim 2006
Mesajlar
408
Excel Vers. ve Dili
excel 2003 TR
sn. Korhan Hocam,

yine harikasınız. bende verdiğiniz linkteki örnekler ile uğraşıyordum. sonuç harika. aslında basit gibi görünen ancak çok zahmetli bir işten kurtardınız beni bu çözümle. çok teşekkür ediyorum.

saygılar.
 
Üst