IsSheetExists

Перевіряє, чи є в книзі аркуш із вказаною назвою.

сигнатура

Public Function IsSheetExists(ByVal sheetName As String, Optional targetWorkbook As Workbook) As Boolean

Параметри

Параметр	Тип	Обовʼязковий	Опис
sheetName	String	так	Назва аркуша, без урахування регістру.
targetWorkbook	Workbook	ні	Книга для перевірки. За замовчуванням: `ThisWorkbook`

Повертає

True — аркуш є, False — немає.

Помилки

Не генерує — безпечно викликати перед будь-якою дією з аркушем.

Приклад

vba

If Not IsSheetExists("Налаштування") Then
    ShowError "Немає аркуша «Налаштування»"
    Exit Sub
End If

Як це працює

Функція звертається до колекції Sheets книги за назвою і перехоплює помилку, якщо такого аркуша немає. Sheets містить і звичайні аркуші, і аркуші діаграм.

Public Function IsSheetExists(ByVal sheetName As String, Optional targetWorkbook As Workbook) As Boolean
    Dim sh As Object
    If targetWorkbook Is Nothing Then Set targetWorkbook = ThisWorkbook
    On Error Resume Next
    Set sh = targetWorkbook.Sheets(sheetName)
    On Error GoTo 0
    IsSheetExists = Not sh Is Nothing
End Function

див. також: IsTableExists IsColumnExists ShowError

Стаття допомогла?

оновлено 06.10.2026 ✎ запропонувати правку на GitHub