Как отключить сохранение книги, но разрешить сохранение только как в Excel?
Чтобы сохранить изменяемые исходные данные книги, вам необходимо использовать функцию «Сохранить как» вместо функции «Сохранить» каждый раз, когда вы обновляете данные этой книги. Но мы привыкли сохранять книгу, нажимая клавиши Ctrl + S во время редактирования книги. Есть ли способ отключить функцию сохранения, но разрешить только сохранение как в Excel? Эта статья может вам помочь.
Отключить сохранение книги, но разрешить сохранение только как с кодом VBA
Отключить сохранение книги, но разрешить сохранение только как с кодом VBA
Следующий код VBA может помочь вам отключить функцию сохранения, но разрешить только сохранение как книги.
1. Нажмите другой + F11 клавиши одновременно, чтобы открыть Microsoft Visual Basic для приложений окно.
2. в Microsoft Visual Basic для приложений окно, дважды щелкните Эта рабочая тетрадь в Проект панель, чтобы открыть ThisWorkbook (Код) окно. Затем скопируйте и вставьте приведенный ниже код VBA в окно кода.
Код VBA: разрешить только сохранение как в Excel
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
If Not SaveAsUI Then
Cancel = True
MsgBox "You cannot save this workbook. Use Save As", vbInformation, "Kutools for Excel"
End If
End Sub
3. Нажмите другой + Q ключи, чтобы закрыть Microsoft Visual Basic для приложений окно.
4. Поскольку книга содержит сценарий VBA, при сохранении книги вы сначала получите следующее диалоговое окно. Пожалуйста, нажмите на Да .
5. Теперь появится диалоговое окно, в котором сообщается, что функция «Сохранить» в этой книге отключена. Вам необходимо использовать функцию «Сохранить как», чтобы сохранить обновленные данные этой книги.
Пожалуйста, нажмите на OK и сохраните книгу с помощью функции Сохранить как.
Статьи по теме:
- Как отключить или запретить параметры «Сохранить и сохранить как» в Excel?
- Как вставить или отобразить последнюю сохраненную метку времени на листе в Excel?
- Как сохранить только один лист в книге в Excel?
Лучшие инструменты для офисной работы
Улучшите свои навыки работы с Excel с помощью Kutools for Excel и почувствуйте эффективность, как никогда раньше. Kutools for Excel предлагает более 300 расширенных функций для повышения производительности и экономии времени. Нажмите здесь, чтобы получить функцию, которая вам нужна больше всего...
Вкладка Office: интерфейс с вкладками в Office и упрощение работы
- Включение редактирования и чтения с вкладками в Word, Excel, PowerPoint, Издатель, доступ, Visio и проект.
- Открывайте и создавайте несколько документов на новых вкладках одного окна, а не в новых окнах.
- Повышает вашу продуктивность на 50% и сокращает количество щелчков мышью на сотни каждый день!