С помощью какого кода можно сохранить и закрыть книгу?
Макрос работает с активным файлом (это файл, который отображается на мониторе).
Sub Макрос()
' Сохранение файла.
ActiveWorkbook.Save
' Закрытия файла.
' SaveChanges:=False - чтобы не было сообщения, предлагающего сохранить изменения.
' Ранее в коде сделано сохранение, но бывает так, что, не смотря на это, при закрытии
' файла появляется сообщение, предлагающее сохранить изменения.
ActiveWorkbook.Close SaveChanges:=False
End Sub
Спасибо помогло.
При запуске этого макроса появляется сообщение: Предупреждение о конфиденциальной информации...
Почему появляется это сообщение?
Это сообщение появляется, т.к. здесь установлена галочка (Excel 2016): Файл - Параметры - Центр управления безопасностью - Параметры центра управления безопасностью... - Параметры конфиденциальности - Параметры для конкретного документа - Удалять персональные данные из свойств файла при сохранении.
Есть два варианта, чтобы не было этого сообщения:
1) уберите эту галочку;
2) окружите сохранение файла таким кодом:
' Сохранение файла.
Application.DisplayAlerts = False
ActiveWorkbook.Save
Application.DisplayAlerts = True
Большое спасибо. Супер форум.