DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
Altın Üyelik Hakkında Bilgi
=EĞER(F7>=10^6;ELEMAN(SOLDAN(SAĞDAN(F7;7);1)+1;"";"birmilyon";"ikimilyon";"üçmilyon";"dörtmilyon";"beşmilyon";"altımilyon";"yedimilyon";"sekizmilyon";"dokuzmilyon");"")&EĞER(F7>=10^5;ELEMAN(SOLDAN(SAĞDAN(F7;6);1)+1;"";"yüz";"ikiyüz";"üçyüz";"dörtyüz";"beşyüz";"altıyüz";"yediyüz";"sekizyüz";"dokuzyüz");"")&EĞER(F7>=10^4;ELEMAN(SOLDAN(SAĞDAN(F7;5);1)+1;"";"on";"yirmi";"otuz";"kırk";"elli";"altmış";"yetmiş";"seksen";"doksan");"")&EĞER(F7>=10^3;ELEMAN(SOLDAN(SAĞDAN(F7;4);1)+1;"";"";"iki";"üç";"dört";"beş";"altı";"yedi";"sekiz";"dokuz");"")&EĞER(F7>10^3;EĞER(VE(F7>1999;SOLDAN(SAĞDAN(F7;4);1)="1");"birbin";"bin");"")&EĞER(F7>=100;ELEMAN(SOLDAN(SAĞDAN(F7;3);1)+1;"";"yüz";"ikiyüz";"üçyüz";"dörtyüz";"beşyüz";"altıyüz";"yediyüz";"sekizyüz";"dokuzyüz");"")&EĞER(F7>=10;ELEMAN(SOLDAN(SAĞDAN(F7;2);1)+1;"";"on";"yirmi";"otuz";"kırk";"elli";"altmış";"yetmiş";"seksen";"doksan");"")&ELEMAN(MOD(F7;10)+1;"";"bir";"iki";"üç";"dört";"beş";"altı";"yedi";"sekiz";"dokuz")
=BÜYÜKHARF(EĞER(F7>=10^6;ELEMAN(SOLDAN(SAĞDAN(F7;7);1)+1;"";"birmilyon";"ikimilyon";"üçmilyon";"dörtmilyon";"beşmilyon";"altımilyon";"yedimilyon";"sekizmilyon";"dokuzmilyon");"")&EĞER(F7>=10^5;ELEMAN(SOLDAN(SAĞDAN(F7;6);1)+1;"";"yüz";"ikiyüz";"üçyüz";"dörtyüz";"beşyüz";"altıyüz";"yediyüz";"sekizyüz";"dokuzyüz");"")&EĞER(F7>=10^4;ELEMAN(SOLDAN(SAĞDAN(F7;5);1)+1;"";"on";"yirmi";"otuz";"kırk";"elli";"altmış";"yetmiş";"seksen";"doksan");"")&EĞER(F7>=10^3;ELEMAN(SOLDAN(SAĞDAN(F7;4);1)+1;"";"";"iki";"üç";"dört";"beş";"altı";"yedi";"sekiz";"dokuz");"")&EĞER(F7>10^3;EĞER(VE(F7>1999;SOLDAN(SAĞDAN(F7;4);1)="1");"birbin";"bin");"")&EĞER(F7>=100;ELEMAN(SOLDAN(SAĞDAN(F7;3);1)+1;"";"yüz";"ikiyüz";"üçyüz";"dörtyüz";"beşyüz";"altıyüz";"yediyüz";"sekizyüz";"dokuzyüz");"")&EĞER(F7>=10;ELEMAN(SOLDAN(SAĞDAN(F7;2);1)+1;"";"on";"yirmi";"otuz";"kırk";"elli";"altmış";"yetmiş";"seksen";"doksan");"")&ELEMAN(MOD(F7;10)+1;"";"bir";"iki";"üç";"dört";"beş";"altı";"yedi";"sekiz";"dokuz"))
http://www.excel.web.tr/f14/makrosuz-sayyyy-yazyya-evirme-t107969.html
Yuakrdaki başlıkta 6. mesajda sayın fff7 tarafından, F7 hücresindeki sayıyı yazıyla yazmak için aşağıdaki formül önerilmiş:
Eğer büyükharf olmasını istiyorsanız aşağıdaki gibi kullanabilirsiniz:Kod:=EĞER(F7>=10^6;ELEMAN(SOLDAN(SAĞDAN(F7;7);1)+1;"";"birmilyon";"ikimilyon";"üçmilyon";"dörtmilyon";"beşmilyon";"altımilyon";"yedimilyon";"sekizmilyon";"dokuzmilyon");"")&EĞER(F7>=10^5;ELEMAN(SOLDAN(SAĞDAN(F7;6);1)+1;"";"yüz";"ikiyüz";"üçyüz";"dörtyüz";"beşyüz";"altıyüz";"yediyüz";"sekizyüz";"dokuzyüz");"")&EĞER(F7>=10^4;ELEMAN(SOLDAN(SAĞDAN(F7;5);1)+1;"";"on";"yirmi";"otuz";"kırk";"elli";"altmış";"yetmiş";"seksen";"doksan");"")&EĞER(F7>=10^3;ELEMAN(SOLDAN(SAĞDAN(F7;4);1)+1;"";"";"iki";"üç";"dört";"beş";"altı";"yedi";"sekiz";"dokuz");"")&EĞER(F7>10^3;EĞER(VE(F7>1999;SOLDAN(SAĞDAN(F7;4);1)="1");"birbin";"bin");"")&EĞER(F7>=100;ELEMAN(SOLDAN(SAĞDAN(F7;3);1)+1;"";"yüz";"ikiyüz";"üçyüz";"dörtyüz";"beşyüz";"altıyüz";"yediyüz";"sekizyüz";"dokuzyüz");"")&EĞER(F7>=10;ELEMAN(SOLDAN(SAĞDAN(F7;2);1)+1;"";"on";"yirmi";"otuz";"kırk";"elli";"altmış";"yetmiş";"seksen";"doksan");"")&ELEMAN(MOD(F7;10)+1;"";"bir";"iki";"üç";"dört";"beş";"altı";"yedi";"sekiz";"dokuz")
Kod:=BÜYÜKHARF(EĞER(F7>=10^6;ELEMAN(SOLDAN(SAĞDAN(F7;7);1)+1;"";"birmilyon";"ikimilyon";"üçmilyon";"dörtmilyon";"beşmilyon";"altımilyon";"yedimilyon";"sekizmilyon";"dokuzmilyon");"")&EĞER(F7>=10^5;ELEMAN(SOLDAN(SAĞDAN(F7;6);1)+1;"";"yüz";"ikiyüz";"üçyüz";"dörtyüz";"beşyüz";"altıyüz";"yediyüz";"sekizyüz";"dokuzyüz");"")&EĞER(F7>=10^4;ELEMAN(SOLDAN(SAĞDAN(F7;5);1)+1;"";"on";"yirmi";"otuz";"kırk";"elli";"altmış";"yetmiş";"seksen";"doksan");"")&EĞER(F7>=10^3;ELEMAN(SOLDAN(SAĞDAN(F7;4);1)+1;"";"";"iki";"üç";"dört";"beş";"altı";"yedi";"sekiz";"dokuz");"")&EĞER(F7>10^3;EĞER(VE(F7>1999;SOLDAN(SAĞDAN(F7;4);1)="1");"birbin";"bin");"")&EĞER(F7>=100;ELEMAN(SOLDAN(SAĞDAN(F7;3);1)+1;"";"yüz";"ikiyüz";"üçyüz";"dörtyüz";"beşyüz";"altıyüz";"yediyüz";"sekizyüz";"dokuzyüz");"")&EĞER(F7>=10;ELEMAN(SOLDAN(SAĞDAN(F7;2);1)+1;"";"on";"yirmi";"otuz";"kırk";"elli";"altmış";"yetmiş";"seksen";"doksan");"")&ELEMAN(MOD(F7;10)+1;"";"bir";"iki";"üç";"dört";"beş";"altı";"yedi";"sekiz";"dokuz"))
="***"&BÜYÜKHARF(EĞER(F7>=10^6;ELEMAN(SOLDAN(SAĞDAN(F7;7);1)+1;"";"birmilyon";"ikimilyon";"üçmilyon";"dörtmilyon";"beşmilyon";"altımilyon";"yedimilyon";"sekizmilyon";"dokuzmilyon");"")&EĞER(F7>=10^5;ELEMAN(SOLDAN(SAĞDAN(F7;6);1)+1;"";"yüz";"ikiyüz";"üçyüz";"dörtyüz";"beşyüz";"altıyüz";"yediyüz";"sekizyüz";"dokuzyüz");"")&EĞER(F7>=10^4;ELEMAN(SOLDAN(SAĞDAN(F7;5);1)+1;"";"on";"yirmi";"otuz";"kırk";"elli";"altmış";"yetmiş";"seksen";"doksan");"")&EĞER(F7>=10^3;ELEMAN(SOLDAN(SAĞDAN(F7;4);1)+1;"";"";"iki";"üç";"dört";"beş";"altı";"yedi";"sekiz";"dokuz");"")&EĞER(F7>10^3;EĞER(VE(F7>1999;SOLDAN(SAĞDAN(F7;4);1)="1");"birbin";"bin");"")&EĞER(F7>=100;ELEMAN(SOLDAN(SAĞDAN(F7;3);1)+1;"";"yüz";"ikiyüz";"üçyüz";"dörtyüz";"beşyüz";"altıyüz";"yediyüz";"sekizyüz";"dokuzyüz");"")&EĞER(F7>=10;ELEMAN(SOLDAN(SAĞDAN(F7;2);1)+1;"";"on";"yirmi";"otuz";"kırk";"elli";"altmış";"yetmiş";"seksen";"doksan");"")&ELEMAN(MOD(F7;10)+1;"";"bir";"iki";"üç";"dört";"beş";"altı";"yedi";"sekiz";"dokuz"))&"***"
http://www.excel.web.tr/f14/makrosuz-sayyyy-yazyya-evirme-t107969.html
Yuakrdaki başlıkta 6. mesajda sayın fff7 tarafından, F7 hücresindeki sayıyı yazıyla yazmak için aşağıdaki formül önerilmiş:
Eğer büyükharf olmasını istiyorsanız aşağıdaki gibi kullanabilirsiniz:Kod:=EĞER(F7>=10^6;ELEMAN(SOLDAN(SAĞDAN(F7;7);1)+1;"";"birmilyon";"ikimilyon";"üçmilyon";"dörtmilyon";"beşmilyon";"altımilyon";"yedimilyon";"sekizmilyon";"dokuzmilyon");"")&EĞER(F7>=10^5;ELEMAN(SOLDAN(SAĞDAN(F7;6);1)+1;"";"yüz";"ikiyüz";"üçyüz";"dörtyüz";"beşyüz";"altıyüz";"yediyüz";"sekizyüz";"dokuzyüz");"")&EĞER(F7>=10^4;ELEMAN(SOLDAN(SAĞDAN(F7;5);1)+1;"";"on";"yirmi";"otuz";"kırk";"elli";"altmış";"yetmiş";"seksen";"doksan");"")&EĞER(F7>=10^3;ELEMAN(SOLDAN(SAĞDAN(F7;4);1)+1;"";"";"iki";"üç";"dört";"beş";"altı";"yedi";"sekiz";"dokuz");"")&EĞER(F7>10^3;EĞER(VE(F7>1999;SOLDAN(SAĞDAN(F7;4);1)="1");"birbin";"bin");"")&EĞER(F7>=100;ELEMAN(SOLDAN(SAĞDAN(F7;3);1)+1;"";"yüz";"ikiyüz";"üçyüz";"dörtyüz";"beşyüz";"altıyüz";"yediyüz";"sekizyüz";"dokuzyüz");"")&EĞER(F7>=10;ELEMAN(SOLDAN(SAĞDAN(F7;2);1)+1;"";"on";"yirmi";"otuz";"kırk";"elli";"altmış";"yetmiş";"seksen";"doksan");"")&ELEMAN(MOD(F7;10)+1;"";"bir";"iki";"üç";"dört";"beş";"altı";"yedi";"sekiz";"dokuz")
Kod:=BÜYÜKHARF(EĞER(F7>=10^6;ELEMAN(SOLDAN(SAĞDAN(F7;7);1)+1;"";"birmilyon";"ikimilyon";"üçmilyon";"dörtmilyon";"beşmilyon";"altımilyon";"yedimilyon";"sekizmilyon";"dokuzmilyon");"")&EĞER(F7>=10^5;ELEMAN(SOLDAN(SAĞDAN(F7;6);1)+1;"";"yüz";"ikiyüz";"üçyüz";"dörtyüz";"beşyüz";"altıyüz";"yediyüz";"sekizyüz";"dokuzyüz");"")&EĞER(F7>=10^4;ELEMAN(SOLDAN(SAĞDAN(F7;5);1)+1;"";"on";"yirmi";"otuz";"kırk";"elli";"altmış";"yetmiş";"seksen";"doksan");"")&EĞER(F7>=10^3;ELEMAN(SOLDAN(SAĞDAN(F7;4);1)+1;"";"";"iki";"üç";"dört";"beş";"altı";"yedi";"sekiz";"dokuz");"")&EĞER(F7>10^3;EĞER(VE(F7>1999;SOLDAN(SAĞDAN(F7;4);1)="1");"birbin";"bin");"")&EĞER(F7>=100;ELEMAN(SOLDAN(SAĞDAN(F7;3);1)+1;"";"yüz";"ikiyüz";"üçyüz";"dörtyüz";"beşyüz";"altıyüz";"yediyüz";"sekizyüz";"dokuzyüz");"")&EĞER(F7>=10;ELEMAN(SOLDAN(SAĞDAN(F7;2);1)+1;"";"on";"yirmi";"otuz";"kırk";"elli";"altmış";"yetmiş";"seksen";"doksan");"")&ELEMAN(MOD(F7;10)+1;"";"bir";"iki";"üç";"dört";"beş";"altı";"yedi";"sekiz";"dokuz"))
http://www.excel.web.tr/f14/makrosuz-sayyyy-yazyya-evirme-t107969.html
Yuakrdaki başlıkta 6. mesajda sayın fff7 tarafından, F7 hücresindeki sayıyı yazıyla yazmak için aşağıdaki formül önerilmiş:
Eğer büyükharf olmasını istiyorsanız aşağıdaki gibi kullanabilirsiniz:Kod:=EĞER(F7>=10^6;ELEMAN(SOLDAN(SAĞDAN(F7;7);1)+1;"";"birmilyon";"ikimilyon";"üçmilyon";"dörtmilyon";"beşmilyon";"altımilyon";"yedimilyon";"sekizmilyon";"dokuzmilyon");"")&EĞER(F7>=10^5;ELEMAN(SOLDAN(SAĞDAN(F7;6);1)+1;"";"yüz";"ikiyüz";"üçyüz";"dörtyüz";"beşyüz";"altıyüz";"yediyüz";"sekizyüz";"dokuzyüz");"")&EĞER(F7>=10^4;ELEMAN(SOLDAN(SAĞDAN(F7;5);1)+1;"";"on";"yirmi";"otuz";"kırk";"elli";"altmış";"yetmiş";"seksen";"doksan");"")&EĞER(F7>=10^3;ELEMAN(SOLDAN(SAĞDAN(F7;4);1)+1;"";"";"iki";"üç";"dört";"beş";"altı";"yedi";"sekiz";"dokuz");"")&EĞER(F7>10^3;EĞER(VE(F7>1999;SOLDAN(SAĞDAN(F7;4);1)="1");"birbin";"bin");"")&EĞER(F7>=100;ELEMAN(SOLDAN(SAĞDAN(F7;3);1)+1;"";"yüz";"ikiyüz";"üçyüz";"dörtyüz";"beşyüz";"altıyüz";"yediyüz";"sekizyüz";"dokuzyüz");"")&EĞER(F7>=10;ELEMAN(SOLDAN(SAĞDAN(F7;2);1)+1;"";"on";"yirmi";"otuz";"kırk";"elli";"altmış";"yetmiş";"seksen";"doksan");"")&ELEMAN(MOD(F7;10)+1;"";"bir";"iki";"üç";"dört";"beş";"altı";"yedi";"sekiz";"dokuz")
Kod:=BÜYÜKHARF(EĞER(F7>=10^6;ELEMAN(SOLDAN(SAĞDAN(F7;7);1)+1;"";"birmilyon";"ikimilyon";"üçmilyon";"dörtmilyon";"beşmilyon";"altımilyon";"yedimilyon";"sekizmilyon";"dokuzmilyon");"")&EĞER(F7>=10^5;ELEMAN(SOLDAN(SAĞDAN(F7;6);1)+1;"";"yüz";"ikiyüz";"üçyüz";"dörtyüz";"beşyüz";"altıyüz";"yediyüz";"sekizyüz";"dokuzyüz");"")&EĞER(F7>=10^4;ELEMAN(SOLDAN(SAĞDAN(F7;5);1)+1;"";"on";"yirmi";"otuz";"kırk";"elli";"altmış";"yetmiş";"seksen";"doksan");"")&EĞER(F7>=10^3;ELEMAN(SOLDAN(SAĞDAN(F7;4);1)+1;"";"";"iki";"üç";"dört";"beş";"altı";"yedi";"sekiz";"dokuz");"")&EĞER(F7>10^3;EĞER(VE(F7>1999;SOLDAN(SAĞDAN(F7;4);1)="1");"birbin";"bin");"")&EĞER(F7>=100;ELEMAN(SOLDAN(SAĞDAN(F7;3);1)+1;"";"yüz";"ikiyüz";"üçyüz";"dörtyüz";"beşyüz";"altıyüz";"yediyüz";"sekizyüz";"dokuzyüz");"")&EĞER(F7>=10;ELEMAN(SOLDAN(SAĞDAN(F7;2);1)+1;"";"on";"yirmi";"otuz";"kırk";"elli";"altmış";"yetmiş";"seksen";"doksan");"")&ELEMAN(MOD(F7;10)+1;"";"bir";"iki";"üç";"dört";"beş";"altı";"yedi";"sekiz";"dokuz"))
Konu eski ama bu formülü denedim ama çalışmıyor formül ile bunu yapabilmek mümkün mü acabaBiraz üzerinde oynama yaparak "." ile ayrılmış KURUŞ ibaresi ekledim
Umarım işinize yarar....
=EĞER(EĞERYOKSA(BÜYÜKHARF(EĞER(TAMSAYI(A2)>=10000000,ELEMAN(SOLDAN(SAĞDAN(TAMSAYI(A2),7),1)+1,"","birmilyon","ikimilyon","üçmilyon","dörtmilyon","beşmilyon","altımilyon","yedimilyon","sekizmilyon","dokuzmilyon"),"")&
EĞER(TAMSAYI(A2)>=100000,ELEMAN(SOLDAN(SAĞDAN(TAMSAYI(A2),6),1)+1,"","yüz","ikiyüz","üçyüz","dörtyüz","beşyüz","altıyüz","yediyüz","sekizyüz","dokuzyüz"),"")&
EĞER(TAMSAYI(A2)>=10000,ELEMAN(SOLDAN(SAĞDAN(TAMSAYI(A2),5),1)+1,"","on","yirmi","otuz","kırk","elli","altmış","yetmiş","seksen","doksan"),"")&
EĞER(TAMSAYI(A2)>=1000,ELEMAN(SOLDAN(SAĞDAN(TAMSAYI(A2),4),1)+1,"","","iki","üç","dört","beş","altı","yedi","sekiz","dokuz"),"")&
EĞER(TAMSAYI(A2)>1000,EĞER(VE(TAMSAYI(A2)>1999,SOLDAN(SAĞDAN(TAMSAYI(A2),4),1)="1"),"birbin","bin"),"")&
EĞER(TAMSAYI(A2)>=100,ELEMAN(SOLDAN(SAĞDAN(TAMSAYI(A2),3),1)+1,"","yüz","ikiyüz","üçyüz","dörtyüz","beşyüz","altıyüz","yediyüz","sekizyüz","dokuzyüz"),"")&
EĞER(TAMSAYI(A2)>=10,ELEMAN(SOLDAN(SAĞDAN(TAMSAYI(A2),2),1)+1,"","on","yirmi","otuz","kırk","elli","altmış","yetmiş","seksen","doksan"),"")&
ELEMAN(MOD(TAMSAYI(A2),10)+1,"","bir","iki","üç","dört","beş","altı","yedi","sekiz","dokuz")),"")="","",EĞERYOKSA(BÜYÜKHARF(EĞER(TAMSAYI(A2)>=10000000,ELEMAN(SOLDAN(SAĞDAN(TAMSAYI(A2),7),1)+1,"","birmilyon","ikimilyon","üçmilyon","dörtmilyon","beşmilyon","altımilyon","yedimilyon","sekizmilyon","dokuzmilyon"),"")&
EĞER(TAMSAYI(A2)>=100000,ELEMAN(SOLDAN(SAĞDAN(TAMSAYI(A2),6),1)+1,"","yüz","ikiyüz","üçyüz","dörtyüz","beşyüz","altıyüz","yediyüz","sekizyüz","dokuzyüz"),"")&
EĞER(TAMSAYI(A2)>=10000,ELEMAN(SOLDAN(SAĞDAN(TAMSAYI(A2),5),1)+1,"","on","yirmi","otuz","kırk","elli","altmış","yetmiş","seksen","doksan"),"")&
EĞER(TAMSAYI(A2)>=1000,ELEMAN(SOLDAN(SAĞDAN(TAMSAYI(A2),4),1)+1,"","","iki","üç","dört","beş","altı","yedi","sekiz","dokuz"),"")&
EĞER(TAMSAYI(A2)>1000,EĞER(VE(TAMSAYI(A2)>1999,SOLDAN(SAĞDAN(TAMSAYI(A2),4),1)="1"),"birbin","bin"),"")&
EĞER(TAMSAYI(A2)>=100,ELEMAN(SOLDAN(SAĞDAN(TAMSAYI(A2),3),1)+1,"","yüz","ikiyüz","üçyüz","dörtyüz","beşyüz","altıyüz","yediyüz","sekizyüz","dokuzyüz"),"")&
EĞER(TAMSAYI(A2)>=10,ELEMAN(SOLDAN(SAĞDAN(TAMSAYI(A2),2),1)+1,"","on","yirmi","otuz","kırk","elli","altmış","yetmiş","seksen","doksan"),"")&
ELEMAN(MOD(TAMSAYI(A2),10)+1,"","bir","iki","üç","dört","beş","altı","yedi","sekiz","dokuz")),"")&" LİRA ")&EĞER(EĞERHATA(BÜYÜKHARF(EĞER(TAMSAYI(PARÇAAL(A2,EĞER(EHATALIYSA(BUL(".",A2,1)),SAĞDAN(A2,1),BUL(".",A2,1))+1,2))>=10,ELEMAN(SOLDAN(SAĞDAN(TAMSAYI(PARÇAAL(A2,EĞER(EHATALIYSA(BUL(".",A2,1)),SAĞDAN(A2,1),BUL(".",A2,1))+1,2)),2),1)+1,"","on","yirmi","otuz","kırk","elli","altmış","yetmiş","seksen","doksan"),"")&
ELEMAN(MOD(TAMSAYI(PARÇAAL(A2,EĞER(EHATALIYSA(BUL(".",A2,1)),SAĞDAN(A2,1),BUL(".",A2,1))+1,2)),10)+1,"","bir","iki","üç","dört","beş","altı","yedi","sekiz","dokuz")),"")="","",EĞERHATA(BÜYÜKHARF(EĞER(TAMSAYI(PARÇAAL(A2,EĞER(EHATALIYSA(BUL(".",A2,1)),SAĞDAN(A2,1),BUL(".",A2,1))+1,2))>=10,ELEMAN(SOLDAN(SAĞDAN(TAMSAYI(PARÇAAL(A2,EĞER(EHATALIYSA(BUL(".",A2,1)),SAĞDAN(A2,1),BUL(".",A2,1))+1,2)),2),1)+1,"","on","yirmi","otuz","kırk","elli","altmış","yetmiş","seksen","doksan"),"")&
ELEMAN(MOD(TAMSAYI(PARÇAAL(A2,EĞER(EHATALIYSA(BUL(".",A2,1)),SAĞDAN(A2,1),BUL(".",A2,1))+1,2)),10)+1,"","bir","iki","üç","dört","beş","altı","yedi","sekiz","dokuz")),"")&" KURUŞ")
Üstteki 2 linkte aradığınızı bulamazsaniz bu linke bakiniz2. MESAJDA YAZILAN FORMÜL DEĞER 1000 olduğunda yanıtsız bırakıyor. Makro olmadan çözüm yollarını nasıl yapabiliriz