Този метод ще въведе VBA макрос за лесно търсене в работен лист в активна работна книга.

1, Натисни Друг + F11 клавиши едновременно, за да отворите прозореца на Microsoft Visual Basic за приложения.

2. Щракнете Поставете > Модулии след това поставете следния VBA код в новия отварящ се прозорец на модула.

VBA: Търсене по име на работен лист

Sub SearchSheetName()
Dim xName As String
Dim xFound As Boolean
xName = InputBox("Enter sheet name to find in workbook:", "Sheet search")
If xName = "" Then Exit Sub
On Error Resume Next
ActiveWorkbook.Sheets(xName).Select
xFound = (Err = 0)
On Error GoTo 0
If xFound Then
MsgBox "Sheet '" & xName & "' has been found and selected!"
Else
MsgBox "The sheet '" & xName & "' could not be found in this workbook!"
End If
End Sub

3, Натисни F5 клавиша или щракнете върху бягане бутон за стартиране на този VBA.

4. Появява се диалогов прозорец за търсене на лист, моля, въведете името на работния лист, който ще търсите, и щракнете върху OK бутон. Вижте екранна снимка:

Друг диалогов прозорец ще излезе и ще каже дали работният лист е намерен или не. Просто го затворете.

Забележка: Този VBA изисква точно съвпадащо име на работен лист. Само ако въведете точно пълното име на работния лист, можете да намерите този работен лист с този VBA.

Горният VBA може да не е лесен за намиране на работен лист, ако не можете точно да си спомните и въведете име на работен лист. Този метод ще въведе Kutools за Excel Създайте списък с имена на листове помощна програма за лесно търсене и прехвърляне към работен лист.

1. Щракнете Kutools плюс > Работен лист > Създайте списък с имена на листове за да отворите диалоговия прозорец Създаване на списък с имена на листове. Вижте екранни снимки:

2. В отварящия се диалогов прозорец Създаване на списък с имена на листове, моля, посочете настройките: (1) проверете Съдържа списък с хипервръзки опция; (2) въведете име за новосъздадения индексен лист; (3) посочете мястото на новия индексен лист; и (4) избройте всички имена на работни листове в една колона в индексния лист.

3, Кликнете на Ok бутон. Сега се създава нов индексен лист и се поставя пред всички работни листове.

4. Отидете до индексния лист и натиснете Ctrl + F клавиши едновременно, за да отворите диалоговия прозорец Търсене и замяна, въведете ключова дума в Намерете това, и щракнете върху Намери всички бутон. Вижте екранна снимка:

Сега всички имена на работни листове, съдържащи ключовите думи, са намерени и изброени в долната част на диалоговия прозорец Намиране и замяна. Вижте диалоговия прозорец по-горе.

5. Щракнете върху намерено име на работен лист в диалоговия прозорец Намиране и замяна, за да изберете съответната клетка, след това щракнете върху избраната клетка в индексния лист, тя веднага ще премине към съответния работен лист.

Демонстрация: търсене по име на работен лист в Excel

Ако имате инсталиран Kutools за Excel, можете лесно да търсите работни листове по име на лист в навигационния панел. Моля, направете следното:

1. По подразбиране навигационният панел се отваря. Ако е затворено, моля щракнете Kutools > Navigation Pane за да се покаже навигационният панел, и след това щракнете  (Работна книга и лист) най-вляво на навигационния екран.

2. Продължете да проверявате филтър отметка в навигационния панел и въведете посочените ключови думи в следното поле. Сега всички работни листове, чиито имена съдържат посочените ключови думи, ще бъдат намерени и изброени в полето по-долу. Вижте екранна снимка:

Забележка: Щракването върху резултатите от търсенето ще прескочи и ще отвори съответния работен лист наведнъж.

Демонстрация: Търсене по име на работен лист с навигационен панел на Kutools за Excel

Създайте хипервръзка в клетка към друг лист в същата работна книга