Суммы и числа прописью - Страница 7 - Мир MS Excel

Регистрация

Напомнить пароль

= Мир MS Excel/Суммы и числа прописью - Страница 7 - Мир MS Excel

Старая форма входа

Страница 7 из 12 « 1 2 … 5 6 7 8 9 … 11 12 »
Модератор форума: _Boroda_, китин

Суммы и числа прописью (Excel)

Суммы и числа прописью

Дата: Вторник, 16.02.2016, 05:16 | Сообщение № 121

Группа: Админы

Ранг: Старожил

Сообщений: 2004

Репутация: 752 ±

Замечаний: ±

Цитата Diablojoker, 15.02.2016 в 21:50, в сообщении № 119

как можно самому менять чтобы копейки тоже были прописными?

Посмотрите, так надо?
[vba]

Код

Function TurkmenProp2$(c#)
'Автор Михаил Ч. (MCH)
Dim st$, tg$, ed, des, razr, i&, m$
If c > 999999999999# Or c < 0 Then Exit Function

ed = Array("", "bir ", "iki ", ChrW(252) & ChrW(231) & " ", "d" & ChrW(246) & "rt ", "b" & ChrW(228) & ChrW(351) & " ", "alty" & " ", ChrW(253) & "edi ", "sekiz ", "dokuz ")
des = Array("", "on ", ChrW(253) & "igrimi ", "otuz ", "kyrk ", "elli ", "altmy" & ChrW(351) & " ", ChrW(253) & "etmi" & ChrW(351) & " ", "segsen ", "togsan ")
razr = Array("milliard ", "million ", "m" & ChrW(252) & ChrW(328) & " ", "")

st = Left(Format(c, "000000000000.00"), 12)
tg = Right(Format(c, " 0.00"), 2)

If CDbl(st) = 0 Then m = "nol "
For i = 1 To Len(st) Step 3
    If Mid(st, i, 3) <> "000" Then
        m = m & IIf(Mid(st, i, 1) = "0", "", ed(CInt(Mid(st, i, 1))) & ChrW(253) & ChrW(252) & "z ")
        m = m & des(CInt(Mid(st, i + 1, 1))) & ed(CInt(Mid(st, i + 2, 1))) & razr((i - 1) \ 3)
    End If
Next i
TurkmenProp2 = UCase(Left(m, 1)) & Mid(m, 2) & "manat " & IIf(CDbl(tg) = 0, "nol ", des(CInt(Mid(tg, 1, 1))) & ed(CInt(Mid(tg, 2, 1)))) & "te" & ChrW(328) & ChrW(328) & "e"
End Function

[/vba]

К сообщению приложен файл: 7336524.xls (99.5 Kb)

Ответить

Дата: Вторник, 16.02.2016, 10:54 | Сообщение № 122

Группа: Друзья

Ранг: Участник клуба

Сообщений: 3213

Репутация: 609 ±

Замечаний: 0% ±

2003

[offtop]Ну, Миша, ты и гигант! Прямо полиглот какой-то! [/offtop] hands

hands

С уважением,
Алексей
MS Excel 2003 - the best!!!

Ответить

Дата: Четверг, 25.02.2016, 17:01 | Сообщение № 123

Группа: Пользователи

Ранг: Новичок

Сообщений: 11

Репутация: 0 ±

Замечаний: 0% ±

Excel 2010

А возможно как то доработать формулку без копеек, а копейки писала цифрами в другой ячейки. и чтоб считала только до 1миллиона руб.лишнее не к чему.
Буду очень признателен .

К сообщению приложен файл: 0289767.xls (61.5 Kb) · 0185159.jpg (40.6 Kb)

— Дуся! Вы меня озлобляете. Я человек, измученный нарзаном.

Ответить

Дата: Четверг, 25.02.2016, 17:53 | Сообщение № 124

Группа: Пользователи

Ранг: Новичок

Сообщений: 11

Репутация: 0 ±

Замечаний: 0% ±

Excel 2010

вроде разобрался сам по предыдущему топику.

— Дуся! Вы меня озлобляете. Я человек, измученный нарзаном.

Ответить

Дата: Четверг, 25.02.2016, 23:19 | Сообщение № 125

Группа: Пользователи

Ранг: Новичок

Сообщений: 11

Репутация: 0 ±

Замечаний: 0% ±

Excel 2013

Всем здравствуйте!

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

Может кто-нибудь помочь?
Файл прикрепил

К сообщению приложен файл: __01__.xlsx (18.1 Kb)

Ответить

Дата: Пятница, 26.02.2016, 01:15 | Сообщение № 126

Группа: Друзья

Ранг: Участник клуба

Сообщений: 3690

Репутация: 790 ±

Замечаний: 0% ±

365

NOVI4EK, для начала выберите из всего многообразия предложенных решений нужное - я например без понятия в каком виде Вам нужна эта пропись, и даже в каой ячейке и на каком языке (скорее на русском, но кто знает...)
Ну и далее нужно решить - макросы разрешены или нет, кто будет этот документ распечатывать - т.к. если это Вы, то код можно и в надстройку кинуть, а если кто-то другой - то ему уже xlsx не дашь, ему нужно макрос внедрять, ну или делать на именах и стандартно, что в целом сложнее.
А вообще этот вопрос нужно задавать не здесь, не в готовых решениях. Я бы тему подчистил, а Вы продублируйте вопрос в отдельной теме в другой ветке - по ситуации в VBA или в Excel. Если ещё интересно.

webmoney: E265281470651 Z422237915069
USDT TRC20: TN8XeEF17o5KPBD9pNwYzNyruycuAc2mVD

Сообщение отредактировал Hugo - Пятница, 26.02.2016, 01:17

Ответить

Дата: Пятница, 26.02.2016, 01:31 | Сообщение № 127

Группа: Пользователи

Ранг: Новичок

Сообщений: 11

Репутация: 0 ±

Замечаний: 0% ±

Excel 2013

Hugo, Спасибо за развернутый комментарий. Задам этот вопрос в положенном месте.

Ответить

Дата: Вторник, 08.03.2016, 01:15 | Сообщение № 128

Группа: Пользователи

Ранг: Прохожий

Сообщений: 4

Репутация: 0 ±

Замечаний: 0% ±

Excel для Mac

Здравствуйте!

Восхищён способностями корифеев Excelя! Попытался на основе выложенных файлов скорректировать формулу под свои нужды. Не вышло :(((

Был бы очень благодарен, если бы кто-нибудь смог помочь.

Нужна формула для отображения числа прописью на английском языке, все буквы прописные (заглавные), знаки после запятой - цифрами в виде, к примеру, 55/100 без слова CENTS (если после запятой нули, то в прописном варианте их опускаем). В конце - обозначение валюты EUR.

Заранее спасибо!

P.S. Всех прекрасных дам поздравляю с 8-м Марта!!!

Ответить

Дата: Среда, 13.04.2016, 10:30 | Сообщение № 129

Группа: Проверенные

Ранг: Ветеран

Сообщений: 513

Репутация: 18 ±

Замечаний: 0% ±

Excel 2007

Очень полезные формулы! Спасибо огромное! Я пролистал все страницы, но видимо плохо... Подскажите, тут уже обсуждалась возможность прописи суммы в математическом формате?
100 = сто
100,23 = сто целых двадцать три сотых
100,1 = сто целых одна десятая

Ответить

Дата: Среда, 13.04.2016, 10:32 | Сообщение № 130

Группа: Админы

Ранг: Местный житель

Сообщений: 19403

Репутация: 4555 ±

Замечаний: ±

Excel 365 & Mac Excel

Мурад, второй пост темы посмотрите

"Черт возьми, Холмс! Но как??!!"
Ю-money 41001765434816

Ответить

Дата: Среда, 13.04.2016, 10:33 | Сообщение № 131

Группа: Модераторы

Ранг: Старожил

Сообщений: 2290

Репутация: 766 ±

Замечаний: 0% ±

2019

Цитата Мурад, 13.04.2016 в 10:30, в сообщении № 129

Я пролистал все страницы, но видимо плохо..

Как же Вы их листали?
См. 2-й пост от МСН.

Иногда все проще чем кажется с первого взгляда.

Ответить

Дата: Среда, 13.04.2016, 10:49 | Сообщение № 132

Группа: Проверенные

Ранг: Ветеран

Сообщений: 513

Репутация: 18 ±

Замечаний: 0% ±

Excel 2007

Pelena, SLAVICK, увидел, спасибо!

Ответить

Дата: Суббота, 07.05.2016, 19:02 | Сообщение № 133

Группа: Пользователи

Ранг: Прохожий

Сообщений: 6

Репутация: 0 ±

Замечаний: 0% ±

Excel 2007

Респект Автору!

Ответить

Дата: Суббота, 14.05.2016, 21:52 | Сообщение № 134

Группа: Пользователи

Ранг: Прохожий

Сообщений: 1

Репутация: 0 ±

Замечаний: 0% ±

Excel 2013

Здравствуйте!
Подскажите, пожалуйста, как сделать написание прописью дат из интервала: 01.01.2001 - 01.01.2011
[moder]Читаем Правила форума, создаём свою тему, прикладываем файл с примером[/moder]

Сообщение отредактировал Pelena - Суббота, 14.05.2016, 22:16

Ответить

Дата: Четверг, 07.07.2016, 11:12 | Сообщение № 135

Группа: Пользователи

Ранг: Прохожий

Сообщений: 1

Репутация: 0 ±

Замечаний: 0% ±

Excel 2010

Здравствуйте!
Сделайте, пожалуйста, что бы писало "белорусских рублей"

К сообщению приложен файл: 0990483.xls (61.5 Kb)

Ответить

Дата: Четверг, 07.07.2016, 11:44 | Сообщение № 136

Группа: Модераторы

Ранг: Экселист

Сообщений: 7029

Репутация: 1078 ±

Замечаний: 0% ±

Excel 2007;2010;2016

ну навскидку вот так . в первом приближении. получается "белорусских рубль" .но "белорусских рублей"

К сообщению приложен файл: 8624786.xls (62.0 Kb)

Не судите очень строго:я пытаюсь научиться
ЯД 41001877306852

Ответить

Дата: Четверг, 15.09.2016, 08:36 | Сообщение № 137

Группа: Пользователи

Ранг: Прохожий

Сообщений: 1

Репутация: 0 ±

Замечаний: 0% ±

Excel 2010

MCH, MCH, Здравствуйте, помогите пожалуйста сделать чтоб 00 дирам тоже выходило, сейчас например число 3,0 выходит Се сомони, а надо Се сомони 0 дирам. Заранее благодарен

Ответить

Дата: Понедельник, 17.10.2016, 16:31 | Сообщение № 138

Группа: Пользователи

Ранг: Прохожий

Сообщений: 2

Репутация: 0 ±

Замечаний: 0% ±

Excel 2013

Добрый день, MCH! Прошу помощи. Скачал вашу формулу sum_spell34kop.xls (Спасибо большое), можно её доработать, чтобы в итоги получалось так, (например) из суммы
1355172,37 (Один миллион триста пятьдесят пять тысяч сто семьдесят два) рубля 37 (Тридцать семь) копеек
Чтобы присутствовали скобки, копейки прописывались цифрами и прописью в скобках как в примере.
Очень прошу помочь!
Заранее большое спасибо!
P.S. Ниже прикреплен файл с вашей формулой (sum_spell34kop.xls) только под другим названием

К сообщению приложен файл: 9150863.xls (65.5 Kb)

Сообщение отредактировал zub777 - Понедельник, 17.10.2016, 16:34

Ответить

Дата: Вторник, 18.10.2016, 08:18 | Сообщение № 139

Группа: Админы

Ранг: Старожил

Сообщений: 2004

Репутация: 752 ±

Замечаний: ±

zub777, так нужно? (см. вложение)

К сообщению приложен файл: SumRubKop.xlsx (15.9 Kb)

Ответить

Дата: Вторник, 18.10.2016, 09:39 | Сообщение № 140

Группа: Пользователи

Ранг: Прохожий

Сообщений: 2

Репутация: 0 ±

Замечаний: 0% ±

Excel 2013

Добрый день, MCH? Большое Спасибо! Работаю в сфере здравоохранения в гос. закупках, данный формат был утвержден для написания Цены в контракте.
Большое Спасибо!!!!!!

Ответить

Суммы и числа прописью (Excel)

Страница 7 из 12
«
1
2
…
5
6
7
8
9
…
11
12
»

© 2010-2024 · Дизайн: MichaelCH · Хостинг от uCoz · При использовании материалов сайта, ссылка на www.excelworld.ru обязательна!