Як змусити користувачів зберігати як книгу з підтримкою макросів?
Коли ви зберігаєте книгу Excel, вона буде збережена у форматі файлу xlsx за замовчуванням, і цей формат файлу позбавить від макрокодів з книги, якщо є кілька кодів. Щоб зберегти коди, слід зберегти книгу у форматі Excel Macro-Enable Workbook. Як ви могли змусити користувачів зберігати як книгу з підтримкою макросів?
Змусити користувачів зберігати як книгу з підтримкою макросів із кодом VBA
Змусити користувачів зберігати як книгу з підтримкою макросів із кодом VBA
Щоб зберегти книгу як книгу за замовчуванням із підтримкою макросів, вам може допомогти такий код VBA, зробіть так:
1. Утримуйте клавішу ALT + F11 ключі, щоб відкрити Microsoft Visual Basic для додатків вікна.
2. Потім двічі клацніть ThisWorkbook під VBAProject розділ, щоб відкрити новий порожній модуль, а потім скопіюйте та вставте в модуль такий код:
Код 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 з підтримкою макросів формат за замовчуванням, як показано на наступному скріншоті:
Найкращі інструменти продуктивності офісу
Покращуйте свої навички Excel за допомогою Kutools для Excel і відчуйте ефективність, як ніколи раніше. Kutools для Excel пропонує понад 300 додаткових функцій для підвищення продуктивності та економії часу. Натисніть тут, щоб отримати функцію, яка вам найбільше потрібна...
Вкладка Office Передає інтерфейс із вкладками в Office і значно полегшує вашу роботу
- Увімкніть редагування та читання на вкладках у Word, Excel, PowerPoint, Publisher, Access, Visio та Project.
- Відкривайте та створюйте кілька документів на нових вкладках того самого вікна, а не в нових вікнах.
- Збільшує вашу продуктивність на 50% та зменшує сотні клацань миші для вас щодня!