Как заставить пользователей сохранять как книгу с поддержкой макросов?
Когда вы сохраняете книгу Excel, она по умолчанию сохраняется в формате файла xlsx, и этот формат файла избавит от кодов макросов из книги, если имеется несколько кодов. Чтобы сохранить коды, вы должны сохранить книгу в формате Excel Macro-Enable Workbook. Как вы могли заставить пользователей сохранять в виде книги с поддержкой макросов?
Заставить пользователей сохранять как книгу с поддержкой макросов с кодом VBA
Заставить пользователей сохранять как книгу с поддержкой макросов с кодом VBA
Чтобы сохранить книгу как книгу с поддержкой макросов по умолчанию, вам может помочь следующий код VBA, сделайте следующее:
1. Удерживайте ALT + F11 , чтобы открыть Microsoft Visual Basic для приложений окно.
2. Затем дважды щелкните Эта рабочая тетрадь под ВБАПроект раздел, чтобы открыть новый пустой модуль, а затем скопируйте и вставьте в модуль следующий код:
Код VBA: принудительно сохранить книгу как книгу с поддержкой макросов по умолчанию:
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
'Updateby Extendoffice
Dim xFileName As String
If SaveAsUI <> False Then
Cancel = True
xFileName = Application.GetSaveAsFilename(, "Excel Macro-Enabled Workbook (*.xlsm), *.xlsm", , "Save As xlsm file")
If xFileName <> "False" Then
Application.EnableEvents = False
ActiveWorkbook.SaveAs Filename:=xFileName, FileFormat:=xlOpenXMLWorkbookMacroEnabled
Application.EnableEvents = True
Else
MsgBox "Action Cancelled"
Cancel = True
Exit Sub
End If
End If
End Sub
3. Затем сохраните и закройте это окно кода, с этого момента, когда пользователи сохранят эту книгу, она будет сохранена как Excel Macro-Enabled Workbook формат по умолчанию, как показано на следующем снимке экрана:
Лучшие инструменты для офисной работы
Улучшите свои навыки работы с Excel с помощью Kutools for Excel и почувствуйте эффективность, как никогда раньше. Kutools for Excel предлагает более 300 расширенных функций для повышения производительности и экономии времени. Нажмите здесь, чтобы получить функцию, которая вам нужна больше всего...
Вкладка Office: интерфейс с вкладками в Office и упрощение работы
- Включение редактирования и чтения с вкладками в Word, Excel, PowerPoint, Издатель, доступ, Visio и проект.
- Открывайте и создавайте несколько документов на новых вкладках одного окна, а не в новых окнах.
- Повышает вашу продуктивность на 50% и сокращает количество щелчков мышью на сотни каждый день!