Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Microsoft Office и VBA программирование > Microsoft Office Excel
Регистрация

Восстановить пароль

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 29.07.2014, 12:15   #31
Hugo121
Старожил
 
Регистрация: 11.05.2010
Сообщений: 5,170
По умолчанию

Можно сделать как угодно - всё зависит от конкретной задачи.
Конечно если все листы однотипны, особенно если они вообще идентичны и отличаются только данными - то есть прямой смысл всюду использовать один макрос.
Обычно макрос записывается без привязки к листу, он обычно работает с активным листом - значит просто меняем в цикле активные листы.
Следующий шаг - ориентируем макрос на работу с объектом-листом, и в цикле меняем этот объект - так будет быстрее и "технологичнее".
Ну а в идеале - вообще не использовать формулы листа и эти листы, просто брать исходные данные и выдавать итог.
webmoney: E265281470651 Z422237915069 R418926282008
Hugo121 вне форума Ответить с цитированием
Старый 29.07.2014, 12:46   #32
IgorGO
Новичок
СтарожилДжуниор
 
Аватар для IgorGO
 
Регистрация: 05.02.2008
Сообщений: 9,487
По умолчанию

задачи нет, а мы ее все решаем и решаем...


Игорь,
вот четкие инструкции по холодной прокрутке двигателя вертолета:
Код:
Холодную прокрутку двигателя производить в такой последовательности:
- включить подкачивающие насосы и открыть пожарные краны;
- включить АЗС запуска двигателей и приборов контроля их работы;
- установить переключатель ПРОКРУТКА—ЗАПУСК в положение ПРОКРУТКА;
- установить переключатель ЛЕВЫЙ—ПРАВЫЙ в положение на прокручиваемый двигатель;
- нажать пусковую кнопку двигателя на 2—3 с.
почему-то после этого:
Цитата:
Следующий шаг - ориентируем макрос на работу с объектом-листом, и в цикле меняем этот объект - так будет быстрее и "технологичнее".
не вижу восторженного ответа романа-талицы: "Спасибо! все так и сделал. все получилось!!!"
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете
IgorGO вне форума Ответить с цитированием
Старый 29.07.2014, 13:05   #33
Hugo121
Старожил
 
Регистрация: 11.05.2010
Сообщений: 5,170
По умолчанию

Всё понятно про вертолёт.
Неужели про макрос не понятно?
webmoney: E265281470651 Z422237915069 R418926282008
Hugo121 вне форума Ответить с цитированием
Старый 29.07.2014, 13:10   #34
роман-талица
Пользователь
 
Регистрация: 06.03.2013
Сообщений: 58
По умолчанию

На каждом листе своя формула не похожая на формулы других листов + другие данные .
Но я уже написал что с макросами пошло раз 10 легче . Еще раз спасибо !

Если честно я еще не понял смысл выражения (Следующий шаг - ориентируем макрос на работу с объектом-листом, и в цикле меняем этот объект - так будет быстрее и "технологичнее".).
Не знаю как это на клавиатуре сделать
роман-талица вне форума Ответить с цитированием
Старый 29.07.2014, 13:11   #35
IgorGO
Новичок
СтарожилДжуниор
 
Аватар для IgorGO
 
Регистрация: 05.02.2008
Сообщений: 9,487
По умолчанию

что-то мне подсказывает, что общие рекомендации пользы не принесут, текст работающего макроса - вот единственный полезный ответ в данном случае
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете
IgorGO вне форума Ответить с цитированием
Старый 29.07.2014, 13:16   #36
Hugo121
Старожил
 
Регистрация: 11.05.2010
Сообщений: 5,170
По умолчанию

Цитата:
Сообщение от роман-талица Посмотреть сообщение

Если честно я еще не понял смысл выражения (Следующий шаг - ориентируем макрос на работу с объектом-листом, и в цикле меняем этот объект - так будет быстрее и "технологичнее".).
Не знаю как это на клавиатуре сделать
Например вот в развитии:
Код:
Sub Macro3()
    Range("A1") = "тест"
End Sub

Sub Macro4()
    ActiveSheet.Range("A1") = "тест"
End Sub

Sub Macro5()
    Dim sh As Worksheet
    For Each sh In Worksheets
        sh.Range("A1") = "тест"
    Next
End Sub
webmoney: E265281470651 Z422237915069 R418926282008
Hugo121 вне форума Ответить с цитированием
Старый 29.07.2014, 13:36   #37
роман-талица
Пользователь
 
Регистрация: 06.03.2013
Сообщений: 58
По умолчанию

Вот пример
Вложения
Тип файла: rar задача2.rar (25.4 Кб, 15 просмотров)
роман-талица вне форума Ответить с цитированием
Старый 29.07.2014, 13:50   #38
IgorGO
Новичок
СтарожилДжуниор
 
Аватар для IgorGO
 
Регистрация: 05.02.2008
Сообщений: 9,487
По умолчанию

вот, теперь понятно понятно почему "мы карты открыть не можем"! чтобы систему не рассекретить.

это лото 5 из 36

имеем дело с очередной беспроигрошной системой, и очередным потенциальным миллионером

я из обсуждения выбываю

всем удачи!
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете
IgorGO вне форума Ответить с цитированием
Старый 29.07.2014, 14:02   #39
роман-талица
Пользователь
 
Регистрация: 06.03.2013
Сообщений: 58
По умолчанию

Цитата:
Сообщение от IgorGO Посмотреть сообщение
вот, теперь понятно понятно почему "мы карты открыть не можем"! чтобы систему не рассекретить.

это лото 5 из 36

имеем дело с очередной беспроигрошной системой, и очередным потенциальным миллионером

я из обсуждения выбываю

всем удачи!
Особо большим секретом и не было .
Беспроигрышной она не задумывалась.
Миллионером будущим не считал себя.
Но любопытство и желание все обсчитать , проверить и перепроверить было и отвязаться ни как не могу от желания знать .

Извините если что не так !!!
роман-талица вне форума Ответить с цитированием
Старый 29.07.2014, 14:02   #40
Hugo121
Старожил
 
Регистрация: 11.05.2010
Сообщений: 5,170
По умолчанию

Насколько я вижу - последняя (третья) СУММПРОИЗВ() вообще зря работает, можно было просто писать 1.
И что затем будет с этими суммами?
Какие другие 98 вариантов?
Короче какая закономерность?
Сделать макросом можно, но муторно. И желательно знать всю задачу - т.к. чувствую что есть смысл сразу в словаре собирать суммы для строк "1-8", "1-9" и т.д

Опять лотерея? Тогда тем более нужно осваивать быстрые макросы
webmoney: E265281470651 Z422237915069 R418926282008

Последний раз редактировалось Hugo121; 29.07.2014 в 14:05.
Hugo121 вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
как сделать чтобы программа не закрывалась написон с dev c++ Karen881 Общие вопросы C/C++ 1 21.07.2012 13:30
Как правильно сделать чтобы одиннадцатая форма открывалась в первой Leila_4ever Общие вопросы Delphi 9 27.05.2011 08:53
Как сделать чтобы форма закрывалась по нажатию ESC H'orn Общие вопросы .NET 2 05.10.2010 11:50
Обмен данными между С++ и С# Stellvertreter Общие вопросы C/C++ 0 14.11.2008 14:18
Как сделать чтобы прога не закрывалась vitalik007 Общие вопросы Delphi 8 12.01.2008 23:32