Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Вес прописью / 20 сообщений из 20, страница 1 из 1
08.12.2008, 23:41
    #35701315
Sebastian
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Вес прописью
Уважаемые знатоки Excel,
помогите, пожалуйста. Что надо переделать, чтобы он правильно показывал граммы?
Очень-очень надо.
...
Рейтинг: 0 / 0
09.12.2008, 09:26
    #35701650
big-duke
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Вес прописью
Kg_gr = Kg_gr * 1000
Kg_gr = Int(CDbl(CStr(Kg_gr)))
If Kg_gr > 99999999999999# Then
КГ_ГР_ПРОПИСЬЮ = "Слишком большое число!!!"
Exit Function
End If
КГ_ГР_ПРОПИСЬЮ = Right(CStr(Kg_gr), 3) & " гр"
If Len(CStr(Kg_gr)) = 1 Then КГ_ГР_ПРОПИСЬЮ = "0" & КГ_ГР_ПРОПИСЬЮ
КГ_ГР_ПРОПИСЬЮ = "кг " & КГ_ГР_ПРОПИСЬЮ
Kg_gr = Int(Kg_gr / 1000)


ps
Код безумно кривой, найдите нормальный код для перевода в пропись
...
Рейтинг: 0 / 0
09.12.2008, 11:52
    #35702107
Sebastian
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Вес прописью
big-dukeKg_gr = Kg_gr * 1000
Kg_gr = Int(CDbl(CStr(Kg_gr)))
If Kg_gr > 99999999999999# Then
КГ_ГР_ПРОПИСЬЮ = "Слишком большое число!!!"
Exit Function
End If
КГ_ГР_ПРОПИСЬЮ = Right(CStr(Kg_gr), 3) & " гр"
If Len(CStr(Kg_gr)) = 1 Then КГ_ГР_ПРОПИСЬЮ = "0" & КГ_ГР_ПРОПИСЬЮ
КГ_ГР_ПРОПИСЬЮ = "кг " & КГ_ГР_ПРОПИСЬЮ
Kg_gr = Int(Kg_gr / 1000)


ps
Код безумно кривой, найдите нормальный код для перевода в пропись

Ох, Большой Дюк, я уж так правила - граммы пишет правильно, зато в килограммах не пойми что.
Код по переводу веса в пропись искала по всем поисковикам - нигде не нашла.
Мне нужно, чтобы он прикреплялся к книге - там будет очень много листов.
Большое спасибо за то что откликнулись.
Обливаюсь горькими слезами и пишу всё вручную.
...
Рейтинг: 0 / 0
09.12.2008, 13:55
    #35702606
_slan_
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Вес прописью
Sebastian,
вот Вам скорректированный файл.

Но в принципе - не надо искать пропись именно граммов, можно взять любую пропись и приделать к ней граммы - они то не прописью.
...
Рейтинг: 0 / 0
09.12.2008, 14:05
    #35702642
Sebastian
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Вес прописью
_slan_Sebastian,
вот Вам скорректированный файл.

Но в принципе - не надо искать пропись именно граммов, можно взять любую пропись и приделать к ней граммы - они то не прописью.

Слэн, спасибо большое, но килограммы-то неправильно пишутся!
Пожалуйста, за ради Христа, доделай до конца, ну не могу я сама, чеслово!
...
Рейтинг: 0 / 0
09.12.2008, 14:37
    #35702776
СамБамбук
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Вес прописью
строка 23 - делить НЕ надо ...
...
Рейтинг: 0 / 0
09.12.2008, 14:47
    #35702810
_slan_
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Вес прописью
:) - ну да, умножение то я закомментировал, тогда и делить не надо
...
Рейтинг: 0 / 0
09.12.2008, 15:18
    #35702945
Sebastian
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Вес прописью
"СамБамбук
Guest строка 23 - делить НЕ надо ... "

_slan_:) - ну да, умножение то я закомментировал, тогда и делить не надо

Ой, мальчики, миленькие!
Спасибо вам огромное-преогромное, вы даже не представляете как вы меня спасли!
...
Рейтинг: 0 / 0
Период между сообщениями больше года.
20.06.2010, 21:29
    #36697344
bada78
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Вес прописью
Извиняюсь за ап старой темки, но не могу сообразить где и как отредактировать чтобы вместо "кг" писало "т" , а вместо "гр" писало "кг"

Помогите пожалуйста.
...
Рейтинг: 0 / 0
20.06.2010, 22:20
    #36697403
nilem
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Вес прописью
bada78,
См. файл
...
Рейтинг: 0 / 0
21.06.2010, 22:52
    #36699398
bada78
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Вес прописью
nilembada78,
См. файл
Спасибо огромное.
только вместо "тн" мне нужно, "т" , подскажите где вы правите?
и еще проблемка если например:
"21.3" --> "двадцать один т. 300 кг" , а правельнее будет "одна"
...
Рейтинг: 0 / 0
21.06.2010, 23:22
    #36699427
vlth
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Вес прописью
bada78... и еще проблемка если например:
"21.3" --> "двадцать один т. 300 кг" , а правельнее будет "одна"

правельнее © будет "прав и льнее"
...
Рейтинг: 0 / 0
21.06.2010, 23:30
    #36699435
bada78
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Вес прописью
vlth,

Я то в курсе, что так пишется,очепятка. Это во всем виновата пропись веса руками:)
А по теме есть че?
...
Рейтинг: 0 / 0
21.06.2010, 23:39
    #36699439
vlth
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Вес прописью
bada78,

Попробуйте зайти в редактор VBA (Alt + F11) и в поиске (Ctrl + F) исследовать все эти
тонны, килограммы, граммы и пр.
Заодно, я уверен, опыта наберётесь


Удачи!
...
Рейтинг: 0 / 0
21.06.2010, 23:59
    #36699450
bada78
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Вес прописью
vlth,

Спасибо огромное.
Теперь без проблем все сделаю.
Еще раз спасибо.
...
Рейтинг: 0 / 0
31.08.2010, 17:20
    #36821836
beaves
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Вес прописью
F как этот макрос применить на другом файле экселя?
...
Рейтинг: 0 / 0
01.09.2010, 01:33
    #36822641
AndreTM
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Вес прописью
beavesF как этот макрос применить на другом файле экселя?
1) Поместите этот макрос в чистую книгу, желательно также перед UDF поставить Public. Сохраните книгу как надстройку (*.xla). Можете положить в стандартный каталог %USERPROFILE%\Application Data\Microsoft\AddIns\, можете куда угодно.
2) ЗапустИте Excel, выберите Сервис-Надстройки и подключИте этот ваш файл.

Недостаток: подключенные надстройки линкуются прямо к приложению, причем без предупреждения о макросах, так что функции станут доступны всегда; хотя расположение в локальном каталоге приводит к неприятным последствиям - на другой машине ссылка будет недоступна, так что надстройку надо либо размещать на расшаренном ресурсе, либо заново прилинковывать формулу.
Достоинство: можно без напряга создать собственную библиотеку общих функций.
...
Рейтинг: 0 / 0
12.05.2011, 19:03
    #37257834
bada78
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Вес прописью
Снова актуально,заплачу за помощь.


Excel 2003
необходимо преобразовывать
21.55 --->> Двадцать одна т. 550 кг.

Icq для связи 265два66семь8ноль
...
Рейтинг: 0 / 0
13.05.2011, 10:50
    #37258511
PlanB
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Вес прописью
bada78Снова актуально,заплачу за помощь.


Excel 2003
необходимо преобразовывать
21.55 --->> Двадцать одна т. 550 кг.

Icq для связи 265два66семь8нольесть несколько вариантов
1. вы пытаетесь научиться сами. выкладываете свои попытки и вам помогают (бесплатно);
2. вы перестаете изобретать велосипед с макросами и организоваваете всё по-другому: либо без vba (в котором вы не понимаете) - формулами, либо прото без буковок в циферки;
3. вы ищете специализированные организации, коих масса по данной теме;
4. уже ни раз обсуждалось, и, если не ошибаюсь, стандартная цена ответа на этом форуме при вашей постановке вопроса - 5 тыс рублей.
...
Рейтинг: 0 / 0
13.05.2011, 11:50
    #37258709
Михаил Ч.
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Вес прописью
Решение на формулах, считает до тысяч (легко можно переделать до млн/млрд).
...
Рейтинг: 0 / 0
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Вес прописью / 20 сообщений из 20, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]