Bir önceki yazımda VBA kullanarak Excel'de bir sayıyı kelimelere çevirmeyi anlatmıştım. Bunu başarmak için birkaç kod satırı yazmıştım. Ama sadece excel formüllerini kullanarak sayıları kelimelere çevirebileceğimizi hiç hayal etmemiştim. Ama Excelforum kullanıcılarımızdan biri yaptı. Sayıları kelimelere çevirebileceğimizi hiç hayal etmemiştim.
Bu formül, bir sayıyı Amerikan para birimine dönüştürmek için kullanılır. Bu formül, sayıları aralık sentlerinden milyarlara dönüştürebilir. Sayının iki ondalık basamağı da olabilir.
Id HaroonSid ile bu kullanıcı çılgın bir formül yazdı. Formül bir sayfa uzunluğunda ve şimdi burada bahsedersem yazının tamamını kapsayacaktır. O yüzden yazının sonunda belirttim. Formülü kontrol etmek için aşağıdaki excel dosyasını indirebilirsiniz.
Kelimelere Sayı
Formül açıklamak için çok uzun ama mantığı açıklayabilirim. Bu formül, sayının ne kadar uzun olduğunu belirler. Ardından, sayıları sözcüklerle değiştirmek için SEÇ işlevini kullanır. Ama bu o kadar kolay değil. Bu formül bir, onlarca, yüzlerce, binlerce, milyonlarca ve milyarlarca ifade eder. Hangi numaranın hangi bölüme geldiğini belirler. Başka bir karmaşıklık da şudur. 12 sayısı, büyük sayılarda bir veya iki veya Oniki olabilir. Bu, çok fazla karmaşıklığa neden olur. Ama bu adam bu karmaşıklığı çözebildi ve bu formülün verimli çalışmasını sağladı.
Şimdi formülden bahsediyorum. Bu formül B2 için geçerlidir. B2'de yazılan herhangi bir sayı kelimelere dönüştürülecektir. Bu formül, sayıları Amerikan para birimi dolarına dönüştürür, ancak sadece "Dolar" ve "Sent"i bulup değiştirerek herhangi bir para birimine veya birime dönüştürmek için ayarlayabilirsiniz. Örneğin, sayıları Hint Rupisi ve Paise'ye dönüştürmek istiyorsanız, sadece bulun ve değiştirin.
O yüzden sandalyeni tut. İşte formül.
Sayıyı Kelimelere Dönüştürme Formülü:
| =EĞER(VEYA(UZUNLUK(KAT(B2,1))=13,FLOOR(B2,1)1,SEÇ(ORTA(METİN(INT(B2),REPT(0,12)),3,1)+1 ,"","-bir","-iki","-üç","-dört","-beş","-altı","-yedi","-sekiz","-dokuz"), EĞER(DEĞER(ORTA(METİN(INT(B2),REPT(0,12)),2,1))=0,SEÇ(ORTA(METİN(INT(B2),REPT(0,12)),3, 1)+1,"","bir","iki","üç","dört","beş","altı","yedi","sekiz","dokuz"),"")), EĞER(B2>=10^9," milyar ",""),SEÇ(ORTA(METİN(INT(B2),REPT(0,12)),4,1)+1,"","yüz " ,"iki yüz ","üç yüz ","dört yüz ","beş yüz "," altı yüz ","yedi yüz ","sekiz yüz ","dokuz yüz "),SEÇ(ORTA(METİN(INT( B2),REPT(0,12)),5,1)+1,"",SEÇ(ORTA(METİN(INT(B2),REPT(0,12)),6,1)+1,"on" ,"onbir","oniki","onüç","ondört","onbeş","onaltı","onyedi","onsekiz","ondokuz"), "yirmi","otuz","kırk", "elli","altmış","yetmiş","seksen","doksan"),EĞER(DEĞER(ORTA(METİN(INT(B2),REPT(0,12)),5,1))>1, SEÇ(ORTA(METİN(INT(B2),REPT(0,12)),6,1)+1,"","-bir","-iki","-üç","-dört"," -beş","-six","-yedi","-sekiz","-dokuz"),EĞER(DEĞER(ORTA(METİN(INT(B2)),REPT(0,12); )),5,1))=0,SEÇ(ORTA(METİN(INT(B2),REPT(0,12)),6,1)+1,"","bir","iki","üç ","dört","beş","altı","yedi","sekiz","dokuz"),"")),EĞER(DEĞER(ORTA(METİN(INT(B2)),YİNELE(0,12)), ))),4,3))>0," milyon ",""),CHOOSE(ORTA(METİN(INT(B2),REPT(0,12)),7,1)+1,"","bir yüz "," iki yüz "," üç yüz "," dört yüz "," beş yüz "," altı yüz "," yedi yüz "," sekiz yüz "," dokuz yüz "),SEÇ(ORTA(METİN( INT(B2),REPT(0,12)),8,1)+1,"",SEÇ(ORTA(METİN(INT(B2),REPT(0,12)),9,1)+1," on","onbir","oniki","onüç","ondört","onbeş","onaltı","onyedi","onsekiz","ondokuz"), "yirmi","otuz","kırk ","elli","altmış","yetmiş","seksen","doksan"),EĞER(DEĞER(ORTA(METİN(INT(B2),REPT(0,12)),8,1))> 1,SEÇ(ORTA(METİN(INT(B2),REPT(0,12)),9,1)+1,"","-bir","-iki","-üç","-dört" ,"-beş","-altı","-yedi","-sekiz","-dokuz"),EĞER(DEĞER(ORTA(METİN(INT(B2),REPT(0,12)),8, 1))=0,SEÇ(ORTA(METİN(INT(B2),REPT(0,12)),9,1)+1,"","bir","iki","üç","dört" ,"beş","altı","yedi","sekiz","dokuz"),"")),EĞER(DEĞER(ORTA(METİN(INT(B2)),YİNE(0,1)); 2)),7,3))," bin ",""),CHOOSE(MID(INT(INT(B2),REPT(0,12)),10,1)+1,"","yüz ","iki yüz ","üç yüz ","dört yüz ","beş yüz "," altı yüz ","yedi yüz ","sekiz yüz ","dokuz yüz "),SEÇ(ORTA(METİN(INT) (B2),REPT(0,12)),11,1)+1,"",CHOOSE(MID(TEXT(INT(B2),REPT(0,12)),12,1)+1,"on ","onbir","oniki","onüç","ondört","onbeş","onaltı","onyedi","onsekiz","ondokuz"), "yirmi","otuz","kırk" ,"elli","altmış","yetmiş","seksen","doksan"),EĞER(DEĞER(ORTA(METİN(INT(B2),REPT(0,12)),11,1))>1 ,SEÇ(ORTA(METİN(INT(B2),REPT(0,12)),12,1)+1,"","-bir","-iki","-üç","-dört", "-beş","-six","-yedi","-sekiz","-dokuz"),EĞER(DEĞER(ORTA(METİN(INT(B2),REPT(0,12)),11,1) ))=0,SEÇ(ORTA(METİN(INT(B2),REPT(0,12)),12,1)+1,"","bir","iki","üç","dört", "beş", "altı", "yedi", "sekiz", "dokuz"),"")))," "," ")&EĞER(KAT(B2,1)>1," dolar"," dolar "))&EĞER(EĞERHATA(BUL(".",B2,1)),""," ve "&UYGUN(EĞER(UZUNLUK(SOL(KES(ORTA(YİNE DEĞİŞTİR(Sayfa1!B2,".);)),REPT(" ",255)),255,200)),2))=1,SEÇİM(1*SOL(T) RIM(ORTA(YEDEK(Sayfa1!B2,".",REPT(" ",255)),255,200))2)),"on","yirmi","otuz","kırk","elli", "altmış","yetmiş","seksen","doksan")&" sent","")&BİRLEŞTİR(SEÇ(ORTA(METİN(INT(SOL(KES(ORTA(YEDEK(Sayfa1!B2,");)) REPT(" ",255)),255,200)),2)),REPT(0,12)),11,1)+1,"",CHOOSE(ORTA(METİN(INT(SOL(ORTA(ORTA(YİNE DEĞİŞTİR)) (Sayfa1!B2,".",REPT(" ",255)),255,200)),2)),REPT(0,12)),12,1)+1,"ten","onbir"," on iki","on üç","ondört","onbeş","onaltı","onyedi","onsekiz","ondokuz")&" sent","yirmi","otuz","kırk","elli ","altmış","yetmiş","seksen","doksan"),EĞER(DEĞER(ORTA(METİN(INT(SOL(KES(ORTA(SBSTITUTE(Sayfa1!B2,"")),YİNEP(" ", 255),255,200)),2)),REPT(0,12)),11,1))>1,SEÇ(ORTA(METİN(INT(SOL(KES(ORTA(YİNE DEĞİŞTİR(Sayfa1!B2), ". ",REPT(" ",255)),255,200)),2)),REPT(0,12)),12,1)+1,"","-bir","-iki","-üç ","-dört","-beş","-six","-yedi","-sekiz","-dokuz")&" sent",EĞER(SOL(ORTA(ORTA(YERİNE GEÇİŞ(Sayfa1!B2))) ,".",REPT(" ",255)),255,200)),2)="01","bir kuruş",IF(LEFT(KIRMA(ORTA(YERİNEKTİR(Sayfa1!B2,".",REPT( " ",255)),255,200))),1)="0",SEÇİM(ORTA(METİN(INT(SOL(KES(ORTA(YİNE DEĞİŞTİR(Sayfa1!B2,".",REPT(" ",255)))) ,255,200)),2)),REPT(0,12)),12,1)+1,"","bir"","iki","üç","dört","beş","altı" ,"yedi","sekiz","dokuz")&" sent","")))))) |
Yani evet, formül bu. Beğendiniz mi? Umarım işinize yarar. Bunu kullanmak istemiyorsanız, sayıları kelimelere dönüştürmek için VBA yöntemini kullanın. Bu makaleyle ilgili herhangi bir şüpheniz varsa veya Excel ile ilgili başka sorularınız varsa, aşağıdaki yorumlar bölümünde bunu da sorun.
Excel'de Rupi Olarak Sayıları Kelimelere Dönüştürme : Sayıları Hint rupilerinde kelimelere dönüştürmek için özel bir Excel formülü oluşturabiliriz. Sayıları Hint rupileri cinsinden kelimelere dönüştürmek için bu özel işlevi yarattım. Makro dosyasını indirebilirsiniz
Excel'i Hızlandırmanın 13 Yöntemi | Excel, normal konfigürasyonlu PC ile İdeal koşullarda 1 saniyede 6,6 milyon formülü hesaplayacak kadar hızlıdır. Ancak bazen excel dosyalarının salyangozlardan daha yavaş hesaplama yaptığını gözlemliyoruz. Bu yavaş performansın arkasında birçok neden var. Bunları tespit edebilirsek formüllerimizin daha hızlı hesaplanmasını sağlayabiliriz.
Excel Sayfasını Excel Sayfasında Yatay ve Dikey Olarak Ortala : Microsoft Excel, bir sayfada çalışma sayfasını hizalamanıza, kenar boşluklarını değiştirmenize, özel kenar boşlukları belirlemenize veya çalışma sayfasını sayfada yatay veya dikey olarak ortalamanıza olanak tanır. Sayfa kenar boşlukları, çalışma sayfası verileri ile yazdırılan sayfanın kenarları arasındaki boşluklardır.
Microsoft Excel 2016'da Hücreyi Çapraz Bölme : Hücreleri çapraz olarak bölmek için hücre biçimlendirmesini kullanırız ve hücreye çapraz olarak bir bölme çizgisi ekleriz. Bu, hücreleri çapraz olarak görsel olarak ayırır.
Excel 2016'da Nasıl Onay İşareti Eklerim? : Excel Hücresine bir onay işareti eklemek için Excel'deki sembolleri kullanırız. Yazı tiplerini kanatlara ayarlayın ve bir onay işaretinin sembolünü elde etmek için Char(252) formülünü kullanın.
Excel'de Kaydırma Kilidi nasıl devre dışı bırakılır : Excel'deki ok tuşları hücrenizi yukarı, aşağı, Sol ve Sağa hareket ettirir. Ancak bu özellik yalnızca Excel'de Kaydırma Kilidi devre dışı bırakıldığında geçerlidir. Excel'de Scroll Lock, hücreyi değil, çalışma sayfanızı yukarı, aşağı, sola ve sağa kaydırmak için kullanılır. Bu makale kaydırma kilidi durumunu nasıl kontrol edeceğinize ve nasıl devre dışı bırakacağınıza yardımcı olacak?
Excel Break Bağlantıları Çalışmıyorsa Ne Yapmalı? : Birkaç excel dosyasıyla çalıştığımızda ve işi halletmek için formül kullandığımızda, kasıtlı veya kasıtsız olarak farklı dosyalar arasında bağlantılar oluştururuz. Normal formül bağlantıları, bağlantıları kopar seçeneği kullanılarak kolayca kırılabilir.
Popüler Makaleler:
Verimliliğinizi Artıracak 50 Excel Kısayolu | Görevinizde daha hızlı olun. Bu 50 kısayol, Excel'de daha da hızlı çalışmanızı sağlayacaktır.
Excel DÜŞEYARA İşlevi nasıl kullanılır?| Bu, farklı aralıklardan ve sayfalardan değer aramak için kullanılan excel'in en çok kullanılan ve popüler işlevlerinden biridir.
Excel nasıl kullanılır EĞERSAY İşlevi| Bu şaşırtıcı işlevi kullanarak değerleri koşullarla sayın. Belirli bir değeri saymak için verilerinizi filtrelemeniz gerekmez. Gösterge tablonuzu hazırlamak için Countif işlevi gereklidir.
Excel'de SUMIF İşlevi Nasıl Kullanılır | Bu, başka bir gösterge panosu temel işlevidir. Bu, belirli koşullardaki değerleri özetlemenize yardımcı olur.