Как закрыть и снова открыть активную книгу?

В этой статье я расскажу о некоторых методах быстрого закрытия и повторного открытия активной книги.

Ярлык для закрытия и повторного открытия активной книги

VBA для закрытия и повторного открытия активной книги

Ярлык для закрытия и повторного открытия активной книги

Вот несколько ярлыков, с помощью которых можно закрыть и снова открыть текущую книгу.

Закрыть активную книгу

Альт + Ф + С

Если перед закрытием книги были внесены некоторые изменения, появится диалоговое окно с напоминанием о сохранении, нажмите Enter нажмите кнопку, чтобы сохранить и закрыть диалоговое окно.

Снова открыть книгу

Альт + Ф + Р +1 для Microsoft Office Professional Plus 2010/2013/2016.

Alt + F + R + Y1 + Enter для других версий Microsoft Office.

VBA для закрытия и повторного открытия активной книги

VBA также может закрыть и снова открыть активную книгу.

1. Нажмите Alt + F11 ключи для включения Microsoft Visual Basic для приложений окно.

2. Нажмите Вставить > Модули и вставьте ниже код в скрипт.

VBA: сохранить, закрыть и снова открыть активную книгу

Sub SaveCloseReOpen()
'UpdatebyExtendoffice20171128
ThisWorkbook.save
Application.Workbooks.Open(ThisWorkbook.FullName)
End Sub

3. Нажмите F5 ключ для запуска кода.

Примечание:

Если вы хотите напрямую закрыть и снова открыть активную книгу без сохранения, используйте следующий код:

Sub Reopen()
'UpdatebyExtendoffice20171128
    ThisWorkbook.Saved = True
    ThisWorkbook.ChangeFileAccess xlReadOnly, , False
    Application.Wait Now + TimeValue("00:00:01")
    ThisWorkbook.ChangeFileAccess xlReadWrite, , True
End Sub