Как проверить открыта ли книга Excel

Описание функции

Функция =КНИГАОТКРЫТА(ИМЯ) определяет открыта ли заданная книга или нет. Если книга с указанным именем открыта, то функция возвратит значение ИСТИНА, если книга закрыта, то ЛОЖЬ. Функция имеет только один аргумент:

• ИМЯ - название книги Excel (вместе с расширением), открытие которой необходимо проверить.

Практический смысл данной функции, для непосредственного применения ее в ячейке небольшой. Больше полезен ее код на VBA (он ниже), с помощью которого можно выполнять проверку открытия перед выполнением каких-либо операций.

Пример

Пример проверки открытия книги.

Код на VBA

Function КНИГАОТКРЫТА(ИМЯ As String) As Boolean
    Dim Wb As Workbook
    On Error Resume Next
    Set Wb = Workbooks(ИМЯ)
    If Err.Number = 0 Then КНИГАОТКРЫТА = True
End Function