如果我通过双击启用宏的模板来创建新的工作簿,比如说标准表格.xltm,我将得到一个名为标准形式1。
当我转到“保存”(另存为...)时,系统提示我将其保存为标准 Excel 工作簿(标准表格1.xltx),它将在保存时删除宏。
有没有办法让从启用宏的模板创建的新文档默认保存为启用宏的工作簿 (.xltm)?
答案1
这是我在文章中找到的一个 VBA 宏
如何强制用户保存为启用宏的工作簿?
此宏将强制使用.xlsm
默认类型作为“另存为”对话框:
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
请参阅文章以获取有关如何在模板文件中安装宏的带有屏幕截图的详细说明。