[Office] Re: Преобразовать число в текст
> Подскажите, пожалуйста, как преобразовать в Exel число в текст: В одной
> ячейке
> стоит 46000,00 нужно, чтобы в другой ячейке он написал Сорок шесть тысяч
> рублей
> 00копеек.
Попробуйте воспользоваться советом Олега Аулова (от 20/04/2007). Сам не
пробовал. Привожу полностью:
Нажмем Ctrl+F9 ( вставляем поле), появятся фигурные скобки.
Вот поле, которое переводит числа в пропись.
{ =420 \*CardText } - это будет "четыреста двадцать"
\* OrdText Порядковые числительные (записанные словами). По умолчанию
используются строчные буквы, например:
{ DATE \@ "12" \* OrdText } это даст <двенадцатый>, а
{ DATE \@ "12" \* ordtext \* FirstCap } - <Сотый>.
\* Ordinal Порядковые числительные (записанные цифрами и буквами),
например:
{ DATE \@ "12" \* Ordinal } возвращает <12-й>.
\* roman Числа, записанные римскими цифрами того же регистра, что и
слово <roman> в коде поля, например:
{ DATE \@ "12" \* roman } возвращает <xii>, а
{ DATE \@ "12" \* ROMAN } - <XII>.
Только не забывайте вставлять не фигурные скобки, а именно поля (Ctrl+F9).
Shift+F9 - выведет значение поля при условии, что курсор стоит в поле. Если
в другом месте - поле не отобразится.
-- Конец цитаты
Вот еще сообщение от Vladimir Doubrovski (20/12/2005):
Программы для представления числа прописью на русском языке
http://www.microsoft.ru/offext/documents/text/list.aspx?id=15
Здесь есть макросы, надстройки, а также очень интересная реализация:
PropisPP Пропись формулой (Excel 97/2000),
id: 566 | 24,1 Kb | 10.10.2001 | бесплатная | Алексей М.
http://www.microsoft.ru/offext/documents/text/details.aspx?id=566&cat=15
-- Конец цитаты
Сам в свое время писАл макрос, который делал эту процедуру. Если найду,
отправлю. Пишите своё мыло.
