Excel Forum

Excel Forum (http://www.excel.web.tr/index.php)
-   Excel'e Yeni Başlayanlar (http://www.excel.web.tr/forumdisplay.php?f=14)
-   -   İsim ve Soyisimlere otomatik olarak iyelik vb. eklerden eklemek. (http://www.excel.web.tr/showthread.php?t=167972)

sentooki 08-11-2017 10:45

İsim ve Soyisimlere otomatik olarak iyelik vb. eklerden eklemek.
 
Excel' in; bir isme, isme uygun bir iyelik eki eklemesini istiyorum. örneğin ALİ yazdığımda Excel ALİ' nin vermeli. Bunun için
=B5&"'"&EĞER(EHATALIYSA(ARA(KAÇINCI(BÜYÜKHARF(SAĞD AN(B5;1));{"A";"E";"I";"İ";"U";"Ü";"O";"Ö"};0);{1; 2;3;4;5;6;7;8};{" nın";" nin";" nın";" nin";" nun";" nün";" nun";" nün"}));ARA(KAÇINCI(BÜYÜKHARF(PARÇAAL(B5;UZUNLUK(B 5)-1;1));{"A";"E";"I";"İ";"U";"Ü";"O";"Ö"};0);{1;2;3; 4;5;6;7;8};{" ın";" in";" ın";" in";" un";" ün";" un";" ün"});ARA(KAÇINCI(BÜYÜKHARF(SAĞDAN(B5;1));{"A";"E" ;"I";"İ";"U";"Ü";"O";"Ö"};0);{1;2;3;4;5;6;7;8}; {" nın ";" nin";" nın";" nin";" nun";" nün";" nun";" nün"}))
formülünü kullanıyordum. Fakat bu formül, isimlerin çift veya daha fazla sessiz harf ile bitmesi durumunda "#YOK" hatası veriyor. Örneğin KURT kelimesi için KURT' un yapmıyor. "#YOK" hatası veriyor.
Bu iş için uygun makro, formül vb verebilecek olan ve ya bu formülde yapılması gereken düzeltmeyi bilen arkadaşlardan yardım bekliyorum.
Şimdiden Teşekkürler.

Ömer 09-11-2017 10:41

Merhaba,

Bu şekilde deneyin.

Kod:

=B5&"'"&ELEMAN(KAÇINCI(1;--ESAYIYSA(KAÇINCI(PARÇAAL(B5;UZUNLUK(B5)-{0;1;2};1);{"a";"e";"ı";"i";"o";"ö";"u";"ü"};0));0);"n";"";"")&ELEMAN(İNDİS(KAÇINCI(PARÇAAL(B5;UZUNLUK(B5)-{0;1;2};1);{"a";"e";"ı";"i";"o";"ö";"u";"ü"};0);KAÇINCI(1;--ESAYIYSA(KAÇINCI(PARÇAAL(B5;UZUNLUK(B5)-{0;1;2};1);{"a";"e";"ı";"i";"o";"ö";"u";"ü"};0));0));"ın";"in";"ın";"in";"un";"ün";"un";"ün")
.

sentooki 13-11-2017 13:11

Sayın Ömer (Moderatör) Hocam; Yardımınız İçin Teşekkürler.
"Eğer" formülünün tekrarı ile biraz uçuk bir çözüm üretmeye çalışmıştım. Karmakarışık bir hal almıştı.
Bu çözüm son derece pratik, hazırlanan formül son derce kolay ve anlaşılır. Üstelik harika çalışıyor. Emeğinize Sağlık.


Saat 03:49

Powered by vBulletin Version 3.7.2
Copyright ©2000 - 2017, Jelsoft Enterprises Ltd.