Sub saveasxlsm()
ActiveWorkbook.saveas Filename:="C:\Users\zgjxg\Desktop\" & Worksheets(2).Range("B5") & "test.xlsm", _
FileFormat:=52, CreateBackup:=False
End Sub
ActiveWorkbook.saveas Filename:="C:\Users\zgjxg\Desktop\" & Worksheets(2).Range("B5") & "test.xlsm", _
FileFormat:=52, CreateBackup:=False
End Sub
VBA保存工作簿为xlsm格式
本文介绍了一个简单的VBA宏代码示例,该宏用于将当前活动的工作簿另存为.xlsm格式的文件。代码中使用了ActiveWorkbook.saveas方法,并指定了保存路径、文件名、文件格式等参数。
585

被折叠的 条评论
为什么被折叠?



