Excel VBA Макросы. Не получается перейти на заданный лист. Ошибка 9: Subscript out of range.

Автор Посетитель, 07 января 2021, 13:28

Посетитель

Почему происходит ошибка в этом коде:?
Sub Макрос()
    Dim ИмяЛиста As String
    ИмяЛиста = "Лист1"
    Worksheets("ИмяЛиста").Select
End Sub

Администратор

Переменную не нужно заключать в кавычки. Правильно так:
Worksheets(ИмяЛиста).Select