Excel VBA: вызывать sub при переходе на другой лист

Question

Довольно простой вопрос. Я ищу подпрограмму, которая будет срабатывать, когда пользователь изменяет активную рабочую таблицу на определенную рабочую таблицу (calles worksheet3).

Проведение некоторых исследований в интернете, к сожалению, не могло мне помочь.

Подпрограмма события, которую я ищу, должна быть очень похожа на подпрограмму workbook_open. Очевидно, это срабатывает каждый раз, когда открывается рабочая книга. Итак, мой вопрос: есть ли подобный подпункт события, который срабатывает, когда я открываю определенный лист? Вроде как worksheet3_open?

Answer 1

Вы можете использовать событие Worksheet_Activate() на кодовой странице Worksheet3.

1. Выберите свой лист, дважды щелкнув в окне PRoject:

   

2. В раскрывающемся списке вверху выберите «Рабочий лист»

   

3. Во втором выпадающем меню справа выберите «Активировать».

   

Вы будетесоздайте новую подпрограмму с именем Worksheet_Activate(), которая будет срабатывать каждый раз, когда пользователь активирует эту вкладку.

Затем вы можете вызывать подпрограмму внутри этого кода, чтобы она также выполнялась.

Answer 2

Private Sub Workbook_SheetActivate(ByVal Sh As Object)

End Sub

или

Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)

End Sub

Ничего в сети ????? :)

Answer 3

Поместите следующий код под рабочую книгу:

Private Sub Workbook_SheetActivate(ByVal Sh As Object)

    If Sh.Name = "worksheet3" Then
        YourSub
    End If

End Sub