Сумма прописью на Казахском языке - Microsoft Office Excel - Страница 2

baaur · 25.06.2013, 12:00

Большое вам всем спасибо!
Попробую, как получится отпишусь.

baaur · 25.06.2013, 12:03

Ура ура ура получилось!!!
Спасибо еще раз вам за помощь!!!

Hugo121 · 25.06.2013, 12:35

Так показали бы исправленный код - кто-то из ваших земляков будет избавлен от аналогичной проблемы.

baaur · 25.06.2013, 12:42

Обязательно выложу как доделаю, на данный момент переделываю.

baaur · 25.06.2013, 14:02

Еще раз спасибо всем!
Выкладываю исправленный код.

Hugo121 · 25.06.2013, 14:11

Пробелы пропали в

Код:

num_propis(1) = "бір"
num_propis(2) = "екі"

Это ошибка? Или так должно быть?

baaur · 25.06.2013, 14:20

Цитата:

Сообщение от Hugo121

Пробелы пропали в

Код:

num_propis(1) = "бір"
num_propis(2) = "екі"

Это ошибка? Или так должно быть?

Исправил. Спасибо за замечание.
Но это не совсем ошибка так как данные именно на 1,2 берет и отсюда:
If i = 2 Then txt = txt & "бір " Else txt = txt & "бір "
If i = 2 Then txt = txt & "екi " Else txt = txt & "екi "

Hugo121 · 26.06.2013, 09:35

А вот тут непонятно:

Код:

If i = 2 Then txt = txt & "бір " Else txt = txt & "бір "
If i = 2 Then txt = txt & "екi " Else txt = txt & "екi "

Это зачем? Смысла нет.
Да и не только там:

Код:

If i = 2 Then txt = txt & "бір " Else txt = txt & "бір "
If i = 2 Then txt = txt & "екi " Else txt = txt & "екi "
If n = 1 Then txt = txt + "мы" & ChrW(1187) & " " Else txt = txt + "мы" & ChrW(1187) & " "
If n = 1 Then txt = txt + "миллион " Else txt = txt + "миллион "
If n = 1 Then txt = txt + "миллиард " Else txt = txt + "миллиард "
If n = 1 Then txt = txt + "те" & ChrW(1187) & "ге" Else txt = txt + "те" & ChrW(1187) & "ге"

baaur · 01.07.2013, 14:37

Цитата:

Сообщение от Hugo121

А вот тут непонятно:

Код:

If i = 2 Then txt = txt & "бір " Else txt = txt & "бір "
If i = 2 Then txt = txt & "екi " Else txt = txt & "екi "

Это зачем? Смысла нет.
Да и не только там:

Код:

If i = 2 Then txt = txt & "бір " Else txt = txt & "бір "
If i = 2 Then txt = txt & "екi " Else txt = txt & "екi "
If n = 1 Then txt = txt + "мы" & ChrW(1187) & " " Else txt = txt + "мы" & ChrW(1187) & " "
If n = 1 Then txt = txt + "миллион " Else txt = txt + "миллион "
If n = 1 Then txt = txt + "миллиард " Else txt = txt + "миллиард "
If n = 1 Then txt = txt + "те" & ChrW(1187) & "ге" Else txt = txt + "те" & ChrW(1187) & "ге"

Вполне возможно так как я не спец в макросах я не спорю, возможно вы и правы!!!

MCH · 01.07.2013, 21:06

Как то писал пропись на таджикском, туркменском, азербайджанском, турецком.
Судя по числителным, то формирование числительных на казахском языке очень похожа на туркменский или азербайджанский язык.

Посмотрите, может получится переделать: http://www.excelworld.ru/forum/3-3521-1
Сам код небольшой - строчек на 15

25.06.2013, 12:35	#13
Hugo121 Старожил Регистрация: 11.05.2010 Сообщений: 5,170	Так показали бы исправленный код - кто-то из ваших земляков будет избавлен от аналогичной проблемы. webmoney: E265281470651 Z422237915069 R418926282008

25.06.2013, 14:11	#16
Hugo121 Старожил Регистрация: 11.05.2010 Сообщений: 5,170	Пробелы пропали в Код: `num_propis(1) = "бір" num_propis(2) = "екі"` Это ошибка? Или так должно быть? webmoney: E265281470651 Z422237915069 R418926282008

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
Сумма Прописью	ins813	Общие вопросы Delphi	6	04.10.2012 21:47
Сумма Прописью	olegwolf	Microsoft Office Excel	4	11.05.2010 11:45
Сумма прописью	Averess	Microsoft Office Excel	1	13.02.2009 11:13
Сумма прописью в 1С	Aleksandr	Свободное общение	2	27.08.2007 15:59
Сумма прописью	Fainder	Microsoft Office Excel	6	17.03.2007 10:43

25.06.2013, 12:00	#11
baaur Пользователь Регистрация: 20.03.2010 Сообщений: 15	Большое вам всем спасибо! Попробую, как получится отпишусь.

25.06.2013, 12:03	#12
baaur Пользователь Регистрация: 20.03.2010 Сообщений: 15	Ура ура ура получилось!!! Спасибо еще раз вам за помощь!!!

25.06.2013, 12:42	#14
baaur Пользователь Регистрация: 20.03.2010 Сообщений: 15	Обязательно выложу как доделаю, на данный момент переделываю.

01.07.2013, 21:06	#20
MCH Форумчанин Регистрация: 21.11.2010 Сообщений: 326	Как то писал пропись на таджикском, туркменском, азербайджанском, турецком. Судя по числителным, то формирование числительных на казахском языке очень похожа на туркменский или азербайджанский язык. Посмотрите, может получится переделать: http://www.excelworld.ru/forum/3-3521-1 Сам код небольшой - строчек на 15