В Закрывать и Открытый метод в Excel VBA можно использовать для закрытия и открытия книг. Помните, что коллекция Workbooks содержит все открытые в данный момент объекты Workbook.
Поместите командную кнопку на свой рабочий лист и добавьте следующие строки кода:
1. Строка кода ниже закрывает файл close-open.xlsm.
Книги ("close-open.xlsm"). Закрыть
2. Строка кода ниже закрывает первую открытую / созданную книгу.
Рабочие тетради (1) .Закрыть
3. Строка кода ниже закрывает активную книгу.
ActiveWorkbook.Close
4. Строка кода ниже закрывает все открытые в данный момент книги.
Рабочие тетради. Закрыть
5. Строка кода ниже открывает файл sales.xlsx.
Workbooks.Open ("sales.xlsx")
Примечание. Вы можете открыть файл sales.xlsx без указания пути к файлу, только если он хранится в папке по умолчанию. Чтобы изменить расположение файла по умолчанию, на вкладке Файл щелкните Параметры, Сохранить.
6. Вы также можете использовать метод GetOpenFilename объекта Application для отображения стандартного диалогового окна Open.
Dim MyFile As String
MyFile = Application.GetOpenFilename ()
7. Выберите файл и нажмите «Открыть».
Примечание: GetOpenFilename фактически не открывает файл.
8. Затем вы можете открыть книгу как обычно.
Workbooks.Open (MyFile)
