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

Вход

Регистрация

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

 

= Мир MS Excel/При активации любого из листов активируется второй лист - Мир MS Excel

Старая форма входа
  • Страница 1 из 1
  • 1
Модератор форума: китин, _Boroda_  
Мир MS Excel » Вопросы и решения » Вопросы по VBA » При активации любого из листов активируется второй лист (Макросы/Sub)
При активации любого из листов активируется второй лист
tasdel Дата: Суббота, 27.05.2017, 08:37 | Сообщение № 1
Группа: Проверенные
Ранг: Форумчанин
Сообщений: 144
Репутация: 0 ±
Замечаний: 20% ±

Excel 2007
Здравствуйте уважаемые программисты!
Прописал простенький код на каждом листе рабочей книги,который активирует второй лист при каждом открытии любого из листов рабочей книги.
Все работает замечательно,но если пользователь будет добавлять листы, тогда как обычно, все накрывается медным тазом.
Для общей картины:
На втором листе находится список с гиперссылками. Пользователь по списку просматривает электронные таблицы.
Заранее спасибо!
К сообщению приложен файл: 4807909.xls (43.5 Kb)


Сообщение отредактировал tasdel - Суббота, 27.05.2017, 08:39
 
Ответить
СообщениеЗдравствуйте уважаемые программисты!
Прописал простенький код на каждом листе рабочей книги,который активирует второй лист при каждом открытии любого из листов рабочей книги.
Все работает замечательно,но если пользователь будет добавлять листы, тогда как обычно, все накрывается медным тазом.
Для общей картины:
На втором листе находится список с гиперссылками. Пользователь по списку просматривает электронные таблицы.
Заранее спасибо!
Автор - tasdel
Дата добавления - 27.05.2017 в 08:37
gling Дата: Суббота, 27.05.2017, 09:26 | Сообщение № 2
Группа: Друзья
Ранг: Участник клуба
Сообщений: 2523
Репутация: 678 ±
Замечаний: 0% ±

2010
Здравствуйте. Попробуйте записать это в модуль книги.[vba]
Код
Private Sub Workbook_SheetDeactivate(ByVal Sh As Object)
If Sh.Name <> Worksheets(2).Name Then Worksheets(2).Activate
End Sub
[/vba]

ЯД-41001506838083
 
Ответить
СообщениеЗдравствуйте. Попробуйте записать это в модуль книги.[vba]
Код
Private Sub Workbook_SheetDeactivate(ByVal Sh As Object)
If Sh.Name <> Worksheets(2).Name Then Worksheets(2).Activate
End Sub
[/vba]
Автор - gling
Дата добавления - 27.05.2017 в 09:26
tasdel Дата: Суббота, 27.05.2017, 09:30 | Сообщение № 3
Группа: Проверенные
Ранг: Форумчанин
Сообщений: 144
Репутация: 0 ±
Замечаний: 20% ±

Excel 2007
gling, Спасибо!
 
Ответить
Сообщениеgling, Спасибо!
Автор - tasdel
Дата добавления - 27.05.2017 в 09:30
Мир MS Excel » Вопросы и решения » Вопросы по VBA » При активации любого из листов активируется второй лист (Макросы/Sub)
  • Страница 1 из 1
  • 1
Поиск:

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