Не дописала)) Поняла, где нужно изментиь слово копеек на долларов и с центами тоже. Окончания тоже удалось сделать правильными. Единственно, никак не пойму, что нужно изменить в формуле, чтобы сумма писалась с маленькой буквы. Может подскажете?
Не дописала)) Поняла, где нужно изментиь слово копеек на долларов и с центами тоже. Окончания тоже удалось сделать правильными. Единственно, никак не пойму, что нужно изменить в формуле, чтобы сумма писалась с маленькой буквы. Может подскажете?SNN
MCH, Здравствуйте! Отличная формула, но прошу Вас сделать её ещё лучше (покажу на примере числа 43159). На данный момент формула выдает так: Сорок три тысячи сто пятьдесят девять рублей 00 копеек. Нуждаюсь в таком виде: (Сорок три тысячи сто пятьдесят девять) рублей 00 копеек. То есть необходимо заключить сумму прописью в скобки. P.S. Пробовали сам, получалось вот так: ( Сорок три тысячи сто пятьдесят девять ) рублей 00 копеек. То есть появлялись не нужные пробелы после и перед скобками.
MCH, Здравствуйте! Отличная формула, но прошу Вас сделать её ещё лучше (покажу на примере числа 43159). На данный момент формула выдает так: Сорок три тысячи сто пятьдесят девять рублей 00 копеек. Нуждаюсь в таком виде: (Сорок три тысячи сто пятьдесят девять) рублей 00 копеек. То есть необходимо заключить сумму прописью в скобки. P.S. Пробовали сам, получалось вот так: ( Сорок три тысячи сто пятьдесят девять ) рублей 00 копеек. То есть появлялись не нужные пробелы после и перед скобками.VldmrDnlv
Добрый день всем, плиз помогите, нужен макрос или формула. для "суммапрописью" но только что б в место "рублей" и "копеек"отражалось "сум", формулу на кирилице ПРИМЕР: В строке " 11 600 (Одиннадцать тысяч шестьсот) сум" так как суммы всегда округленные то отражение копеек не нужно. Заранее огромное спасибо за любой ответ. Excel 2016 .
Добрый день всем, плиз помогите, нужен макрос или формула. для "суммапрописью" но только что б в место "рублей" и "копеек"отражалось "сум", формулу на кирилице ПРИМЕР: В строке " 11 600 (Одиннадцать тысяч шестьсот) сум" так как суммы всегда округленные то отражение копеек не нужно. Заранее огромное спасибо за любой ответ. Excel 2016 .Ruslanzzzz
Сообщение отредактировал Ruslanzzzz - Пятница, 05.01.2018, 12:30
Нужно что б печатались 1 и 3 ячейки Или что б не печаталось содержание "0" (вся 2 строка). ячейки с номером ячейки (позиции) можно не задавать на печать.
Заранее огромное спасибо за любой ответ. Excel2016
Подскажите пожалуйста, как в эксель задать на печать только содержащие значение ячейки ПРИМЕР:
Нужно что б печатались 1 и 3 ячейки Или что б не печаталось содержание "0" (вся 2 строка). ячейки с номером ячейки (позиции) можно не задавать на печать.
Заранее огромное спасибо за любой ответ. Excel2016Ruslanzzzz
Есть отчет, в нем суммируются данные и выводиться итого в цифрах. Ниже нужно указать сумму прописью.
Можно как-то формулу добавить в быстрые функции, что бы при необходимости в любой ячейке можно было вывести данные из другой ячейки - прописью на примере. в ячейке F5 - вывести сумму прописью из ячейки С4, через действие F5=(формула из быстрой функции) ячейки С4
Здравствуйте Подскажите пожалуйста.
А как сделать следующее.
Есть отчет, в нем суммируются данные и выводиться итого в цифрах. Ниже нужно указать сумму прописью.
Можно как-то формулу добавить в быстрые функции, что бы при необходимости в любой ячейке можно было вывести данные из другой ячейки - прописью на примере. в ячейке F5 - вывести сумму прописью из ячейки С4, через действие F5=(формула из быстрой функции) ячейки С4Maoys
Я наверное не верно выразился. Подскажите пожалуйста как сделать так что бы сумма прописывалась из любой ячейки. В примерах показано что данные берутся из А1, а мне скажем нужны данные из H9. Как можно быстро адаптировать формулу под нужную ячейку.
Во вложении пример файла.
Я наверное не верно выразился. Подскажите пожалуйста как сделать так что бы сумма прописывалась из любой ячейки. В примерах показано что данные берутся из А1, а мне скажем нужны данные из H9. Как можно быстро адаптировать формулу под нужную ячейку.
Как можно быстро адаптировать формулу под нужную ячейку.
На примере Вашего файла: 1. Выделите ячейку B2 с формулой прописи, скопируйте ячейку (Ctrl+C) 2. Выделите ячейку I9 (ближайшая ячейка справа от ячейки с числом), сделайте вставку (Ctrl+V) 3. Перенесите полученный результат (ячейку) в нужное место
Вар.2: можно заменить ссылки в формуле через инструмент поиск/замена
Как можно быстро адаптировать формулу под нужную ячейку.
На примере Вашего файла: 1. Выделите ячейку B2 с формулой прописи, скопируйте ячейку (Ctrl+C) 2. Выделите ячейку I9 (ближайшая ячейка справа от ячейки с числом), сделайте вставку (Ctrl+V) 3. Перенесите полученный результат (ячейку) в нужное место
Вар.2: можно заменить ссылки в формуле через инструмент поиск/заменаMCH
Добрый день. Нуждаюсь в помощи. Использую надстройку указанную ниже для прописи суммы. Пропись выглядит следующим образом "14=Четырнадцать рублей 00 копеек"
Желаемое. 1) иногда требуется такой вариант "14=(Четырнадцать) рублей 00 копеек." 2) основной вопрос. Как во всей этой прелести добавить ФРАЗУ в конце.. "14=(Четырнадцать) рублей 00 копеек. НДС не облагается [пункт 2, статьи 149, НК РФ]."
@@@
Function СУММАПРОПИСЬ$(chislo#) Dim rub$, kop$, ed, des, sot, nadc, razr, i&, m$ If chislo >= 1E+15 Or chislo < 0 Then Exit Function
rub = Left(Format(chislo, "000000000000000.00"), 15) kop = Right(Format(chislo, "0.00"), 2)
If CDbl(rub) = 0 Then m = "ноль " For i = 1 To Len(rub) Step 3 If Mid(rub, i, 3) <> "000" Or i = Len(rub) - 2 Then m = m & sot(CInt(Mid(rub, i, 1))) & IIf(Mid(rub, i + 1, 1) = "1", nadc(CInt(Mid(rub, i + 2, 1))), _ des(CInt(Mid(rub, i + 1, 1))) & ed(CInt(Mid(rub, i + 2, 1)) + IIf(i = Len(rub) - 5 And CInt(Mid(rub, i + 2, 1)) < 3, 10, 0))) & _ IIf(Mid(rub, i + 1, 1) = "1" Or (Mid(rub, i + 2, 1) + 9) Mod 10 >= 4, razr(i + 1), IIf(Mid(rub, i + 2, 1) = "1", razr(i - 1), razr(i))) End If Next i СУММАПРОПИСЬ = UCase(Left(m, 1)) & Mid(m, 2) & kop & " копе" & IIf(kop \ 10 = 1 Or ((kop + 9) Mod 10) >= 4, "ек", IIf(kop Mod 10 = 1, "йка", "йки")) End Function
Добрый день. Нуждаюсь в помощи. Использую надстройку указанную ниже для прописи суммы. Пропись выглядит следующим образом "14=Четырнадцать рублей 00 копеек"
Желаемое. 1) иногда требуется такой вариант "14=(Четырнадцать) рублей 00 копеек." 2) основной вопрос. Как во всей этой прелести добавить ФРАЗУ в конце.. "14=(Четырнадцать) рублей 00 копеек. НДС не облагается [пункт 2, статьи 149, НК РФ]."
@@@
Function СУММАПРОПИСЬ$(chislo#) Dim rub$, kop$, ed, des, sot, nadc, razr, i&, m$ If chislo >= 1E+15 Or chislo < 0 Then Exit Function
rub = Left(Format(chislo, "000000000000000.00"), 15) kop = Right(Format(chislo, "0.00"), 2)
If CDbl(rub) = 0 Then m = "ноль " For i = 1 To Len(rub) Step 3 If Mid(rub, i, 3) <> "000" Or i = Len(rub) - 2 Then m = m & sot(CInt(Mid(rub, i, 1))) & IIf(Mid(rub, i + 1, 1) = "1", nadc(CInt(Mid(rub, i + 2, 1))), _ des(CInt(Mid(rub, i + 1, 1))) & ed(CInt(Mid(rub, i + 2, 1)) + IIf(i = Len(rub) - 5 And CInt(Mid(rub, i + 2, 1)) < 3, 10, 0))) & _ IIf(Mid(rub, i + 1, 1) = "1" Or (Mid(rub, i + 2, 1) + 9) Mod 10 >= 4, razr(i + 1), IIf(Mid(rub, i + 2, 1) = "1", razr(i - 1), razr(i))) End If Next i СУММАПРОПИСЬ = UCase(Left(m, 1)) & Mid(m, 2) & kop & " копе" & IIf(kop \ 10 = 1 Or ((kop + 9) Mod 10) >= 4, "ек", IIf(kop Mod 10 = 1, "йка", "йки")) End Functiongoodtrip
Вход
Регистрация
Напомнить пароль
Автосумма
Часто используемые
ВПР
ЕСЛИ
СУММЕСЛИ
Финансовые
Логические
Текстовые
Даты и времени 
Ссылки и массивы 
Математические
Другие функции
Проверка свойств и значений
Баз данных
Математические
Обработки массивов
Обработки строк
Преобразования типов данных 
Загрузки данных
Работы с файлами
Обработки системных параметров
Обработки цвета
Работы с датами и временем
Преобразования в системы счисления
Финансовые
Может подскажете?
