excel 宏保存，我设置了一些宏的功能，为何保存后，再次打开宏的功能就没有了，我保存的后缀名xlsm

Sub b()

If Dir(Range("A1") + ".xls") = "" Then '先用DIR函数检查是否文件已存在
ActiveWorkbook.SaveAs Range("A1") + ".xls" '若不存在就另存为,注意,这是SaveAs是另存,你问题中的是另存一个考贝
Else '如已存在,打开另存对话框
Application.FileDialog(msoFileDialogSaveAs).InitialView = msoFileDialogViewDetails
Application.FileDialog(msoFileDialogSaveAs).InitialFileName = "aaa.xls"
Application.FileDialog(msoFileDialogSaveAs).Show

End If

End Sub
另外,团IDC网上有许多产品团购,便宜有口碑

这个图标是07版的启用宏的文件，正常的；而且你的代码我这也可以正常使用的；看看会不会有其他宏语句和这个语句冲突，或者你当前的页没有调用这个语句。。。

宏的功能没有了是什么意思？你打开宏面板看了吗？