Артур задал вопрос:
Я воспользовался вашими советами по переводу числа в режим прописи. Только проблема: команда {=123CardText} не переводит в пропись числа больше 999 999, то есть при вводе 1.000.000 появляется ошибка! Можно ли что-то сделать?
Напомню, что ключ формата CardText, используемый в полях, предназначен для вывода количественных числительных в текстовом формате. Например, при использовании поля {=236 *CardText} мы получим следующий результат: двести тридцать шесть.
Однако, при использовании ключа CardText существуют три ограничения:
- максимальное число, которое может быть переведено в текстовый формат, не должно быть больше 999.999;
- переводимое число не может быть отрицательным;
- переводимое число может быть дробным, но при этом результат будет округлен до ближайшего числа (например, результат перевода числа 12,65 — тринадцать).
Если пользователь пренебрежет этими ограничениями, то он получит сообщение об ошибке: Ошибка! Число не может быть представлено в указанном формате.
Обойти эти ограничения с использованием данного ключа нельзя. Но можно воспользоваться специальными программами (макросами), позволяющими преобразовывать числа в текст. О таких программах я писал в заметке Число или сумма прописью.
� ���� �������:
- ������ � ���������
- �������� ������
- ���������� �� ��������� ������
������ � ���������
���� � ��� ���� ���� ��� ����� �� ������������ ������������� ��������� Word, �� ������ ��� ����� ����� ��������� �� �����. ����� ���� ������� ������ � ��������� ����� ��������� � ��������� �������� �������� � �� ����� (� ��������� ������ ���������).
���� CardText � ��� �����������
����� ����� ������:
� �������������� ������ �������� �� �������� ����� � ����� �������. ������ ��������: ������� {=123CardText} �� ��������� � ������� ����� ������ 999 999, �� ���� ��� ����� 1.000.000 ���������� ������! ����� �� ���-�� �������?
�������, ��� ���� ������� CardText, ������������ � �����, ������������ ��� ������ �������������� ������������ � ��������� �������. ��������, ��� ������������� ���� {=236 *CardText} �� ������� ��������� ���������: ������ �������� �����.
������, ��� ������������� ����� CardText ���������� ��� �����������:
- ������������ �����, ������� ����� ���� ���������� � ��������� ������, �� ������ ���� ������ 999.999;
- ����������� ����� �� ����� ���� �������������;
- ����������� ����� ����� ���� �������, �� ��� ���� ��������� ����� �������� �� ���������� ����� (��������, ��������� �������� ����� 12,65 — ����������).
���� ������������ ����������� ����� �������������, �� �� ������� ��������� �� ������: ������! ����� �� ����� ���� ������������ � ��������� �������.
������ ��� ����������� � �������������� ������� ����� ������. �� ����� ��������������� ������������ ����������� (���������), ������������ ��������������� ����� � �����. � ����� ���������� � ����� � �������
����� ��� ����� ��������.
������ �������������� ����� � �����
�� ������ Microsoft ��� ����� ������:
���������� � ������ Word ��������� ����� ������������� � ����� �� �������.
��� ����, ����� ������������� ����� ����� � ��������� ������, �� ������ ��������������� ������������ �����������, � ������� � ����� � �������
����� ��� ����� ��������.
�� ���� ��� ����� ������������� ��� ��������� �����, �� ����� ����� ������ ��������� ������ (����).
� ���� ������� ������������ ������� � ������ CardText. �� � ����� ����� ���� ����������� — ������������ ����� �� ����� ���� ������ 999.999 (��. ������� ���� CardText � ��� �����������). ������� ����� ������� ���� �� �������� � ���������� ����. �� � ���������� ����� ��� ��������� � ��������� ��� ���������������� ����� ���������� ���������� ��� ����� ����� 1.000.000 — ������������
����� «million». � ������� ����� �������� ��������� ����� ��������� �� ����� �������. ������� � ����-���� ��������������� ������, ������� ����� «million» �� «�������(�/��)». ���� �� ������ ��������� ��, �� ������� ����, �� ��� ����� ���� �������������� ���������������.
��� �������:
Sub BigCardText() '�������������� ������ ����� � ��������� ���������� '�������� - http://wordtips.vitalnews.com/Pages/T000203_Converting_Numbers_to_Text.html Dim sDigits As String Dim sBigStuff As String sBigStuff = "" ' Select the full number in which the insertion point is located Selection.MoveLeft Unit:=wdWord, Count:=1, Extend:=wdMove Selection.MoveRight Unit:=wdWord, Count:=1, Extend:=wdExtend ' Store the digits in a variable sDigits = Trim(Selection.Text) If Val(sDigits) > 999999 Then If Val(sDigits) <= 999999999 Then sBigStuff = CStr(Val(sDigits) 1000000) ' Create a field containing the big digits and ' the cardtext format flag Selection.Fields.Add Range:=Selection.Range, _ Type:=wdFieldEmpty, Text:="= " + sBigStuff + " * CardText", _ PreserveFormatting:=True ' Select the field and copy it Selection.MoveLeft Unit:=wdWord, Count:=1, Extend:=wdExtend sBigStuff = Selection.Text & " �������(�/��) " sDigits = Right(sDigits, 6) End If End If If Val(sDigits) <= 999999 Then ' Create a field containing the digits and the cardtext format flag Selection.Fields.Add Range:=Selection.Range, _ Type:=wdFieldEmpty, Text:="= " + sDigits + " * CardText", _ PreserveFormatting:=True ' Select the field and copy it Selection.MoveLeft Unit:=wdWord, Count:=1, Extend:=wdExtend sDigits = sBigStuff & Selection.Text ' Now put the words in the document Selection.TypeText Text:=sDigits Selection.TypeText Text:=" " Else MsgBox "����� ������� ������� ��� ��������������", vbOKOnly End If End Sub
���� �� �� ������, ��� ���������� � ��������� � ��������� ���� ������, ������� ��������� ������� � �����:
�������� ������� �� �������� ����
�������������� ������ �������
� ���� ��������� ���������� ������ «������������ ������»
��� � � ������, �������� ��������� ���������� ������ �� ���� ��������� AGI Triple.
����� ������: ��� ������ (Beth Melton)
��������: I keep getting ‘insufficient memory’ errors
���������� �� Nimda
���� �� ��������� ������������� � ��������, ���������� � «�������������� ���������» ��� «������������� �������», ��, � ������ �������, �� ������ ���������� �� ������ ��� ��������� Nimda. ����� �� ������, ������� ������� ���� �����, �������� Riched20.dll. ���� ���� ������������ MS Word ��� ������� Rich text. ��������������, ��� ����� ����� Word �� ����� ��������� ���������������.
�������� ������ ���������� �� Symantec � ������, � ����� ���������� ��� ��� ����������� �� ������ �����:
W32.Nimda.A@mm.
���������, ��� �� �� ������ ��������� ����� �� ������ ���������� ������ ����� Riched20.dll: ���� ����� ����� �������� ���������.
���� ���� ��� ��������� �� ������������ ������� ������ � �������, ���, ��������, ��� ����� �������� ������� ����� Riched20.dll, ��� ��� ���� ������, ����� ���������� ������ DLL ������ ��������, ���� ���� Nimda � �� ��� ���������. ��� �������, ��� ��� ������� � ���, ��� ����� ��� ������ � ������ �� ����� �����������, �� ������������ ���� Riched20.dll �� ��� �������.
��� �������� ���� �����������
������ ��� ����� �� ������ Microsoft:
��� ��������� ��������� � ����� ����������� �� web �������� ������������� ���������� ����� ������. ��� ����� �������� ��� �������������� ��������� �� ������ ����?
�������, ���������� �� ���� ������, ��� ������ �� ������������ ������ — http://kb.iu.edu/data/ahbl.html.
� �� ����� ����, �������� ���� ����������� ������ — ���������� �������� �����, ��������������� ������������. ���� � ����� ��������� ��� ������������ ������, �� � ������ ������ �� ������� � ����� ��� ��� (�������).
���� ������� ����� ����� � �������������� (��� Word 2003) �� ������������, �� � ���� ������ �������� ������� ����� � ��������������, � ���� �� ����������� �������� Word 2007, �� �������������� ���� �������� ��������� «Ctrl»+«Shift»+«Alt»+«S», ���� �� ������� ������� � ������ ������ ����� ������� ������ ������ ���������� ���� (�������).
������ �������� ��������� ���� �� ����� ����������� — �������� ���������� � ����� — � �������� ������ ������� ���� �� �����. � ������������ ����������� ���� �������� ������� ��������, ����� ��������� ���������� ���� ��������� �����.
� ���������� ���� ������� ������ ������ � � ������� �������� ������� �����. � ��������� Word 2003 ��������� ����������� ���������� ����, � ������� �������� ���� ������ � ���� ���� ������. � � ��������� Word 2007 ����� ������ �������� ���� � ���� ���� ������, ������� �������� ����� �� — � ���� ��������� �����.
������ �������� ���������� ���� � � ���������� ���� ���� ����������� � ����� ��������� ����� �������.
�������� ������
- ����� �������� �� ������� Subscribe.ru
- ����������� web-���� Microsoft (Rus)
- ���������������� ��ɣ�� ������ � Microsoft Excel
- Potolook.ru — ���������� � ��������� ������� Microsoft Outlook
- ���� �� ����������
- ������ �� ��, ���…
���������� �� ��������� ������
��� ����������, �������������� �� ����� WordExpert.ru � � ���� ��������, ������� ������� �� ������� � ����������� Microsoft. � �������� ����������� �������� � ��������, ������� ����� ���� ������������������� ��������� ������� � ������������ ��������� ���������� � ����������� ����� ��� �� ���������� ��, ��� � �� �� ���������.
��������� ����� �� ��� ���������, �������������� �� ����� WordExpert.ru � � ���� �������� (������� �����, ����������, ��������, ������������ � �.�.) ����������� ������ ������ ����������, ���� �� ������� ����. �� ������ �������� ������������ � �������������� ��� ��������� � ������������ ������� ���� «���������� � ����� WordExpert.ru» � � ������������ ��������� ������ ���������.
��� ���������, �������������� �� ����� WordExpert.ru � � ���� ��������, ������������ �� �������������� ������. �� ������ ������������ ����� ���������� � ����� WordExpert.ru ��� �� ������ �������� ������������� �� ���� ����� � ����. ��� �� �����, � ���������� ����� ����������� �����-���� ���������� � ����� WordExpert.ru ��� �� ������ �������� ����������� ��������� � ��������� ��������� ����� ����� ����������.
� ���� �������� ����� ����������� ��������� web-�������� � ���������������� ��������. ��� ������ ����������� ������������� � �������������� ����� � ������� ������������ ��� ��������� � ���� ������� ������ ���-������� �� ���������������, ���� �� ������� ����.
This feature dates back to around 1990, when the amounts people worked with were much more modest than now. There is, indeed, a built-in limitation of six digits before the decimal point: 999’999 is the largest integer the field switch * cardtext
supports.
It is possible to have higher numbers, but it requires combining field codes to work around the limitation. Many, many years ago, a group of us in the Word forum on Compuserve figured out a way to do this and I posted it on my website (http://homepage.swissonline.ch/cindymeister/NbrFAQ.htm#Millions). I copy it verbatim, below:
There are special formatting switches that allow you to display a
number as text, either with or without «dollars». (For more
information on the number formatting switches, look under Switches;
field switches; number formats in Word’s Help Index.) But the program
is limited to displaying the information for numbers less than one
million. In order to display amounts in the millions as text, you need
to use a combination of nested fields. Example:
{ QUOTE { = SET n 1999999 }
{ IF n < 1000000 "{ = n *cardtext }" "{ = int(n/1000000) * cardtext } million
{ SET r { = MOD(n, 1000000) } }
{ IF r = 0 "" "{ = r * cardtext }" }"
} * caps * CharFormat
}
Displays one million nine hundred ninety-nine thousand nine hundred
ninety-nine.The
QUOTE
field keeps everything together. The number you
want to work with is bookmarked in theSET
field. Then you test
whether the number is greater than one million. If it is, divide it by
one million, then get the integer of this result for the words in
millions. Next, determine the remainder and get the text for it.
Note: The line breaks in the code section are for readability purposes, only! The entire field code should be created with NO line breaks.
For those not familiar with working with field codes in Word:
- Insert the field brackets using { } using Ctrl+F9; you may not type them in any other way!
- Observe the single spaces around operators such as =, >, <
- Use Alt+F9 to toggle between field codes and field result
- Click in the field (set) and press F9 to force the field result to update
Число или сумма прописью в Ворде (Word) — как сделать?
Как в Ворде автоматически преобразовать число в текст, то есть написать его прописью?
1 505 200 — один миллион пятьсот пять тысяч двести.
Можно ли это сделать?
Программа Ворд удобна в применении, в ней много различных функций — возможностей о которых следует знать, чтобы работа в программе была быстрой.
Если вы не хотите поставить сумму прописью — автоматически преобразовать число, тогда следуйте следующему плану действий.
Ставим курсор в нужное место и жмём на клавиши Ctrl + F9 — появятся фигурные скобки.
В фигурных скобках записываем команду. Сначала ставим знак равно, следом без пробелов пишем нужное нам число цифрами и ставим символ деления только тот, который пишется в обратную сторону — , затем * и CardText.
После этого в Ворде нужное вам число будет записано прописью.
Если число очень большое, то писать его прописью очень утомительно.
Также можно из-за невнимательности где-то допустить ошибку.
К счастью, в Ворде можно сделать так, чтобы число или сумма записывалась прописью автоматически.
Для этого можно использовать поле, в которое записывается специальная конструкция.
Порядок действий:
Для этого ставим курсор в то место, куда нужно написать число прописью, а затем набираем комбинация клавиш «Ctrl» + «F9».
Появятся фигурные скобки, внутри которых и нужно будет поместить конструкцию.
2) В эти скобки нужно записать:
Понятно, что здесь 12060 — это число, которое нужно написать прописью.
В свою очередь * CardText — это ключ поля (ключ представляет собой конструкцию, которая выполняет определённые действия).
3) Теперь нужно нажать на клавишу «F9».
Число будет написано в нужном нам формате, то есть «12060» запишется как «двенадцать тысяч шестьдесят».
Если вам по каким-то причинам потребовалось изменить число, которое вы записывали прописью, то воспользуйтесь комбинацией клавиш «Shift» + «F9».
Эта комбинация клавиш меняет режим отображения поля — то есть можно всегда возвращаться в формулу и редактировать её.
Проще всего, конечно воспользоваться помощью Интернета, ввести запрос числа прописью онлайн и далее в программе просто ввести наше число, потом его скопировать в ворд.
Но если Интернета вдруг нет, то можно обойтись просто средствами ворда.
Итак, дать команду вставка-экспресс блоки — поле.
Появится диалоговое окно, в котором в поле формула нужно ввести следующее =число*CardText. Вместо слова число нужно ввести цифрами то число, которое вы хотите чтобы было написано словами. Но у меня не получилось написать сильно большое число. Правой кнопкой мыши поле можно изменить и исправить на то число, которое нам нужно теперь.
Как вставить число прописью в Word
Если вы работаете с финансовыми документами, то поймёте меня лучше, чем кто бы то ни было:
переписывать сумму прописью после каждого созвона с клиентом — мягко говоря — надоедает
А ведь ещё можно ошибиться . или попросту забыть подправить!
Давайте жизнь сделаем проще.
Для суммы прописью в Word есть решение:
- Нажмите одновременно Ctrl и F9
- В появившихся фигурных скобках введите знак равно и сразу за ним число, которое вам нужно написать прописью
- После числа вбейте «заклинание»: *cardtext
Должно получиться так:
Естественно, число 1047 заменяйте своим.
- Нажмите пару раз F9, затем Shift+F9
В документе увидим:
одна тысяча сорок семь
Пояснения по работе с полями в Word:
По нажатию Ctrl+F9 в документ вставляется вычисляемое поле. Оно выделяется серым фоном и фигурными скобками.
По нажатию Shift+F9 внутри вычисляемого поля изменяется режим отображения. Можно смотреть либо результат вычисления, либо формулы.
По нажатию Alt+F9 вы изменяет режим отображения вычисляемых полей во всём документе.
Клавиша F9, нажатая внутри поля, выполняет пересчёт значений. Если хотите пересчитать во всем документе, то нажите Ctrl+A и затем нажмите F9.
Чтобы запретить обновление поля (защита от самого себя), нажмите в поле Ctrl+F11. Чтобы снять запрет воспользуйтесь Ctrl+Shift+F11.
Важное замечание №1. Заклинание *cardtext работает не со всеми числами. Только положительные до миллиона. Дробные числа округляются до целого.
Важное замечание №2. Если перед началом ввода переключиться с русского языка на английский, то число прописью выводится на АНГЛИЙСКОМ.
После *cardtext можно добавить:
- заклинание *Upper — число прописью выводится прописными буквами
ONE THOUSAND FORTY-SEVEN
- заклинание *FirstCap — только первая буква будет прописной
One thousand eighty-nine
Вместо *cardtext можно ввести:
- *roman — число выводится строчными римскими
- *ROMAN — римские, но уже прописные
Решение неидеальное, но интересная игрушка, правда?
Опубликован: 25 января 2016, 13:20
получилось! оказалось, дело в том, что у меня ноутбук НР, и чтобы нажать F9, надо одновременно держать «fn».
- Шурик
- 04 февраля 2016, 13:39
Здравствуйте! А где «взять» фигурную скобку? На клавиатуре не вижу.
Установите курсор в нужное место и просто нажмите ctrl+f9. Скобки на сером фоне сами нарисуются ))
- Валентина
- 04 февраля 2016, 14:00
Константин, огромное Вам спасибо. Давно подписана на Вашу рассылку и слежу за Вашими публикациями. Я с WORDом на Вы и по этому постоянно обращаюсь к Вашим , как я их назвала ,,шпаргалкам,, Очень помогает в написании текстов. Сильно облегчаете работу начинающим пользователям. Успехов Вам.
- Зинаида
- 04 февраля 2016, 22:45
Константин, большое спасибо за ваши информации по работе с компьютером. Я работала главным бухгалтером и знаю сколько допускают ошибок при написании сумм прописью в документах. Я думаю, что для некоторых, это будет очень важная и необходимая информация. И мне это очень понравилось. Обязательно воспользуюсь. С уважением, Раиса!
- Раиса
- 10 февраля 2016, 14:11
Классно. Буду знать. Спасибо.
(Ваша система ругается, говорит, слишком мало написал. Я просто хотел поблагодарить.)
- Игорь
- 09 марта 2016, 18:33
- Заметки блога
- Как выполнить замену текста в нескольких документах Word
- Учимся набирать текст на компьютере
- Как сделать гиперссылку в MS Word
- Автосохранение в Word для забывчивых пользователей
- Хитрости работы со списками в Word
- 3 способа конвертировать PDF в Word
- Литература по Word для начинающих
- Как в Word преобразовать таблицу в текст и обратно
- Как строить диаграммы и графики в Microsoft Word
- Как перенести страничку сайта в Word
- Перемещение текста в Word по одной кнопке
- Как перевести текст на другой язык в Word’е
- Как сделать число прописью в Word
- Генератор русских панграмм
- Как сохранить документ Только для чтения
- Как разделить Word на 2 части
- Как уменьшить размер файла Word
- Ещё заметки по теме
Компьютер Для Чайников — Copyright © 2011—2021 Все права защищены · Политика приватности
Как в ворде написать сумму прописью из цифры через функции
- Главная
- Excel
- Готовые решения
- Форумы
- Библиотека
- Видеосалон
- Справочники
- Разработчик
Информация о сайте
Инструменты и настройки
Excel Windows
и
Excel Macintosh
Вопросы и решения
Работа и общение
Работа форума и сайта
Функции листа Excel
= Мир MS Excel/Цифры прописью в Word — Мир MS Excel
Эта особенность восходит к 1990 году, когда суммы, с которыми работали люди, были гораздо скромнее, чем сейчас. Действительно, перед десятичной запятой есть встроенное ограничение в шесть цифр: 999’999 — это наибольшее целое число, которое имеет переключатель поля * cardtext
поддерживает.
Возможно иметь более высокие числа, но это требует объединения кодов полей, чтобы обойти ограничение. Много, много лет назад группа из нас на форуме Word на Compuserve нашла способ сделать это, и я разместил его на своем веб-сайте ( http://homepage.swissonline.ch/cindymeister/NbrFAQ.htm). Я копирую это дословно, ниже:
Существуют специальные переключатели форматирования, которые позволяют отображать число в виде текста, с или без «долларов». (Дополнительные сведения о переключателях форматирования чисел см. В разделе «Переключатели»; «Переключатели полей; числовые форматы» в справочном указателе Word.) Но программа ограничена отображением информации для чисел менее одного миллиона. Чтобы отображать суммы в миллионах в виде текста, необходимо использовать комбинацию вложенных полей. Пример:
{ QUOTE { = SET n 1999999 }
{ IF n < 1000000 "{ = n *cardtext }" "{ = int(n/1000000) * cardtext } million
{ SET r { = MOD(n, 1000000) } }
{ IF r = 0 "" "{ = r * cardtext }" }"
} * caps * CharFormat
}
Показывает один миллион девятьсот девяносто девять тысяч девятьсот девяносто девять.
QUOTE
поле держит все вместе. Номер, с которым вы хотите работать, добавлен в закладкиSET
поле. Затем вы проверяете, больше ли число, чем миллион. Если это так, разделите его на миллион, а затем получите целое число этого результата для слов в миллионах. Далее определите остаток и получите текст для него.
Примечание. Разрывы строк в разделе кода предназначены только для удобства чтения! Весь код поля должен быть создан без разрывов строк.
Для тех, кто не знаком с работой с полевыми кодами в Word:
- Вставьте квадратные скобки, используя { }, используя Ctrl+F9; Вы не можете вводить их любым другим способом!
- Соблюдайте одиночные пробелы вокруг операторов, таких как =, >, <
- Используйте Alt+F9 для переключения между кодами поля и результатом поля
- Нажмите на поле (установить) и нажмите F9, чтобы принудительно обновить результат поля