我注意到至少对于 Excel 2013ActiveWorkbook.SaveAs Filename:="C:\Data.xlsm
可能无法正常工作,因为我说 excel 无法保存为文件类型 xlsm。

但是,我确实找到了适合自己的解决方法,并想在此处添加它作为可能遇到相同问题的其他人的参考。
如果您, FileFormat:=52
在代码之后添加,它将能够保存为xlsm
格式。
所以这对我有用:
ActiveWorkbook.SaveAs Filename:="C:\Data.xlsm, FileFormat:=52"
快乐编码!