1、当前工作簿另存为一份副本
指定路径将工作簿另存为一份副本，副本保存了工作簿的更改，但不影响当前工作簿。
在当前空白活动工作簿中运行下列代码：
Sheet1.[A1] = "AAAA"
ActiveWorkbook.SaveCopyAs "C:\Users\Administrator\Desktop\a.xls"
将在桌面新增一个a.xls的工作簿，并记录了更改。
2、保存当前工作簿更改。
Sheet1.[A1] = "AAAA"
ActiveWorkbook.Save
上述代码相当于我们点击保存(Ctrl+S)按钮。
3、SaveAs保存工作簿。
Sheet1.[A1] = "AAAA"
ActiveWorkbook.SaveAs
上述代码，新增一个同名的工作簿，并提示替换当前活动工作簿，如果选择是，则保存更改，否则出错。
在SaveAs写上路径参数，也相当于将当前工作簿另存为一份“副本”。
但当前工作簿会自动关闭，且不保存更改，然后打开 b.xls工作簿 替换为当前活动工作簿。
Sheet1.[A1] = "AAAA"
ActiveWorkbook.SaveAs "C:\Users\Administrator\Desktop\b.xls"
4、关闭工作簿时 "另存为副本"。
Sheet1.[A1] = "AAAA"
ActiveWorkbook.Close True, "C:\Users\Administrator\Desktop\c.xls"
上述代码会关闭当前活动工作簿，不保存更改（尽管Close后面使用True保存更改，但实际当前工作簿并不保存Sheet1.[A1] = "AAAA"的操作。），但不关闭Excel。
同时也会在指定的路径下生成一个保存了更改的“副本”。
综上：
1、保存一份工作簿文件副本（保存更改），选择用SaveCopyAs。
2、只保存工作簿更改，选择用Save（比较通用）。
3、对于操作新建的工作簿，将数据或者工作表保存（另存）为工作簿，可以使用SaveAs和Close（后带路径参数）。使用屏蔽提示语句Application.DisplayAlerts = False将会自动覆盖（替换）原文件。