Mail.ruПочтаМой МирОдноклассникиВКонтактеИгрыЗнакомстваНовостиКалендарьОблакоЗаметкиВсе проекты

Формула Excel Эксель. Как изменить формулу сумма прописью на украинском языке? В слове Вісімдесят две ошибки

Я Ученик (202), на голосовании 7 лет назад
Дана формула для ячейки B2: ↓
=ИНДЕКС (усот; ОСТАТ (ОТБР (B2/10^8);10)+1)&ЕСЛИ (ОСТАТ (ОТБР (B2/10^7);10)=1;ИНДЕКС (уцат; ОСТАТ (ОТБР (B2/10^6);10)+1);ИНДЕКС (удес; ОСТАТ (ОТБР (B2/10^7);10)))&ЕСЛИ (ОСТАТ (ОТБР (B2/10^7);10)<>1;ИНДЕКС (уед; ОСТАТ (ОТБР (B2/10^6);10)+1);"")&ЕСЛИ (ОСТАТ (ОТБР (B2/10^6);1000);ЕСЛИ (ОСТАТ (ОТБР (B2/10^7);10)=1;"мільйонів ";ВПР (ОСТАТ (ОТБР (B2/10^6);10);умил; 2));"")&ИНДЕКС (усот; ОСТАТ (ОТБР (B2/10^5);10)+1)&ЕСЛИ (ОСТАТ (ОТБР (B2/10^4);10)=1;ИНДЕКС (уцат; ОСТАТ (ОТБР (B2/10^3);10)+1);ИНДЕКС (удес; ОСТАТ (ОТБР (B2/10^4);10)))&ЕСЛИ (ОСТАТ (ОТБР (B2/10^4);10)<>1;ИНДЕКС (уедж; ОСТАТ (ОТБР (B2/1000);10)+1);"")&ЕСЛИ (ОСТАТ (ОТБР (B2/1000);1000);ЕСЛИ (ОСТАТ (ОТБР (B2/10^4);10)=1;"тисяч ";ВПР (ОСТАТ (ОТБР (B2/1000);10);утыс; 2));"")&ИНДЕКС (усот; ОСТАТ (ОТБР (B2/100);10)+1)&ЕСЛИ (ОСТАТ (ОТБР (B2/10);10)=1;ИНДЕКС (уцат; ОСТАТ (ОТБР (B2);10)+1);ИНДЕКС (удес; ОСТАТ (ОТБР (B2/10);10)))&ЕСЛИ (ОТБР (B2)=0;"нуль ";ЕСЛИ (ОСТАТ (ОТБР (B2/10);10)<>1;ИНДЕКС (уедж; ОСТАТ (ОТБР (B2);10)+1);""))&ЕСЛИ (ОСТАТ (ОТБР (B2/10);10)=1;"гривень";ВПР (ОСТАТ (ОТБР (B2);10);грив; 2))&ТЕКСТ (ОТБР ((B2-ОТБР (B2)+0.00001)*100);" 00_ коп.")

Эта формула результат пишет не правильно. Если в ячейке 80,00 то формула пишет: вісімідеят гривень 00 коп.
В слове «вісімідеят» 2 ошибки:
1 ошибка: после буквы «м» не должно быть буквы «і»;
2 ошибка: после буквы «е» должна быть буква «с».
Надо писать: Вісімдесят гривень 00 копiйок

Даю слова, которые необходимы для формулы:
гривень
копiйок

одна
дві
три
чотири
п'ять
шість
сім
вісім
дев'ять
десять
одинадцать
дванадцять
тринадцять
чотирнадцять
п'ятнадцять
шістнадцять
сімнадцять
вісімнадцять
дев'ятнадцять
двадцять
тридцять
сорок
п'ятдесят
шістдесят
сімдесят
вісімдесят
дев'яносто
сто
двісті
триста
чотириста
п'ятсот
шістсот
сімсот
вісімсот
дев'ятсот

Вот формула на русском языке для ячейки B2 : =ИНДЕКС (сот; ОСТАТ (ОТБР (B2/10^8);10)+1)&ЕСЛИ (ОСТАТ (ОТБР (B2/10^7);10)=1;ИНДЕКС (цать; ОСТАТ (ОТБР (B2/10^6);10)+1);ИНДЕКС (дес; ОСТАТ (ОТБР (B2/10^7);10)))&ЕСЛИ (ОСТАТ (ОТБР (B2/10^7);10)<>1;ИНДЕКС (ед; ОСТАТ (ОТБР (B2/10^6);10)+1);"")&ЕСЛИ (ОСТАТ (ОТБР (B2/10^6);1000);ЕСЛИ (ОСТАТ (ОТБР (B2/10^7);10)=1;"миллионов ";ВПР (ОСТАТ (ОТБР (B2/10^6);10);мил; 2));"")&ИНДЕКС (сот; ОСТАТ (ОТБР (B2/10^5);10)+1)&ЕСЛИ (ОСТАТ (ОТБР (B2/10^4);10)=1;ИНДЕКС (цать; ОСТАТ (ОТБР (B2/10^3);10)+1);ИНДЕКС (дес; ОСТАТ (ОТБР (B2/10^4);10)))&ЕСЛИ (ОСТАТ (ОТБР (B2/10^4);10)<>1;ИНДЕКС (едж; ОСТАТ (ОТБР (B2/1000);10)+1);"")&ЕСЛИ (ОСТАТ (ОТБР (B2/1000);1000);ЕСЛИ (ОСТАТ (ОТБР (B2/10^4);10)=1;"тысяч ";ВПР (ОСТАТ (ОТБР (B2/1000);10);тыс; 2));"")&ИНДЕКС (сот; ОСТАТ (ОТБР (B2/100);10)+1)&ЕСЛИ (ОСТАТ (ОТБР (B2/10);10)=1;ИНДЕКС (цать; ОСТАТ (ОТБР (B2);10)+1);ИНДЕКС (дес; ОСТАТ (ОТБР (B2/10);10)))&ЕСЛИ (ОТБР (B2)=0;"ноль ";ЕСЛИ (ОСТАТ (ОТБР (B2/10);10)<>1;ИНДЕКС (ед; ОСТАТ (ОТБР (B2);10)+1);""))&ЕСЛИ (ОСТАТ (ОТБР (B2/10);10)=1;"рублей";ВПР (ОСТАТ (ОТБР (B2);10);руб; 2))&ТЕКСТ (ОТБР ((B2-ОТБР (B2)+0.00001)*100);" 00_ коп.")
Голосование за лучший ответ
Oleh Huz' Просветленный (49566) 7 лет назад
возможно ошибаюсь... но не может быть из - за настроек региональных параметров?
Я Ученик (202) 7 лет назад
Нет. Это ошибка наверное в формуле. Может подскажите кто может помочь? На русском языке пишет правильно.
Мне нужна формула, а не сумма прописью реализована в виде UDF (макросами).
Ampersand Гуру (2931) 7 лет назад
Я Ученик (202) 7 лет назад
Спасибо за ответ. Мне нужна именно формула, а не сумма прописи реализована в виде UDF (макросами). =MSumPropUkr(A1)

Так как:
Во-первых: я её использовал уже в одной книге на многих листах книги и переносить в файл я не смогу; Я только сейчас заметил ошибку в слове Вісімдесят.

Во-вторых: я её использую, что бы она писала сумму прописью на украинском языке в скобках – к готовой формуле я добавил скобки: ="("")")"

Если эту формулу нельзя исправить то как этот макрос =MSumPropUkr(A1) можно перенести в мой рабочий файл? Можете ли Вы мне помочь?
Похожие вопросы