![]() |
|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
![]() |
|
|
Опции темы | Поиск в этой теме |
![]() |
#1 |
Пользователь
Регистрация: 06.01.2012
Сообщений: 33
|
![]()
Помогите пожалуйста упростить конструкцию в VBA.
Код:
Думал что-то такого типа но это не работает: Код:
![]() Последний раз редактировалось mrMad-Cat; 12.07.2012 в 12:13. |
![]() |
![]() |
![]() |
#2 |
Форумчанин
Регистрация: 30.01.2008
Сообщений: 314
|
![]()
b = 110 - 11*a
|
![]() |
![]() |
![]() |
#3 |
Старожил
Регистрация: 31.12.2010
Сообщений: 2,133
|
![]()
Если VBA Excel, то можно использовать функции листа ПРОСМОТР, ВПР, ПОИСКПОЗ и т.д.
Код:
exceleved@yandex.ru Яндекс.Деньги: 410011500007619
|
![]() |
![]() |
![]() |
#4 |
Пользователь
Регистрация: 06.01.2012
Сообщений: 33
|
![]()
slan я не это имел ввиду. Вы слишком прям опосмотрели на это дело, но спаисбо за внимание.
![]() ![]() Меня интересуют текстовые значения и математической формулой тут не обойтись: Код:
|
![]() |
![]() |
![]() |
#5 |
Старожил
Регистрация: 31.12.2010
Сообщений: 2,133
|
![]()
Вам название месяца надо получить по его номеру, или это опять совпадение?
Код:
Код:
exceleved@yandex.ru Яндекс.Деньги: 410011500007619
Последний раз редактировалось Казанский; 12.07.2012 в 13:01. |
![]() |
![]() |
![]() |
#6 |
Старожил
Регистрация: 11.05.2010
Сообщений: 5,166
|
![]() Код:
![]() И бинарное отрицание вообще-то лишнее, ну пусть остаётся... А вариант Казанского зависим от локали ![]() У меня всё время январь рисовал. А вот так работает (не не по-русски): Код:
webmoney: E265281470651 Z422237915069 R418926282008
Последний раз редактировалось Hugo121; 12.07.2012 в 13:34. |
![]() |
![]() |
![]() |
#7 |
Участник клуба
Регистрация: 02.05.2010
Сообщений: 1,390
|
![]()
в аутглюке тоже есть MonthName Function
b=monthname(a)
mailto: kuklp60@gmail.com, ящики для благодарностей:
WM Z206653985942, R334086032478, U238399322728 |
![]() |
![]() |
![]() |
#8 |
Пользователь
Регистрация: 06.01.2012
Сообщений: 33
|
![]()
Казанский, Да, это не совпадение, меня действительно интересуют месяца, но вопрос я задавал всетаки более общий так как интересно знать более универсальное решение.
Вариант kuklp подкупает своей гениальной простотой, только есть пробелма с форматом дат в системе. На украинской системе название месяца будет украинское, на английской - английское и т.п. Нужно русское. Можно возможно усложнить что-то в форматах. Hugo121, спасибо, сейчас попробую осмыслить ваш вариант... |
![]() |
![]() |
![]() |
#9 |
Старожил
Регистрация: 11.05.2010
Сообщений: 5,166
|
![]()
Ещё такой универсальный вариант:
Код:
![]() Если словарь получается большим, то его есть смысл сделать публичным и заполнить один раз (при открытии файла или при первом вызове), а дальше только использовать (если конечно он нужен больше одного раза за сеанс ![]() Тогда и массивы нужны только один раз, при заполнении словаря - т.е. эту процедуру есть смысл вынести отдельно.
webmoney: E265281470651 Z422237915069 R418926282008
Последний раз редактировалось Hugo121; 12.07.2012 в 13:49. |
![]() |
![]() |
![]() |
#10 |
Пользователь
Регистрация: 06.01.2012
Сообщений: 33
|
![]()
Ну что ж, я использовал вариант Hugo121:
Код:
Чего-то мне казалось что универсальный вариант будет намного проще. Хотя если присмотреться он не такой уж и сложный ведь сводится до 6 строчек: Код:
|
![]() |
![]() |
![]() |
|
![]() |
||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Упрощение кода. Паскаль. | ArsGo | Помощь студентам | 4 | 21.09.2011 03:10 |
суммирование по двум критериям по 2-м спискам соответсвий | kievlyanin | Microsoft Office Excel | 11 | 03.08.2011 18:14 |
VBA.Циклы.Линейные алгоритмы.Условные конструкции. | Екатерина нск | Помощь студентам | 1 | 17.01.2010 17:37 |
Упрощение кода | R@Ziel | Помощь студентам | 0 | 26.12.2009 20:27 |
Упрощение дроби | k1r1ch | Общие вопросы Delphi | 2 | 10.10.2009 16:16 |