Форум по VBA и MS Office

VBA, Excel => VBA, макросы в Excel => Тема начата: Посетитель от 01 ноября 2021, 13:56

Название: Excel VBA Макросы. Sub or Function not defined.
Отправлено: Посетитель от 01 ноября 2021, 13:56
Не понимаю, в чем может быть проблема. VBA выделяет Sheet (2 строка):

Private Sub Worksheet_Activate()
    If Sheet("Лист1").Range("A2").Value = "м" Then
        ' ...
    Else
        ' ...
    End If
End Sub
Название: Excel VBA Макросы. Sub or Function not defined.
Отправлено: Администратор от 01 ноября 2021, 14:01
Вместо Sheet, нужно использовать Sheets.
Название: Excel VBA Макросы. Sub or Function not defined.
Отправлено: Посетитель от 01 ноября 2021, 14:06
Ой. Большое спасибо!!!