VBA，编写了一个不能保存<em>excel</em>的代码，结果<em>excel

不要见到对话框就点是，看清是什么意思

用代码保存，新建一个模块zd，内容如下，要版保存时就运行以下代码

Public isForSave As Boolean
Private Sub SaveBook()
isForSave = True
ThisWorkbook.Save
isForSave = False
End Sub

ThisWorkbook代码改为：
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
If Not SaveAsUI And Not isForSave Then
MsgBox "本工作簿不能保存，只能另存为权！"
Cancel = True
End If
End Sub
你带有宏的excel要保存，只能另存为.xls格式，xlsx不能保存宏代码的

亲，是这样的。2003版的确可以保存带VBA代码的文件，不copy用更改扩展名。但是，您也一定发现，当你要运行宏时，必须在安全性设置里启用宏，比较麻烦。
2007版以上知进行了改进，可以直接把道带VBA代码的文件另存为xlsm。这样，打开这个文件，可以直接运行宏。