Vba в excel переход на лист excel

Make a particular worksheet visible using a macro in Excel.

This is called activating a worksheet and is rather easy to do.

Sections:

Activate Worksheet by Name

Activate Worksheet by Index Number

Notes

Activate Worksheet by Name

Let’s navigate to, activate, the worksheet called «Sheet2».

Worksheets("Sheet2").Activate

Worksheets(«Shee2») is how we reference the sheet to which we want to navigate.

Sheet2 is the name of the sheet to which we want to navigate. Make sure to surround it with double quotation marks.

Activate is what actually takes the user to that worksheet.

Putting it all together, we get: Worksheets(«Sheet2»).Activate

It’s as simple as that.

Activate Worksheet by Index Number

This time, let’s navigate to the second worksheet using its index number.

All we do is to replace «Sheet2» from the last example with 2.

Worksheets(2).Activate

2 is the index number of the desired worksheet and Activate is what takes us to the desired worksheet.

This example can be confusing if you are not used to using index numbers, but index numbers are really helpful when you have to do something like loop through all of the worksheets in the workbook.

Notes

Basically, just reference the desired worksheet, however you want, and then type .Activate after it.

You should not use the Activate feature to navigate to a worksheet so that you can get data from it or put data into it. This is very bad Macro/VBA design and it will make your life hell later on. To get data from separate worksheets, read this tutorial: Select Data from Separate Worksheets with Macros VBA in Excel.

This feature should be used when you want the user to end up on a specific worksheet.

Make sure to download the sample file attached to this tutorial so that you can see this macro in Excel and work with it.

Similar Content on TeachExcel

Subscribe for Weekly Tutorials

BONUS: subscribe now to download our Top Tutorials Ebook!

Перейти к определенному листу, щелкнув имя вкладки, очень легко для многих пользователей, но если книга большая с несколькими листами, которые не могут отображаться на вкладке, как показано на скриншоте ниже, как вы можете быстро найти лист и перейти к Это?

Щелкните правой кнопкой мыши на конкретный лист

Перейти на конкретный лист с VBA

Перейти к определенному листу с помощью Kutools for Excel

Проверьте, существует ли имя листа с помощью Kutools for Excel

Щелкните правой кнопкой мыши на конкретный лист

В Excel, чтобы перейти к определенному листу, вы можете использовать правый щелчок.

Поместите курсор на стрелки мусора в нижнем левом углу листа и щелкните правой кнопкой мыши, вы увидите всплывающее контекстное меню, показывающее первые 15 листов.

Если в вашей книге более 15 листов, вы можете нажать Больше листов до активировать В этом диалоговом окне все листы отображаются в нем, и просто прокрутите, чтобы найти нужный лист, и щелкните его, чтобы активировать его.

Примечание: В Excel 2013 активировать диалоговое окно появится сразу после щелчка правой кнопкой мыши по стрелке в нижнем правом углу Панель листа.

Если в книге так много листов, это не лучший выбор для поиска и перехода к конкретному листу с помощью прокрутки.

Перейти на конкретный лист с VBA

Существует код VBA, который поможет вам быстро найти и перейти к определенному листу в книге.

1. Пресса Alt + F11 ключи вместе, и Microsoft Visual Basic для приложений окно выскакивает.

2. Нажмите Вставить > Модули, затем вставьте ниже VBA в Модули окно.

VBA: перейти на конкретный лист

Sub GotoSheet()
'UpdatebyKutoolsforExcel20150916
    Dim xRet As Variant
    Dim xSht As Worksheet
    xRet = Application.InputBox("Go to this sheet", "Kutools for Excel")
    On Error Resume Next
    If xRet = False Then Exit Sub
    On Error GoTo 0
    On Error Resume Next
    Set xSht = Sheets(xRet)
    If xSht Is Nothing Then Set xSht = Sheets(Val(xRet))
    If xSht Is Nothing Then
        MsgBox "This sheet does not exist", , "Kutools for Excel"
    Else
        xSht.Activate
    End If
End Sub

3. Нажмите Run или нажмите F5 выпустить код, и Kutools for Excel появится dailog, затем введите имя листа, который вы хотите найти, и перейдите в текстовое поле. Смотрите скриншот:

4. Нажмите OK, и теперь вы разместили на нужном вам листе.

Перейти к определенному листу с помощью Kutools for Excel

Работы С Нами Kutools for Excel, вы можете перечислить все имена листов, а затем найти нужное имя листа и перейти к нему.

После бесплатная установка Kutools for Excel, пожалуйста, сделайте следующее:

1. Нажмите Кутулс Плюс > Рабочий лист > Создать список имен листов. Смотрите скриншот:

2. В появившемся диалоговом окне сделайте следующее:

3. Нажмите Ok. Теперь создается новый лист со всем списком имен листов,

4. Нажмите Ctrl + F для открытия Найти и заменить диалоговое окно, затем введите имя листа, которое вы хотите найти, в Найти то, что текстовое окно. Смотрите скриншот:

5. Нажмите Найти все. Теперь нужный вам лист выбран (закройте Найти и заменить диалоговое окно), а затем просто щелкните его, вы перейдете на этот конкретный лист.

Щелкните здесь, чтобы узнать больше о создании списка имен листов.