Как проверить, существует ли лист в книге?
Когда у вас десятки или даже сотни листов в книге, и вы хотите найти или проверить, существует ли определенный лист в этой книге, это может быть огромной работой. Сейчас я представлю вам код VBA и удобный инструмент, чтобы быстро проверить, существует ли лист в книге.
Проверьте, существует ли лист в книге с помощью VBA
Проверьте, существует ли лист, и переключитесь на него с помощью Kutools для Excel
Проверьте, существует ли лист в книге
Пожалуйста, следуйте приведенным ниже шагам, чтобы скопировать код VBA и запустить его для проверки, существует ли лист в текущей книге.
1. Нажмите Alt + F11, чтобы открыть окно Microsoft Visual Basic for Applications.
2. В открывшемся окне нажмите Вставить > Модуль, чтобы отобразить новое окно модуля, затем скопируйте следующий код VBA в окно модуля.
VBA: Проверьте, существует ли лист в книге.
Function CheckSheet(pName As String) As Boolean
'Updateby20140617
Dim IsExist As Boolean
IsExist = False
For i = 1 To Application.ActiveWorkbook.Sheets.Count
If Application.ActiveWorkbook.Sheets(i).Name = pName Then
IsExist = True
Exit For
End If
Next
CheckSheet = IsExist
End Function
3. Сохраните этот код, вернитесь к листу и выберите пустую ячейку, чтобы ввести эту формулу =CheckSheet(“Shee1”) (Sheet1 указывает имя листа, которое вы хотите проверить на наличие), нажмите кнопку Enter, ЛОЖЬ означает, что этот лист не существует, а ИСТИНА означает, что он существует в текущей книге.
Проверьте, существует ли лист, и переключитесь на него с помощью Kutools для Excel с VBA
С вышеупомянутой определенной функцией вы можете только проверить, существует ли лист, что также немного сложно. Однако с Kutools для Excel панель навигации показывает все имена листов, поддерживает прокрутку для поиска листа или фильтрацию имени листа для поиска нужного листа, и если необходимо, вы можете щелкнуть имя листа, чтобы быстро переключиться на него после его обнаружения.
После бесплатной установки Kutools для Excel выполните следующие действия:
1. Откройте книгу, в которой вы хотите проверить, существует ли имя листа, и затем нажмите Kutools > Навигация. Смотрите скриншот
:
2. Затем в появившейся панели нажмите Книга и Лист кнопку для расширения панели, вы увидите список всех имен листов в панели, вы можете прокручивать, чтобы найти имена листов.
3. Или вы можете отметить Фильтр кнопку, затем введите ключевые слова имени листа, которое вы хотите проверить, затем указанное имя листа будет в списке, щелкните по имени листа, и вы перейдете к этому листу.
Лучшие инструменты для повышения продуктивности работы с Office
Ускорьте работу в Excel с Kutools для Excel и ощутите новую степень эффективности. Kutools для Excel предлагает более300 расширенных функций для повышения продуктивности и экономии времени. Нажмите здесь, чтобы выбрать нужную вам функцию...
Office Tab добавляет вкладки в Office и делает вашу работу намного проще
- Включите редактирование и чтение с вкладками в Word, Excel, PowerPoint, Publisher, Access, Visio и Project.
- Открывайте и создавайте несколько документов во вкладках одного окна, а не в отдельных окнах.
- Увеличьте свою продуктивность на50% и сократите сотни лишних кликов мышью каждый день!