Сумма прописью в excel 2010 просто!

Прописать формулу для суммы прописью

​ формула будет продолжать​​) в текст:​ например: четыреста сорок​.​ IBM.​: Да похоже, что​1. Работают до​Самойленко Михаил сдал​RAN​ единицы If Mid(SumInt,​​ txt = txt​

​ = «девятьсот «:​​ = «тринадцать «:​ Select End If​ 1) Case «4»:​ Десятки(Mid(strЧисло, Поз +​ decmil_txt & mil_txt​ работать, не смотря​

​=СЖПРОБЕЛЫ(​​ четыре руб. 00​Для того, чтобы проверить​Сам такую в​ от версии Офиса​ 999 трлн.​

​ сдал сдал​​: Вообще-то я про​ shag — 1,​ & Edinicy(vl) &​​ tys(9) = «тысяч​ EdinicyPoslednie(13) = IIf(Valuta​​ End Function​​ Десятки = «сорок​

​ 1, 2), «м»)​​ & sottys_txt &​ на то, что​ИНДЕКС(Миллионы;ОСТАТ(ОТБР(B6/1000000);1000000)+1)&» «&​ коп.​

​ как работает только​​ свое время написал​ как раз и​2. Делают первую​​Сандюк Валерий сдал​ поиск по сайту​ 1) 1​

​ mln(vl) ‘числа в​​ «: mln(9) =​ = 0, «тринадцать​​Можно написать алгоритм макро​ «: n =​ strМиллиарды = strМиллиарды​ dectys_txt & tys_txt​ Личная книга макросов​ИНДЕКС(Тысячи;ОСТАТ(ОТБР(B6/1000);1000)+1)&» «&​Иногда требуется записать число​

​ что установленная надстройка​​ на Паскале :-)​ не зависит.​​ букву прописной, остальные​

​ сдал сдал​​ говорил. Кнопочка между​

​ Or Mid(SumInt, shag​​ диапозоне от 11​​ «миллионов «: mlrd(9)​​ евро», IIf(Valuta =​ программы по-другому и​ Right(n, 1) Case​ & ИмяРазряда(strМиллиарды, Mid(strЧисло,​ & sot_txt &​ не пересылалась, т.е.​​ИНДЕКС(Единицы;ОСТАТ(B6;1000)+1))​​ прописью: 256 записать​ пишем в любой​​Skip​МСН проверял Ваш​ строчные.​Сурженко Александр не​ «Главная» и «Правила».​ — 1, 2)​​ до 19 склоняются​​ = «миллиардов «​

​ 1, «тринадцать рублей»,​​ еще сделать так,​​ «5»: Десятки =​ Поз + 1,​ dec_txt & ed_txt​

​ Ваши коллеги получившие​​Задача в принципе решена,​​ как двести пятьдесят​ свободной ячейке листа​​: Сумма прописью​ файл на 2010,​

​3. Округляют до​​ сдал сдал сдал​MCH​​ = «10» Then​​ на «мільярдов» независимо​​ ‘——————————————— On Error​ «тринадцать долларов»)) Edinicy(14)​ чтобы она дописывала​​ «пятьдесят «: n​ 2), «миллиард «,​ End Function ‘вспомогательная​ файл, смогут с​ осталось только разместить​

​ шесть. Набирать этот​​ произвольное число. Выделяем​Ниже вы найдете​ я — на​ целых копеек.​Швец Алена сдал​: Кстати, Сумма прописью​ vl = Mid(SumInt,​ от последнего числа​

​ Resume Next SumInt​​ = «четырнадцать «:​ валюту суммы прописью.​ = Right(n, 1)​

​ «миллиарда «, «миллиардов​​ функция для выделения​​ ним работать как​ вспомогательные диапазоны в​ текст безумно скучно,​​ любую другую ячейку.​ готовую пользовательскую функцию​ 2003. Результат одинаковый​4. Функции получились​​ сдал сдал​ из указанной ссылки​ shag, 1) Else​ триады Else txt​​ = Int(SumBase) For​​ EdinicyPoslednie(14) = IIf(Valuta​ Для этого создайте​​ Case «6»: Десятки​ «) ‘Миллионы’ Поз​​ из числа разрядов​ Вы.​​ Личную книгу макросов​ кроме того легко​​ Кликаем по значку​ на VBA, которая​​ — на листе​ относительно небольшими по​​Ющенко Мария сдал​ не корректна​​ vl = Mid(SumInt,​

​ = txt &​​ x = Len(SumInt)​ = 0, «четырнадцать​​ Module2 и введите​ = «шестьдесят «:​

excelworld.ru>

С помощью пользовательской функции

      Как мой взгляд, это самое оптимальное и простое, относительно конечно, решение поставленного вопроса. Вы просто включаете функцию и пользуетесь ее с удовольствием.

     Для этого вам необходимо выполнить некоторые действия. Сначала скачиваете файл надстройки здесь. После, переносите его в папку AddIns, которую можно найти по пути C:\Documents and Settings\User\Application Data\Microsoft\AddIns, только вы вместо «User» подставляете имя вашего пользователя Windows. Еще может возникнуть проблема в отображении папки «Application Data», она может быть скрыта, тогда вам в настройках «Свойства папки» нужно активировать пункт «Показать скрытые файлы и папки».       Теперь собственно и приступим к включении этой надстройки. В Excel выбираем «Файл» — «Параметры» — «Надстройки».       В диалоговом окне «Настройки» ставим галочку напротив включаемой надстройки «Сумма Прописью» и нажимаем «ОК».     Следующим шагом, ставим курсор на нужную ячейку и вызываем «Мастер функций». В разделе «Категория» выбираем пункт «Определенные пользователем» и теперь весть список встроенных функций по написанию сумм прописью нам доступен. Кстати как видите, доступен даже выбор функций в разрезе валют. Сразу замечу, что надстроек бывает много, есть и более расширенные, но эта меня полностью устраивает, вот я ее и описываю.       В результате мы получаем возможность получить следующие данные:

Надстройка: сумма прописью в Excel

В большинстве случаев ее использование в качестве надстройки наиболее удобно, хотя иногда возникают проблемы подключения надстройки. Нужно поместить полученный файл sumprop.xla в папку, в которой хранятся дополнительные надстройки. Конкретный путь к этой папке зависит от версии Excel, но скорее всего он будет похожим на этот:

C:\Documents and Settings\User\Application Data\Microsoft\AddIns

где: вместо User следует подставить имя пользователя Windows.

Дополнительное неудобство вызывается тем, что папка Application Data может быть скрыта, то есть не видна при просмотре в проводнике Windows.

Проще всего для размещения скачанного файла в нужной папке нужно:

  1. Выбрать в Excel команду меню Сервис — Надстройки и в появившемся диалоге нажать кнопку Обзор. Будет открыт диалог выбора файла с надстройкой, причем текущей окажется нужная вам папка.
  2. Запустите проводник Windows и перейдите в нем к папке, в которой находится скачанный ранее из интернета файл. Перетащите с помощью мыши значок файла из окна проводника в открытый диалог. Теперь файл с нужной надстройкой находится в нужной папке.
  3. Щелкните на нем мышью и нажмите кнопку OK, чтобы закрыть диалог. В списке доступных надстроек должна появиться строка Сумма Прописью.
  4. Установите флажок рядом с этой строкой и нажмите кнопку OK,
  5. После чего вы сможете использовать функцию печати суммы прописью в Excel.

Число прописью в Excel (динамический вариант)

​ адрес любой ячейки.​ подобным образом нужно​ Excel’ем​MCH​Особенности:​выдаёт результат в​ 2)в параметре второй​ Then If (Mid(SumInt,​ 1) If shag​ = 0, «девятнадцать​

​ EdinicyPoslednie(1) = IIf(Valuta​ = «два «​ If strМиллиарды &​) или просто набрав​ «, «четыре «,​ создана, то через​ то вроде =ЧислоПрописью(А1)​ Это делается либо​ заполнить не одно,​Вам тогда не​: Сумма прописью на​

​1. Без макросов.​ рублях и копейках.​ функции «ЧислоПрописьюВалюта» то​ shag — 2,​ > 1 Then​ евро», IIf(Valuta =​

  • ​ = 0, «один​ Case «ж»: Двадцатка​
  • ​ strМиллионы & strТысячи​ ее в ячейке​ «пять «, «шесть​ меню Вид/ Окно/​
  • ​ и получить результат.​ путем ручной записи​ а много документов,​
  • ​ в этот раздел,​ таджикском языке​ Пропись реализована формулой​Насколько я смог​ функция автоматически подставит​

​ 1) = 0​ If Mid(SumInt, shag​ 1, «девятнадцать рублей»,​ евро», IIf(Valuta =​ = «две «​ & strЕдиницы =​ вручную и указав​ «, «семь «,​ Отобразить отобразите ее,​ Все промежуточные вычисления​ координат этой ячейки,​

​ то временные потери​ а в «Другие​Реализовано формулой и​ с использованием имен.​

  • ​ уследить за темой​ нужную валюту в​ And Mid(SumInt, shag​ — 1, 1)​ «девятнадцать долларов»)) »———————————————​
  • ​ 1, «один рубль»,​ Case «с»: Двадцатка​ «» Then strЕдиницы​ в качестве аргумента​ «восемь «, «девять​ скопируйте в нее​
  • ​ должны быть «за​ либо простым кликом​ становятся огромными. Кроме​ приложения», где о​ два варианта UDF​2. Не привязана​ числа прописью, максимально​ сумме прописью:​ — 1, 1)​ = 1 Then​ Desyatki(0) = «»:​ «один доллар»)) Edinicy(2)​

​ = «Два «​ = «ноль «​ ячейку с суммой:​​ «) Nums2 =​​ лист Служ, сохраните​ кадром». Но, создание​​ по ней в​​ того, именно в​ всяких Опен-Дроид- и​

​MCH​ к диапазонам, можно​

​ верная формула на​1-рубли;​ = 0 And​ txt = txt​ Sotni(0) = «»:​ = «два «:​

​ End Select Case​ ‘strЕдиницы = strЕдиницы​Если вам необходимо добавить​ Array(«», «десять «,​ Личную книгу макросов​ пользовательских функций это​ то время, когда​ записи суммы прописью​ прочих Офисах проблемы​

​: Сумма прописью на​ легко копировать/переносить, в​ данный момент эта.​​2-доллары;​​ vl = «0»)​​ & Edinicy(Mid(SumInt, shag​​ tys(0) = «тисячь​​ EdinicyPoslednie(2) = IIf(Valuta​​ «3»: Двадцатка =​

​ & ИмяРазряда(» «,​ к полученному тексту​ «двадцать «, «тридцать​ (можно ее потом​ прерогатива VBA.​ курсор находится в​ наиболее часто встречаются​ и обсуждают.​ туркменском, азербайджанском (кириллицей​

​ т.ч. и в​ Созданная умнейшим​0-евро;​ Then GoTo 10​ — 1, 2))​ «: mln(0) =​ = 0, «два​ «три » Case​ Mid(strЧисло, Поз +​ копейки, то можно​ «, «сорок «,​

​ скрыть Вид/ Окно/​Тем не менее, можно​ поле параметра​ грамматические ошибки. Давайте​EvgeniyaD​ и латиницей) и​ другие книги.​MCH​Как видите, этот VBA-код​ End If Sclon_Tys​ & «мільярдів «​

​ «миллионов «: mlrd(0)​ евро», IIf(Valuta =​ «4»: Двадцатка =​ 1, 2), «рубль​ воспользоваться чуть более​ «пятьдесят «, «шестьдесят​ Скрыть).​ предложить следующее решение​«Сумма»​ выясним, как сделать​: Alex_ST, Pelena права,​

​ турецком языках​​3. Работает до​.​​ макроса преобразует числа​ = Edinicy(vl) &​​ Else txt =​​ = «миллиардов «​ 1, «два рубля»,​​ «четыре » Case​​ «, «рубля «,​​ сложной конструкцией:​​ «, «семьдесят «,​Теперь откройте​ с помощью обычных​

​. Жмем на кнопку​ так, чтобы числа​ у тех, для​Функция на турецком​ 999 млрд. руб.​bav​ в слова. После​

​ tys(vl) ‘ -​ txt & Edinicy(vl)​ Desyatki(1) = «десять​ «два доллара»)) Edinicy(3)​

  • ​ «5»: Двадцатка =​​ «рублей «) ‘Сотые’​​ =СУММАПРОПИСЬЮ(A3)&» руб. «&ТЕКСТ((A3-ЦЕЛОЕ(A3))*100;»00″)&» коп.» ​
  • ​ _ «восемьдесят «,​книгу, в которой нужно​ формул:​«OK»​
  • ​ прописью вносились автоматически.​ кого я это​
  • ​ реализована не полностью​
  • ​4. Делает первую​​: добавь надстройку: MYXAS32.XLL​​ вставки данного кода​
  • ​ вводим переменную Sclon_Tys​​ & mlrd(vl) ‘числа​​ «: Sotni(1) =​ = «три «:​

​ «пять » Case​​ ‘strСотые = strКопейки​​=СУММАПРОПИСЬЮ(A3)&» руб. «&TEXT((A3-INT(A3))*100;»00″)&» коп.»​ «девяносто «) Nums3​ записать число прописью​разместить в Личной книге​.​Скачать последнюю версию​ делаю, к сожалению,​ (отсутствуют копейки)​ букву прописной, остальные​

​и пропиши формулу:​ в модуль редактора​ из-за иного склонения​ в диапозоне от​ «сто «: tys(1)​ EdinicyPoslednie(3) = IIf(Valuta​ «6»: Двадцатка =​ & » «​Тогда, например, для числа​ = Array(«», «сто​. Исходное число разместите,​

excel2.ru>

Цифры прописью в Excel

Для замены цифр прописью в Excel потребуется воспользоваться дополнительной надстройкой, но не стоит пугаться, если вы ничего в этом не понимаете. Читайте и делайте согласно инструкции, и все у вас получится.

Интересно. Как сделать подобное в Word читайте здесь.

Число прописью в Экселе. Установка

Как правило, необходимость конвертировать цифры в текст возникает в различных бухгалтерских и платежных документах, поэтому радует и наличие возможности выбора основных валют (рубли, доллары и евро).

Довольно лирики, давайте приступим и подробно разберемся, как написать число прописью.

Делаем в следующем порядке:

1. Скачиваем и распаковываем файл кликнув здесь.

2. Закиньте файл NUMSTR.XLA в папку Library, которая находится C:ProgramFiles (x86)MicrosoftOfficeOffice14Library (возможно расположение немного отличается, зависит от версий ПО).

3. Запустите Excel и на вкладке «Разработчик» кликните по кнопке «Надстройки» ( если ее нет, читайте ниже ).

Внимание. Если нет вкладки «Разработчик», пройдите Файл → Параметры → Настройка ленты и установите галку напротив пункта «Разработчик»

4. В окне «Надстройки» отметьте пункт NumStrAdd-in и нажмите ОК.

Усё можно пользоваться.

Число прописью в Excel. Как пользоваться

Расширение установлено, теперь несколько слов как использовать:

5. Для примера напишите в произвольной ячейке число цифрами.

6. Кликните по кнопке «Вставить Функцию».

7. В открывшемся окне «Мастер функций» в списке «Категория» выберите «Определенные пользователем».

8. После этого выберите необходимую функцию:

NumStr – отобразит цифры буквами в Excel;

RubStr — преобразует число прописью в рублях;

USDStr – конвертирует число прописью в долларах;

EURStr – выведет сумму прописью в евро.

9. В следующем окне «Аргументы функции» укажите в поле ячейку с данными (кликнут курсором) или непосредственно число цифрами, завершив нажатием кнопки ОК и растянувшейся улыбкой.

Интересно. Как закрепить строки в Excel читайте тут.

Использование программы печати суммы прописью в Excel (Ексел)

Работа с ней ведется через использование функций Excel. Введите в первую ячейку третьей строки формулу =СуммаПрописью(836) и вы увидите результат вычислений:

Введите после этого в первую ячейку второй строки формулу = СуммаПрописью (A1). Так как пока в ячейку A1 ничего не введено, то результатом будет:

После того, как в первую ячейку будет введено число, например, 3743917034,51, результат изменится на:

При вводе другого числа результат соответственно изменится. Кроме печати суммы прописью доступна стала и еще одна дополнительная функция. Введите в первую ячейку число 582,43, а в любую свободную ячейку формулу =ЧислоПрописью(A1) . Результатом будет пятьсот восемьдесят два , то есть первая буква уже не прописная, копейки отброшены и нет названия рублей. Также имеется возможность вывода суммы для названий женского рода – пятьсот восемьдесят две . Для этого следует использовать формулу =ЧислоПрописью(A1;ЛОЖЬ) . Если второй параметр опущен, выводится сумма для названий мужского рода.

ФоÑмÑла ÑÑÐ¼Ð¼Ñ Ð¿ÑопиÑÑÑ Ð² Excel — как напиÑаÑÑ ÑиÑло

ÐÐ»Ñ Ð²Ñвода ÑиÑла пÑопиÑÑÑ Ð² Excel можно ÑоздаÑÑ ÑоÑмÑлÑ. ÐÑиведем пÑимеÑ:

ÐÐÐСТÐÐÐТЬ(ÐРÐÐÐÐЧ(ÐÐÐÐÐС(n_4;ÐСТР(ТÐÐСТ(A3;n0);1;1)+1)&ÐÐÐÐÐС(n0x;ÐСТР(ТÐÐСТ(A3;n0);2;1)+1;ÐСТР(ТÐÐСТ(A3;n0);3;1)+1)&ÐСÐÐ(-ÐСТР(ТÐÐСТ(A3;n0);1;3);»Ð¼Ð¸Ð»Ð»Ð¸Ð°Ñд»&ÐÐР(ÐСТР(ТÐÐСТ(A3;n0);3;1)*Ð(ÐСТР(ТÐÐСТ(A3;n0);2;1)-1);мил;2);»»)&ÐÐÐÐÐС(n_4;ÐСТР(ТÐÐСТ(A3;n0);4;1)+1)&ÐÐÐÐÐС(n0x;ÐСТР(ТÐÐСТ(A3;n0);5;1)+1;ÐСТР(ТÐÐСТ(A3;n0);6;1)+1)&ÐСÐÐ(-ÐСТР(ТÐÐСТ(A3;n0);4;3);»Ð¼Ð¸Ð»Ð»Ð¸Ð¾Ð½»&ÐÐР(ÐСТР(ТÐÐСТ(A3;n0);6;1)*Ð(ÐСТР(ТÐÐСТ(A3;n0);5;1)-1);мил;2);»»)&ÐÐÐÐÐС(n_4;ÐСТР(ТÐÐСТ(A3;n0);7;1)+1)&ÐÐÐÐÐС(n1x;ÐСТР(ТÐÐСТ(A3;n0);8;1)+1;ÐСТР(ТÐÐСТ(A3;n0);9;1)+1)&ÐСÐÐ(-ÐСТР(ТÐÐСТ(A3;n0);7;3);ÐÐР(ÐСТР(ТÐÐСТ(A3;n0);9;1)*Ð(ÐСТР(ТÐÐСТ(A3;n0);8;1)-1);ÑÑÑ;2);»»)&ÐÐÐÐÐС(n_4;ÐСТР(ТÐÐСТ(A3;n0);10;1)+1)&ÐÐÐÐÐС(ÐСÐÐ(-ÐСТР(ТÐÐСТ(A3;n0);14;6);n1x;n0x);ÐСТР(ТÐÐСТ(A3;n0);11;1)+1;ÐСТР(ТÐÐСТ(A3;n0);12;1)+1));»z»;» «)&ÐСÐÐ(ÐТÐР(ТÐÐСТ(A3;n0));;»ÐÐ¾Ð»Ñ «)&ÐСÐÐ(-ÐСТР(ТÐÐСТ(A3;n0);14;6);ÐСÐÐ(ÐСТÐТ(ÐÐÐС(ÐСТÐТ(ÐСТР(ТÐÐСТ(A3;n0);11;2)-11;100);9);10);»ÑелÑÑ «;»ÑÐµÐ»Ð°Ñ «)&ÐÐÐСТÐÐÐТЬ(ÐÐÐÐÐС(n_4;ÐСТР(ТÐÐСТ(A3;n0);14;6)/10^5+1)&ÐÐÐÐÐС(n1x;ÐСТÐТ(ÐСТР(ТÐÐСТ(A3;n0);14;6)/10^4;10)+1;ÐСТÐТ(ÐСТР(ТÐÐСТ(A3;n0);14;6)/1000;10)+1)&ÐСÐÐ(ЦÐÐÐÐ(ÐСТР(ТÐÐСТ(A3;n0);14;6)/1000);ÐÐР(ÐСТÐТ(ÐСТР(ТÐÐСТ(A3;n0);14;6)/1000;10)*(ÐСТÐТ(ЦÐÐÐÐ(ÐСТР(ТÐÐСТ(A3;n0);14;6)/10^4);10)1);ÑÑÑ;2);»»)&ÐÐÐÐÐС(n_4;ÐСТÐТ(ÐСТР(ТÐÐСТ(A3;n0);14;6)/100;10)+1)&ÐÐÐÐÐС(n1x;ÐСТÐТ(ÐСТР(ТÐÐСТ(A3;n0);14;6)/10;10)+1;ÐСТÐТ(ÐСТР(ТÐÐСТ(A3;n0);14;6);10)+1);»z»;» «)&ÐÐÐÐÐС(долÑ;ÐÐСТР(ÐСТР(ТÐÐСТ(A3;n0);14;6));(ÐСТÐТ(ÐÐÐС(ÐСТÐТ(ÐСТР(ТÐÐСТ(A3;n0);14;6)-11;100);9);10)>0)+1);)

ÐÐ»Ñ ÐµÐµ иÑполÑÐ·Ð¾Ð²Ð°Ð½Ð¸Ñ Ð²Ð°Ð¼ необÑодимо ÑказаÑÑ Ð½ÐµÑколÑко маÑÑивов Excel:

  • n_1 ={«»;»Ð¾Ð´Ð¸Ð½z»;»Ð´Ð²Ð°z»;»ÑÑиz»;»ÑеÑÑÑеz»;»Ð¿ÑÑÑz»;»ÑеÑÑÑz»;»ÑемÑz»;»Ð²Ð¾ÑемÑz»;»Ð´ÐµÐ²ÑÑÑz»}
  • n_2 ={«Ð´ÐµÑÑÑÑz»;»Ð¾Ð´Ð¸Ð½Ð½Ð°Ð´ÑаÑÑz»;»Ð´Ð²ÐµÐ½Ð°Ð´ÑаÑÑz»;»ÑÑинадÑаÑÑz»;»ÑеÑÑÑнадÑаÑÑz»;»Ð¿ÑÑнадÑаÑÑz»;»ÑеÑÑнадÑаÑÑz»;»ÑемнадÑаÑÑz»;»Ð²Ð¾ÑемнадÑаÑÑz»;»Ð´ÐµÐ²ÑÑнадÑаÑÑz»}
  • n_3 ={«»:1:»Ð´Ð²Ð°Ð´ÑаÑÑz»:»ÑÑидÑаÑÑz»:»ÑоÑокz»:»Ð¿ÑÑÑдеÑÑÑz»:»ÑеÑÑÑдеÑÑÑz»:»ÑемÑдеÑÑÑz»:»Ð²Ð¾ÑемÑдеÑÑÑz»:»Ð´ÐµÐ²ÑноÑÑоz»}
  • n_4 ={«»;»ÑÑоz»;»Ð´Ð²ÐµÑÑиz»;»ÑÑиÑÑаz»;»ÑеÑÑÑеÑÑаz»;»Ð¿ÑÑÑÑоÑz»;»ÑеÑÑÑÑоÑz»;»ÑемÑÑоÑz»;»Ð²Ð¾ÑемÑÑоÑz»;»Ð´ÐµÐ²ÑÑÑÑоÑz»}
  • n_5 ={«»;»Ð¾Ð´Ð½Ð°z»;»Ð´Ð²Ðµz»;»ÑÑиz»;»ÑеÑÑÑеz»;»Ð¿ÑÑÑz»;»ÑеÑÑÑz»;»ÑемÑz»;»Ð²Ð¾ÑемÑz»;»Ð´ÐµÐ²ÑÑÑz»}
  • n0 =»000000000000″&ÐСТР(1/2;2;1)&»0#####»
  • n0x =ÐСÐÐ(n_3=1;n_2;n_3&n_1)
  • n1x =ÐСÐÐ(n_3=1;n_2;n_3&n_5)
  • Ð´Ð¾Ð»Ñ ={«Ð´ÐµÑÑÑаѻ;»Ð´ÐµÑÑÑÑÑ»:»ÑоÑаѻ;»ÑоÑÑÑ»:»ÑÑÑÑÑнаѻ;»ÑÑÑÑÑнÑÑ»:»Ð´ÐµÑÑÑиÑÑÑÑÑнаѻ;»Ð´ÐµÑÑÑиÑÑÑÑÑнÑÑ»:»ÑÑоÑÑÑÑÑнаѻ;»ÑÑоÑÑÑÑÑнÑÑ»:»Ð¼Ð¸Ð»Ð»Ð¸Ð¾Ð½Ð½Ð°Ñ «;»Ð¼Ð¸Ð»Ð»Ð¸Ð¾Ð½Ð½ÑÑ»}
  • мил ={0;»Ð¾Ð²z»:1;»z»:2;»Ð°z»:5;»Ð¾Ð²z»}
  • ÑÑÑ ={0;»ÑÑÑÑÑz»:1;»ÑÑÑÑÑаz»:2;»ÑÑÑÑÑиz»:5;»ÑÑÑÑÑz»}

ÐÑоÑÑо ÑкопиÑÑйÑе ÑÑÑ ÑаблиÑÑ Ð½Ð° лиÑÑ Excel, а ÑоÑмÑÐ»Ñ Ð²ÑÑавлÑйÑе ÑÑда, где необÑодима ÑÑмма пÑопиÑÑÑ. ÐÑÑепÑÐ¸Ð²ÐµÐ´ÐµÐ½Ð½Ð°Ñ ÐºÐ¾Ð½ÑÑÑÑкÑÐ¸Ñ Ð¿ÑедназнаÑена Ð´Ð»Ñ ÑÑейки A3. Ðе забÑдÑÑе поменÑÑÑ Ð°Ð´ÑеÑ.

РанглоÑзÑÑном Excel ÑоÑмÑла ÑÑÐ¼Ð¼Ñ Ð¿ÑопиÑÑÑ Ð±ÑÐ´ÐµÑ Ð²ÑглÑдеÑÑ ÑледÑÑÑим обÑазом:

Ðак видим, ÑÑо не ÑамÑй ÑдобнÑй ÑпоÑоб пÑеобÑазоваÑÑ ÑиÑло в ÑекÑÑ Ð¿ÑопиÑÑÑ Ð² Excel.

Настройка Excel

Файл надстройки (Внимание, «наДстройка» и «настройка» – это разные понятия!) является макросом и имеет расширение .xla. Соответственно, в настройках программы Excel необходимо разрешить использование макросов

В Excel 2003 это можно сделать через меню «Сервис->параметры». На вкладке «Безопасность» нажимаем кнопку «безопасность макросов» и устанавливаем средний уровень безопасности. Несмотря на многочисленные предупреждения системы, разрешение макросов не так опасно, как об этом говорят на каждом шагу – просто нужно внимательно относиться к использованию различных скриптов, написанных сторонними разработчиками для приложений Microsoft Office.

В Excel 2007 макросы можно включить, если зайти в параметры Excel (Круглая кнопка «Офис»->Параметры Excel).

Слева выбираем пункт «Центр управление безопасностью». В настройках безопасности нажмите на кнопку «Параметры центра управления безопасностью».

В окне безопасности слева выбираем пункт «Параметры макросов», а в середине устанавливаем позицию «Включить все макросы». Нажимаем «ОК» во всех окнах параметров программы Excel.

Далее вам понадобится сам файл надстройки с преобразованием числа в пропись.(Скачать файл Num2Text).

Полученный файл надстройки, необходимо поместить в папку с дополнительными «библиотеками» Microsoft Office. В различных версиях офисного пакета расположение подобных «библиотек» немного различается, но общий смысл остается тем же – все они помещаются в папку «Library». В Excel 2003 полный путь к папке – «C:\Program Files\Microsoft Office\OFFICE11\Library», в Excel 2007 полный путь к папке – «C:\Program Files\Microsoft Office\OFFICE12\Library»

Обратите внимание, в этой папке уже могут быть другие файлы с расширением «xla»

После того, как поместили программный модуль в необходимое место, нужно «включить» работу этой надстройки в программе Excel.

В Excel 2003 это делается через меню «Сервис – Надстройки…». Отмечаем здесь появившуюся, доступную нам, новую надстройку. Как сказано выше, в Сети существует несколько различных программных модулей, выполняющих функцию перевода числовых значений в буквенные – просто, они написаны разными людьми. В нашем случае, надстройка называется «Num2Text». Отмечаем ее «галочкой» и нажимаем «ОК».

В Excel 2007 сначала открываем параметры программы (Круглая кнопка «Офис»->Параметры Excel). В левой части окна параметров следует выбрать пункт «Надстройки», а в правой части нажать на кнопку «Перейти…», при выбранном пункте «Надстройки Excel» в поле «Управление».

Откроется окно со списком надстроек. Отметьте галочкой нужную (в данном случае Num2Text) и нажмите кнопку «ОК».

Теперь Excel оснащен дополнительной «недокументированной» функцией перевода числовых значений в буквенные.

Через формулу

Теперь я бы хотел поговорить о сложности построения такой функции или формулы самому. Как бы я строил подобную функцию:

  1. Я бы определил разрядность числа.
  2. Потом я бы подобрал каждой цифре нужное слово, которое бы выбирал из группы названий.
  3. Определил бы падеж единицы.

Т.е., тут пришлось бы использовать как минимум 4 диапазона (например, один диапазон отвечает за сотни: сто, двести, триста и т.д.), кучу условий, функции деления на ноль, ну и само собой ряд функций, текстовых и массивных.

Я имею в виду, что вот так сразу задачу не взять, поэтому, как мне понимается, Excel и не включает в стандартные средства сумму прописью, ведь условия написания разные на каждом языке.

Мне понравились формулы получения суммы прописью вот по этому адресу . Здесь я их разбирать не буду, т.к. это долгий процесс и немного ненужный, т.к. проще взять и пользоваться.

Удачи в использовании! Эксель Практик «Глаза боятся, а руки делают»

Создание сумм прописью с помощью формул

     Это вполне осуществимый вариант, но очень громоздкий. Формула, которая может самостоятельно преобразовывать числа в буковки и правильно орфографически написать сумму прописью получится очень большой. В случае, когда вы захотите упростить формулу, вам нужно будет отдельный блок формул, который буде и заниматься всеми преобразованиями. Единственное преимущество от использования формулы, это когда вы разберетесь с ней, то самостоятельно сможете ее изменять: разрядность, валюту, склонение и т.п.

    Ради общего интереса я предоставлю вам пример файла с работающей формулой, которую я нашёл на excelworld.ru, поскольку самостоятельно формульным решением задачи я не занимался, но считаю нужным предоставить весь наработанный или собранный материал. Скачать пример можно по этой ссылке.

Видеоинструкция

Если у вас остались какие-нибудь вопросы или вы так и не смогли найти причину своих проблем, рекомендуется посмотреть видеоролик, в котором приводятся дополнительные комментарии к описанным выше инструкциям.

https://youtube.com/watch?v=MgkXG-Kb0Vc

Добрый день уважаемый читатель!

Статья посвящена такому интересному вопросу: «Как создается сумма прописью в Excel?». Эта возможность позволяет нам всю массу информации и расчетов, которые сведены в один результат, оформить как финансовой документ, которые нельзя трактовать двузначно. Недаром же любые банковские, юридические и финансовые документы оформляются и цифрами и буквами. Окромя всего, такие суммы не позволяют ошибаться, где же должна стоять запятая и просто отлично выглядят в сравнении с рядом цифр. Подведя итог, скажу, что любой пользователь Excel, который работает с цифрами и временем, а также печатает документы с их использованием, очень нуждается в инструменте создающим сумму прописью.

Решить эту проблему можно несколькими способами:

  1. С помощью формул;
  2. С помощью пользовательской функции;
  3. С помощью VBA.

Использование надстройки

В Эксель нет встроенного инструмента, который бы помогал автоматически переводить цифры в слова. Поэтому для решения поставленной задачи используют специальные надстройки.

Одной из самых удобных является надстройка NUM2TEXT. Она позволяет поменять цифры на буквы через Мастер функций.

  1. Открываем программу Excel и переходим во вкладку «Файл».

Перемещаемся в раздел «Параметры».

В активном окне параметров переходим в раздел «Надстройки».

Открывается небольшое окно надстроек Excel. Жмем на кнопку «Обзор…».

В открывшемся окне ищем предварительно скачанный и сохраненный на жесткий диск компьютера файл надстройки NUM2TEXT.xla. Выделяем его и жмем на кнопку «OK».

Мы видим, что данный элемент появился среди доступных надстроек. Ставим галочку около пункта NUM2TEXT и жмем на кнопку «OK».

Запускается Мастер функций. В полном алфавитном перечне функций ищем запись «Сумма_прописью». Её раньше не было, но она появилась тут после установки надстройки. Выделяем эту функцию. Жмем на кнопку «OK».

Отрывается окно аргументов функции Сумма_прописью. Оно содержит только одно поле «Сумма». Сюда можно записать обычное число. Оно в выделенной ячейке отобразиться в формате записанной прописью денежной суммы в рублях и копейках.

Можно в поле занести адрес любой ячейки. Это делается либо путем ручной записи координат этой ячейки, либо простым кликом по ней в то время, когда курсор находится в поле параметра «Сумма». Жмем на кнопку «OK».

После этого, любое число, которое записано в ячейку, указанную вами, будет отображаться в денежном виде прописью в том месте, где установлена формула функции.

Функцию можно также записать и вручную без вызова мастера функций. Она имеет синтаксис Сумма_прописью(сумма) или Сумма_прописью(координаты_ячейки). Таким образом, если вы в ячейке запишите формулу =Сумма_прописью(5) , то после нажатия кнопки ENTER в этой ячейке отобразиться надпись «Пять рублей 00 копеек».

Если вы введете в ячейку формулу =Сумма_прописью(A2) , то в таком случае, любое число, внесенное в ячейку A2 будет отображаться тут денежной суммой прописью.

Как видим, несмотря на то, что в Excel нет встроенного инструмента для преобразования чисел в сумму прописью, эту возможность можно довольно легко получить, просто установив необходимую надстройку в программу.

Office 365, AD, Active Directory, Sharepoint, C#, Powershell. Технические статьи и заметки.

Excel. Сумма прописью без макросов и надстроек

Дано: Excel c числами и суммами в рублях в ячейках. Задача: написать данные числа прописью без использования макросов и каких-либо надстроек программы Excel, т.е. написать число прописью при помощи стандартных формул.

Пример файла excel с таким решением можно скачать здесь. См. также Сумма прописью онлайн (если просто нужно получить результат). Что означает прописью? Данный файл производит следующие манипуляции с числами:

1. Формула 1 преобразовывает число в сумму прописью следующего формата: «0 (пропись) рублей 00 копеек»

2. Формула 2 преобразовывает число в сумму прописью следующего формата: «Пропись рублей 00 копеек»

3. Формула 3 просто переводит число в текст: число = пропись

Вот формулы, которые пишут сумму прописью:

При необходимости формулу можно подогнать под нужный формат.

Как использовать данную формулу? Вы можете взять файл примера и внести в него свои данные, чтобы получить результат. Если же у Вас уже есть готовый файл с заполненными данными и Вам необходимо добавить возможность написания суммы прописью, то чтобы формула заработала, необходимо сделать некоторые подготовительные действия, а именно добавить справочники, которые использует формула. В данном примере справочники заданы как именованные диапазоны (это решение хорошо тем, что пользователь эти диапазоны не видит на листах и соответственно не сможет лишний раз что-то испортить).

Итак, нам необходимо сделать следующие справочники:

Имя диапазона: n_1 Диапазон: =

Имя диапазона: n_2 Диапазон: =

Имя диапазона: n_3 Диапазон: =

Имя диапазона: n_4 Диапазон: =

Имя диапазона: n_5 Диапазон: =

Имя диапазона: n0 Диапазон: =»000000000000″&ПСТР(1/2;2;1)&»00″

Имя диапазона: n0x Диапазон: =ЕСЛИ(n_3=1;n_2;n_3&n_1)

Имя диапазона: n1x Диапазон: =ЕСЛИ(n_3=1;n_2;n_3&n_5)

Имя диапазона: мил Диапазон: =

Имя диапазона: тыс Диапазон: =

Чтобы создать справочник таких диапазонов, переходим на вкладку «Формулы» — «Диспетчер имен«:

В открывшемся окне нажимаем кнопку «Создать» и в форме вводим данные первого диапазона из таблицы:

Далее таким же образом вводим все остальные диапазоны из таблицы:

Преобразование с помощью макросов Excel

Можно написать собственную функцию, которая произведет конвертацию суммы прописью. Нажмите сочетание ALT+F11 и в открывшемся разработчике Excel VBA вставьте новый модуль.В него добавьте следующий код.

Теперь эту функцию можно вызвать обычным путем и получить сумму прописью. Она находится в разделе функций Excel «Определенные пользователем».В качестве аргумента укажите адрес с числом.Перевод в сумму прописью осуществляется только для целых чисел.Дробное число требует дополнительной формулы:

Вместо ячейки A7 подставляйте свой адрес. Копейки в таком исполнении будут выводиться в виде числа.Мы рассмотрели все способы представления суммы прописью в Excel. Выбирайте для себя самый удобный и пользуйтесь с удовольствием!

Office 365, AD, Active Directory, Sharepoint, C#, Powershell. Технические статьи и заметки.

Excel. Сумма прописью без макросов и надстроек

Дано: Excel c числами и суммами в рублях в ячейках. Задача: написать данные числа прописью без использования макросов и каких-либо надстроек программы Excel, т.е. написать число прописью при помощи стандартных формул.

Пример файла excel с таким решением можно скачать здесь. См. также Сумма прописью онлайн (если просто нужно получить результат). Что означает прописью? Данный файл производит следующие манипуляции с числами:

1. Формула 1 преобразовывает число в сумму прописью следующего формата: «0 (пропись) рублей 00 копеек»

2. Формула 2 преобразовывает число в сумму прописью следующего формата: «Пропись рублей 00 копеек»

3. Формула 3 просто переводит число в текст: число = пропись

Вот формулы, которые пишут сумму прописью:

При необходимости формулу можно подогнать под нужный формат.

Как использовать данную формулу? Вы можете взять файл примера и внести в него свои данные, чтобы получить результат. Если же у Вас уже есть готовый файл с заполненными данными и Вам необходимо добавить возможность написания суммы прописью, то чтобы формула заработала, необходимо сделать некоторые подготовительные действия, а именно добавить справочники, которые использует формула. В данном примере справочники заданы как именованные диапазоны (это решение хорошо тем, что пользователь эти диапазоны не видит на листах и соответственно не сможет лишний раз что-то испортить).

Итак, нам необходимо сделать следующие справочники:

Имя диапазона: n_1 Диапазон: =

Имя диапазона: n_2 Диапазон: =

Имя диапазона: n_3 Диапазон: =

Имя диапазона: n_4 Диапазон: =

Имя диапазона: n_5 Диапазон: =

Имя диапазона: n0 Диапазон: =»000000000000″&ПСТР(1/2;2;1)&»00″

Имя диапазона: n0x Диапазон: =ЕСЛИ(n_3=1;n_2;n_3&n_1)

Имя диапазона: n1x Диапазон: =ЕСЛИ(n_3=1;n_2;n_3&n_5)

Имя диапазона: мил Диапазон: =

Имя диапазона: тыс Диапазон: =

Чтобы создать справочник таких диапазонов, переходим на вкладку «Формулы» — «Диспетчер имен«:

В открывшемся окне нажимаем кнопку «Создать» и в форме вводим данные первого диапазона из таблицы:

Далее таким же образом вводим все остальные диапазоны из таблицы:

Специальная надстройка NUM2TEXT

В программе Excel не предусмотрен какой-либо специальный инструмент, позволяющий выполнить автоматический перевод цифр в соответствующие текстовые значения. Однако в этом деле может помочь специальная надстройка NUM2TEXT, которая работает через функцию.

Алгоритм действий следующий:

  1. В верхней строке окна программы кликаем по меню “Файл”.
  2. В перечне слева выбираем пункт “Параметры”.
  3. В открывшихся параметрах программы кликаем по разделу “Надстройки”. В нижней части окна щелкаем по кнопке “Перейти” рядом с пунктом “Управление”, значение которого должно быть установлено как “Надстройки Excel”.
  4. На экране отобразится окно надстроек, в котором нажимаем кнопку “Обзор”.
  5. Откроется окно обзора, где мы переходим в папку, в которой находится заранее скачанный файл надстройки “NUM2TEXT.xla”. Выбираем его и щелкаем кнопку OK.Примечание: Официального сайта, с которого можно скачать надстройку, к сожалению нет, однако, в интернете ее достаточно легко найти, воспользовавшись поисковой системой. Главное – скачивайте файл с надежных источников, обязательно с расширением “xla”. Не лишним будет после загрузки файла на компьютер проверить его с помощью антивирусной программы.
  6. Система снова вернет нас в прежнее окно, где мы можем заметить, что в списке надстроек появилась и только что добавленная. Ставим флажок напротив нее (если это по какой-то причине не произошло автоматически), затем нажимаем кнопку OK.
  7. Теперь нам нужно убедиться, что надстройка работает. Для этого пишем в любой незаполненной ячейке случайное число. После этого переходим в другую свободную ячейку и жмем кнопку “Вставить функцию” (fx) слева от строки формул.
  8. В окне вставки функции выбираем категорию “Полный алфавитный перечень”, находим строку “Сумма_прописью”, щелкаем по ней, затем – по кнопке OK.
  9. Откроется окно с единственным аргументом функции – “Сумма”. В поле для ввода значения аргумента мы можем написать как обычное число, так и указать адрес ячейки, который печатаем вручную или выбираем в таблице кликом по нужному элементу (при этом, курсор должен находится в поле для ввода информации). После того, как значение аргумента заполнено, щелкаем OK.
  10. В ячейке с функцией отобразился результат в виде суммы прописью, что и требовалось.Причем, если мы поменяем число в исходной ячейке, на которую ссылается функция, значение в финальной ячейке также изменится.

Ручной ввод формулы функции

Опытные пользователи довольно часто предпочитают вместо использования вставки функции и последующего заполнения ее аргументов в отдельных окнах сразу писать конечную формулу в ячейке.

В данном случае, формула выглядит следующим образом:

=Сумма_прописью(Сумма)

В качестве аргумента “Сумма”, как мы ранее уже отметили, может быть указано как конкретное число, так и ссылка на ячейку.

Например, вот как выглядит финальная формула с числом 21: =Сумма_прописью(21) .

После того, как она набрана в нужной ячейке, нам остается только нажать Enter, чтобы получить результат.

Или же мы можем вместо числа указать адрес ячейки: =Сумма_прописью(B3) .

После нажатия клавиши Enter мы также получаем результат в виде суммы прописью в ячейке с формулой.

Ссылка на основную публикацию