Домашняя страница Undo Do New Save Карта сайта Обратная связь Поиск по форуму
МИР MS EXCEL - Гость.xls

Вход

Регистрация

Напомнить пароль

 

= Мир MS Excel/Как изменить макрос что бы работал только на 3 листах - Мир MS Excel

Старая форма входа
  • Страница 1 из 1
  • 1
Модератор форума: китин, _Boroda_  
Как изменить макрос что бы работал только на 3 листах
Serg007 Дата: Пятница, 22.03.2019, 13:32 | Сообщение № 1
Группа: Пользователи
Ранг: Прохожий
Сообщений: 1
Репутация: 0 ±
Замечаний: 0% ±

Excel 2016
Здравствуйте! Имеется следующий макрос:

[vba]
Код
Dim myColor As Integer
Public myTime As Date
Sub мигать_всегда()
Range("H2,H3").Interior.ColorIndex = myColor
myColor = IIf(myColor = 6, 10, 6)
myTime = Now + TimeValue("00:00:001")
Application.OnTime myTime, "мигать_всегда"
End Sub
[/vba]

В книге 7 листов. Надо что бы этот макрос выполнялся только на 3 листах: Лист1, Лист2, Лист3
Надо чтобы при открытии книги и переходе на указанные листы сразу работал макрос. Подскажите пожалуйста, что добавить?


Сообщение отредактировал Serg007 - Пятница, 22.03.2019, 14:19
 
Ответить
СообщениеЗдравствуйте! Имеется следующий макрос:

[vba]
Код
Dim myColor As Integer
Public myTime As Date
Sub мигать_всегда()
Range("H2,H3").Interior.ColorIndex = myColor
myColor = IIf(myColor = 6, 10, 6)
myTime = Now + TimeValue("00:00:001")
Application.OnTime myTime, "мигать_всегда"
End Sub
[/vba]

В книге 7 листов. Надо что бы этот макрос выполнялся только на 3 листах: Лист1, Лист2, Лист3
Надо чтобы при открытии книги и переходе на указанные листы сразу работал макрос. Подскажите пожалуйста, что добавить?

Автор - Serg007
Дата добавления - 22.03.2019 в 13:32
_Boroda_ Дата: Пятница, 22.03.2019, 13:35 | Сообщение № 2
Группа: Админы
Ранг: Местный житель
Сообщений: 16718
Репутация: 6505 ±
Замечаний: ±

2003; 2007; 2010; 2013 RUS
- Прочитайте Правила форума
- Приложите файл с исходными данными и желаемым результатом (можно вручную) в формате Excel размером до 100кб согласно п.3 Правил форума
- Оформите код тегами (в режиме правки поста выделите код и нажмите кнопку #, пояснялка здесь)


Скажи мне, кудесник, любимец ба’гов...
Платная помощь:
Boroda_Excel@mail.ru
Яндекс-деньги: 41001632713405 | Webmoney: R289877159277; Z102172301748; E177867141995
 
Ответить
Сообщение- Прочитайте Правила форума
- Приложите файл с исходными данными и желаемым результатом (можно вручную) в формате Excel размером до 100кб согласно п.3 Правил форума
- Оформите код тегами (в режиме правки поста выделите код и нажмите кнопку #, пояснялка здесь)

Автор - _Boroda_
Дата добавления - 22.03.2019 в 13:35
  • Страница 1 из 1
  • 1
Поиск:

Яндекс.Метрика Яндекс цитирования
© 2010-2024 · Дизайн: MichaelCH · Хостинг от uCoz · При использовании материалов сайта, ссылка на www.excelworld.ru обязательна!