В Excel мы можем определить, закрыта ли книга или открыта, через код VBA. Ниже приведен код VBA и процесс, который вам нужно вставить в модуль кода файла.

{пусто} 1. Откройте Excel 2. Нажмите ALT + F11 3. Откроется редактор VBA 4. Щелкните в любом месте окна проекта 5. Щелкните «Вставить» 6. Щелкните «Модуль»

you1111

{пусто} 7. В окне кода скопируйте и вставьте указанную ниже функцию кода WorkbookOpen (WorkBookName As String) As Boolean ‘возвращает TRUE, если рабочая книга открыта WorkbookOpen = False On Error GoToWorkBookNotOpen If Len (Application.Workbooks (WorkBookName) .Name)> 0 Then WorkbookOpen = True Завершить функцию выхода, если WorkBookNotOpen:

Конечная функция {пусто} 8. После вставки перейдите к файлу Excel 9. Выберите ячейку A1 10. Введите = work 11. Вы можете увидеть, что = workbookopen отображается как формула

image2

{пусто} 12. Изначально его там не было

image3

{пусто} 13. Напишите формулу = WorkbookOpen («test1.xlsx»)

  1. Здесь в качестве примера используется рабочая книга test1.xlsx. Этот файл не открыт.

  2. Поскольку этот файл не открыт, он будет отображаться как «ЛОЖЬ»

image4

{пусто} 16. Выделите ячейку A3 17. Напишите формулу = WorkbookOpen («определить-если-книга-уже-открыта-с помощью-vba-in-microsoft-excel.xlsx»)

  1. Здесь рабочая тетрадь «Определите-если-рабочая-книга-уже-открыта-с помощью-vba-in-microsoft-excel.xlsx»

используется в качестве примера. Этот файл открыт.

  1. Поскольку этот файл открыт, он будет отображаться как «ИСТИНА»

image5

Вот как мы можем определить, открыта ли книга уже или нет, используя VBA в Microsoft Excel 2010 и Microsoft Excel 2013.

image 29

Если вам понравились наши блоги, поделитесь ими с друзьями на Facebook. А также вы можете подписаться на нас в Twitter и Facebook.

Мы будем рады услышать от вас, дайте нам знать, как мы можем улучшить, дополнить или усовершенствовать нашу работу и сделать ее лучше для вас. Напишите нам на [email protected]