Форум по VBA, Excel и Word

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

Название: Excel VBA Макросы. Не получается перейти на заданный лист. Ошибка 9: Subscript out of range.
Отправлено: Посетитель от 07 января 2021, 13:28
Почему происходит ошибка в этом коде:?
Sub Макрос()
    Dim ИмяЛиста As String
    ИмяЛиста = "Лист1"
    Worksheets("ИмяЛиста").Select
End Sub
Название: Re: Excel VBA Макросы. Не получается перейти на заданный лист. Ошибка 9: Subscript out of range.
Отправлено: Администратор от 07 января 2021, 13:55
Переменную не нужно заключать в кавычки. Правильно так:
Worksheets(ИмяЛиста).Select
Название: Re: Excel VBA Макросы. Не получается перейти на заданный лист. Ошибка 9: Subscript out of range.
Отправлено: Посетитель от 07 января 2021, 14:12
спасибо