Как да конвертирате число в думи без VBA

Anonim

В предишната си статия бях обяснил как да преобразувам число в думи в Excel с помощта на VBA. Бях написал редица кодови редове, за да постигна това. Но никога не съм си представял, че можем да преобразуваме числа в думи, като използваме само формули на Excel. Но един от нашите потребители на Excelforum го направи. Никога не съм предполагал, че можем да преобразуваме числата в думи.

Тази формула се използва за преобразуване на число в американска валута. Тази формула може да преобразува числа от диапазон центове до милиарди. Числото може да има и два десетични знака.

Този потребител с Id HaroonSid написа луда формула. Формулата е дълга страница и ако сега ще я спомена тук, тя ще обхване целия пост. И така, споменах го в края на публикацията. Можете да изтеглите Excel файла по -долу, за да проверите формулата.

Число до думи

Формулата е твърде дълга за обяснение, но мога да обясня логиката. Тази формула определя колко дълго е числото. След това използва функцията CHOOSE, за да замести числата с думите. Но това не е толкова лесно. Тази формула идентифицира веднъж, десетки, стотици, хиляди, милиони и милиарди. Той идентифицира кой номер влиза в кой раздел. Друга сложност е тази. Числото 12 може да бъде едно или две в големи числа или дванадесет. Това добавя много сложност. Но този човек успя да реши тази сложност и да накара тази формула да работи ефективно.

Така че сега споменавам формулата. Тази формула се прилага за В2. Всяко число, написано на В2, ще бъде преобразувано в думи. Тази формула преобразува числата в долари в американска валута, но можете да я коригирате, за да конвертирате във всяка валута или единица, като просто намерите и замените „долари“ и „центове“. Например, ако искате да конвертирате числа в индийска рупия и Paise, просто намерете и заменете.

Така че задръжте стола си. Ето формулата.

Формула за преобразуване на число в думи:

= АКО (ИЛИ (ЛЕН (ЕТАЖ (B2,1)) = 13, ЕТАЖ (B2,1) 1, ИЗБЕРЕТЕ (СРЕД (ТЕКСТ (INT (B2), REPT (0,12)), 3,1) +1 , "", "-един", "-два", "-три", "-четири", "-пет", "-шест", "-седем", "-осем", "-девет"), АКО (СТОЙНОСТ (MID (ТЕКСТ (INT (B2), REPT (0,12)), 2,1)) = = 0, ИЗБЕРЕТЕ (MID (TEXT (INT (B2), REPT (0,12)), 3, 1) +1, "", "едно", "две", "три", "четири", "пет", "шест", "седем", "осем", "девет"), "")), АКО (B2> = 10^9, "милиард", ""), ИЗБЕРЕТЕ (СРЕД (ТЕКСТ (INT (B2), REPT (0,12)), 4,1) +1, "", "сто" , "двеста", "триста", "четиристотин", "петстотин", "шестстотин", "седемстотин", "осемстотин", "деветстотин"), ИЗБЕРИ (СРЕД (ТЕКСТ (INT (INT ( B2), REPT (0,12)), 5,1) +1, "", ИЗБЕРЕТЕ (MID (TEXT (INT (B2), REPT (0,12)), 6,1) +1, "ten" , "единадесет", "дванадесет", "тринадесет", "четиринадесет", "петнадесет", "шестнадесет", "седемнадесет", "осемнадесет", "деветнадесет"), "двадесет", "тридесет", "четиридесет", "петдесет", "шестдесет", "седемдесет", "осемдесет", "деветдесет"), IF (VALUE (MID (TEXT (INT (B2), REPT (0,12)), 5,1))> 1, ИЗБЕРЕТЕ (СРЕД (ТЕКСТ (INT (B2), REPT (0,12)), 6,1) +1, "", "-едно", "-две", "-три", "-четири", " -пет ","-шест ","-седем ","-осем ","-девет "), IF (ЗНАЧЕНИЕ (MID (ТЕКСТ (INT (B2), REPT) (0,12 )), 5,1)) = 0, ИЗБЕРЕТЕ (СРЕД (ТЕКСТ (INT (B2), REPT (0,12)), 6,1) +1, "", "едно", "две", "три "," четири "," пет "," шест "," седем "," осем "," девет ")," ")), IF (VALUE (MID (TEXT (INT (B2), REPT (0,12) )), 4,3))> 0, "милион", ""), ИЗБЕРЕТЕ (СРЕД (ТЕКСТ (INT (B2), REPT (0,12)), 7,1) +1, "", "един сто "," двеста "," триста "," четиристотин "," петстотин "," шестстотин "," седемстотин "," осемстотин "," деветстотин "), ИЗБЕРЕТЕ (СРЕД (ТЕКСТ ( INT (B2), REPT (0,12)), 8,1) +1, "", ИЗБЕРЕТЕ (MID (TEXT (INT (B2), REPT (0,12)), 9,1) +1, " десет "," единадесет "," дванадесет "," тринадесет "," четиринадесет "," петнадесет "," шестнадесет "," седемнадесет "," осемнадесет "," деветнадесет ")," двадесет "," тридесет "," четиридесет "," петдесет "," шестдесет "," седемдесет "," осемдесет "," деветдесет "), IF (VALUE (MID (TEXT (INT (B2), REPT (0,12)), 8,1))>> 1, ИЗБЕРЕТЕ (СРЕД (ТЕКСТ (INT (B2), REPT (0,12)), 9,1) +1, "", "-едно", "-две", "-три", "-четири" , "-пет", "-шест", "-седем", "-осем", "-девет"), IF (VALUE (MID (TEXT (INT (B2), REPT (0,12)), 8, 1)) = 0, ИЗБЕРЕТЕ (СРЕД (ТЕКСТ (INT (B2), REPT (0,12)), 9,1) +1, "", "едно", "две", "три", "четири" , "пет", "шест", "седем", "осем", "девет"), "")), IF (VALUE (MID (TEXT (INT (B2), REPT (0,1) 2)), 7,3)), "хиляда", ""), ИЗБЕРЕТЕ (СРЕД (ТЕКСТ (INT (B2), REPT (0,12)), 10,1) +1, "", "сто "," двеста "," триста "," четиристотин "," петстотин "," шестстотин "," седемстотин "," осемстотин "," деветстотин "), ИЗБЕРИ (СРЕД (ТЕКСТ (INT (B2), REPT (0,12)), 11,1) +1, "", ИЗБЕРЕТЕ (СРЕД (TEXT (INT (B2), REPT (0,12)), 12,1) +1, "десет "," единадесет "," дванадесет "," тринадесет "," четиринадесет "," петнадесет "," шестнадесет "," седемнадесет "," осемнадесет "," деветнадесет ")," двадесет "," тридесет "," четиридесет " , "петдесет", "шестдесет", "седемдесет", "осемдесет", "деветдесет"), IF (VALUE (MID (TEXT (INT (B2), REPT (0,12)), 11,1))> 1 , ИЗБЕРЕТЕ (СРЕД (ТЕКСТ (INT (B2), REPT (0,12)), 12,1) +1, "", "-едно", "-две", "-три", "-четири", "-пять", "-шест", "-седем", "-осем", "-девет"), IF (ЗНАЧЕНИЕ (СРЕДНА (ТЕКСТ (INT (B2), REPT (0,12)), 11,1 )) = 0, ИЗБЕРЕТЕ (СРЕД (ТЕКСТ (INT (B2), REPT (0,12)), 12,1) +1, "", "едно", "две", "три", "четири", "пет", "шест", "седем", "осем", "девет"), ""))), "", "") & АКО (ЕТАЖ (B2,1)> 1, "долари", "долар ")) & IF (ISERROR (FIND (". ", B2,1))," "," и "& PROPER (IF (LEN (НАЛЯВО (TRIM (MID (SUBSTITUTE (Sheet1! B2,". " ", 255)), 255,200)), 2)) = 1, ИЗБЕРЕТЕ (1*НАЛЯВО (T RIM (СРЕД (ЗАМЕСТНИК (Лист1! B2, ".", REPT ("", 255)), 255,200)), 2), "десет", "двадесет", "тридесет", "четиридесет", "петдесет", "шестдесет", "седемдесет", "осемдесет", "деветдесет") & "центове", "") & КОНЦАТЕНТ (ИЗБЕРИ (СРЕД (ТЕКСТ (ИНТ. REPT ("", 255)), 255,200)), 2)), REPT (0,12)), 11,1) +1, "", ИЗБЕРЕТЕ (MID (TEXT (INT (LEFT (TRIM (MID (SUBSTITUTE) (Лист1! B2, ".", REPT ("", 255)), 255,200)), 2)), REPT (0,12)), 12,1) +1, "десет", "единадесет", " дванадесет "," тринадесет "," четиринадесет "," петнадесет "," шестнадесет "," седемнадесет "," осемнадесет "," деветнадесет ") &" центове "," двадесет "," тридесет "," четиридесет "," петдесет "," шестдесет "," седемдесет "," осемдесет "," деветдесет "), IF (VALUE (MID (TEXT (INT (НАЛЯВО (TRIM (MID (SUBSTITUTE) (Sheet1! B2,". ",", ", 255)), 255,200)), 2)), REPT (0,12)), 11,1))> 1, ИЗБЕРЕТЕ (MID (ТЕКСТ (INT (НАЛЯВО (TRIM (MID (SUBSTITUTE) (Лист1! B2, ")) ", REPT (" ", 255)), 255,200)), 2)), REPT (0,12)), 12,1) +1," ","-едно ","-две ","-три ","-четири ","-пет ","-шест ","-седем ","-осем ","-девет ") и" цента ", АКО (НАЛЯВО (TRIM (MID (SUBSTITUTE (Sheet1! B2 , "" "", 255)), 255,200)), 1) = "0", ИЗБЕРЕТЕ (MID (TEXT (INT (НАЛЯВО (TRIM (MID (SUBSTITUTE) (Sheet1! B2, ".", REPT (25), 255)) , 255,200)), 2)), REPT (0,12)), 12,1) +1, "", "едно", "две", "три", "четири", "пет", "шест" , "седем", "осем", "девет") & "цента", ""))))))))

Така че да, това е формулата. Харесва ли Ви? Надявам се да ви е от полза. Ако не искате да използвате това, използвайте метода VBA, за да преобразувате числата в думи. Ако имате някакви съмнения относно тази статия или ако имате други въпроси, свързани с Excel, задайте това и в секцията за коментари по -долу.

Как да конвертирате число в думи в Excel в рупии : Можем да създадем персонализирана формула на Excel за преобразуване на числа в думи в индийски рупии. Създадох тази персонализирана функция за преобразуване на числа в думи от гледна точка на индийски рупии. Можете да изтеглите файла с макроси

13 Методи за ускоряване на Excel | Excel е достатъчно бърз, за ​​да изчисли 6,6 милиона формули за 1 секунда при идеални условия с компютър с нормална конфигурация. Но понякога наблюдаваме Excel файлове, които правят изчисления по -бавно от охлювите. Има много причини зад това по -бавно представяне. Ако можем да ги идентифицираме, можем да накараме нашите формули да се изчислят по -бързо.

Центрирайте Excel лист хоризонтално и вертикално на страницата на Excel : Microsoft Excel ви позволява да подравнявате работен лист на страница, можете да променяте полета, да задавате персонализирани полета или да центрирате работния лист хоризонтално или вертикално на страницата. Полетата на страницата са празните пространства между данните на работния лист и ръбовете на отпечатаната страница

Разделяне на клетка по диагонал в Microsoft Excel 2016 : За да разделим клетки по диагонал, използваме форматирането на клетката и вмъкваме диагонално разделяща линия в клетката. Това визуално разделя клетките по диагонал.

Как да вмъкна отметка в Excel 2016 : За да поставим отметка в Excel Cell, използваме символите в Excel. Задайте шрифтовете на крила и използвайте формулата Char (252), за да получите символа на отметка.

Как да деактивирате Scroll Lock в Excel : Клавишите със стрелки в Excel преместват клетката ви нагоре, надолу, наляво и надясно. Но тази функция е приложима само когато Scroll Lock в Excel е деактивиран. Scroll Lock в Excel се използва за превъртане нагоре, надолу, наляво и надясно на вашия работен лист, а не на клетката. Така че тази статия ще ви помогне как да проверите състоянието на заключване на превъртането и как да го деактивирате?

Какво да направите, ако връзките на Excel не работят : Когато работим с няколко Excel файла и използваме формула, за да свършим работата, умишлено или неволно създаваме връзки между различни файлове. Нормалните връзки с формули могат лесно да бъдат прекъснати, като използвате опцията за прекъсване на връзки.

Популярни статии:

50 преки пътища в Excel за повишаване на вашата производителност | Бъдете по -бързи в задачата си. Тези 50 преки пътища ще ви накарат да работите още по -бързо в Excel.

Как да използвате функцията Excel VLOOKUP| Това е една от най -използваните и популярни функции на excel, която се използва за търсене на стойност от различни диапазони и листове.

Как да използвате Excel COUNTIF функция| Пребройте стойностите с условия, използвайки тази невероятна функция. Не е необходимо да филтрирате данните си, за да преброите конкретна стойност. Функцията Countif е от съществено значение за подготовката на вашето табло.

Как да използвате функцията SUMIF в Excel | Това е друга основна функция на таблото. Това ви помага да обобщите стойностите при конкретни условия.