ExcelVBA实例教程#047:保存工作簿的方法 下载本文

内容发布更新时间 : 2024/11/10 4:43:50星期一 下面是文章的全部内容请认真阅读。

***

1、使用Save方法使用Workbook对象的Save方法保存工作簿的更改,如下面的代码所示。

1. Sub SaveWork() 2. ThisWorkbook.Save 3. End Sub

代码解析:

SaveWork过程保存代码所在的工作簿的修改。

Save方法保存指定工作簿所做的更改,语法如下:expression.Save参数expression是必需的,该表达式返回一个Workbook对象。如果是第一次保存工作簿,请使用SaveAs方法为该文件指定文件名,请参阅技巧47-2。2、直接保存为另一文件名如果需要将工作簿另存为另一个文件名,可以使用Workbook对象的SaveAs方法,如下面的代码所示。

1. Sub SaveAsWork()

2. ThisWorkbook.SaveAs Filename:=ThisWorkbook.Path & \3. End Sub

代码解析:

SaveAsWork过程将代码所在的工作簿保存为“123”工作簿文件。

Workbook对象的SaveAs方法使用另外一个不同的文件名保存对工作簿所做的更改,语法如下:

SaveAs(FileName,FileFormat,Password,WriteResPassword,ReadOnlyRecommended,CreateBackup,AccessMode,ConflictResolution,AddToMru,TextCodepage,TextVisualLayout,Local)其中,参数Filename可选,表示要保存文件的文件名的字符串。可包含完整路径,如果不指定路径,将文件保存到当前文件夹中。使用SaveAs方法将工作簿另存为新文件后,将关闭原工作簿文件。3、保存工作簿副本如果用户希望工作簿在保存为另一文件名后,能继续编辑原工作簿,那么可以使用SaveCopyAs方法,如下面的代码所示。

1. Sub SaveCopyWork()

2. ThisWorkbook.SaveCopyAs ThisWorkbook.Path & \3. End Sub

代码解析:

SaveCopyWork过程使用SaveCopyAs方法保存代码所在的工作簿副本,并指定其名称。 SaveCopyAs方法将指定工作簿的副本保存到文件,但不修改内存中的打开工作簿,语法如下:SaveCopyAs(Filename)参数Filename是必需的,用于指定工作簿副本的文件名。

1