返回工作簿

Question

使用此代码保存后，我想返回到原始文件：

首先：ActiveWorkbook.Save（保存原始文件），然后

ActiveWorkbook.SaveAs ("C:\MyDirectory\") & "FileName" & Format(Now, "dd-mm-yy-hhumm") & ".xlsm", _
FileFormat:=52, CreateBackup:=False