excel vba保存表格的几种方法

1、直接保存。Sub SaveWb() ThisWorkbook.SaveEnd Sub

2、另存（打开的表格被重命名为SaveAsWb.xlsm）。Sub SaveAsWb() On Error Resume N髫潋啜缅ext ThisWorkbook.SaveAs Filename:=ThisWorkbook.Path & "\SaveAsWb.xlsm"End Sub

3、复制保存（打开的表格名称不变，相同目录下增加一个SaveCopyWb.xlsm"）。Sub SaveCopyWb() ThisWorkbook.SaveCopyAs ThisWorkbook.Path & "\SaveCopyWb.xlsm"End Sub