Sub 先保存再关闭工作薄() ActiveWorkbook.Close Savechanges:=True End Sub 不提示直接不保存并关闭工作簿: Sub 先保存再关闭工作薄() ActiveWorkbook.Close Savechanges:=False End Sub 如果是只保存,不关闭,则使用 ActiveWorkbook.Save 关闭所有打开的工作簿,并先全部保存: Sub 保存且关闭所有工作簿() On Error ...
1、ThisWorkbook.Save 'Save相当于你手工单击 保存按钮;这个函数无参数 语法如下:expression.Save 参数expression是必需的,该表达式返回一个Workbook对象。 这种方法相当于我们在用鼠标点击“保存”按钮,这时工作薄将覆盖原来保存的文件为最新的文件 2、ThisWorkbook.SaveAs ' 另存为工作簿 把当前工作簿另存为一份新的...
Workbooks(name1).Close SaveChanges:=False '关闭指定name1 ThisWorkbook.Close SaveChanges:=False '关闭指定工作薄 ActiveWorkbook.Close SaveChanges:=False '关闭当前活动工作薄
13:32Excel VBA入门到高手教程1-04. 保存宏程序 11:55Excel VBA入门到高手教程1-05. 个人宏工作簿 04:20Excel VBA入门到高手教程1-06. 删除宏程序 17:17Excel VBA入门到高手教程1-07. 执行宏程序 14:00Excel VBA入门到高手教程1-08. 使用相对引用录制宏...
Workbooks对象是Microsoft Excel 应用程序中当前打开的所有 Workbook 对象的集合。有close、add、open等方法。 Workbooks.close ' 关闭所有打开的工作簿。 Workbooks.Add ' 创建一个新工作簿。 ActiveWorkbook '返回当前处于活动状态的工作簿。 Workbooks.open Filename:="TEST.XLSX", ReadOnly:=True ' 将文件TEST.XLS...
workbook"的 Private Sub Workbook_BeforeClose(Cancel As Boolean) 中加入如下句子：myNowTime = Format(Now, "yymmdd" &"-" & "hhmmss")ActiveWorkbook.SaveAs Filename:=currPath & myNowTime &".xls", AddToMru:=False ‘（”currPath“为你的路径及文件名称）...
85.用VBA代码打开工作簿——Open方法 详细讲解了Open方法的语法。文中的示例:①基于现有工作簿创建新工作簿;②将打开的工作簿赋值给变量;③测试是否已经打开了工作簿。 86.保存工作簿 使用Workbook对象的Save方法保存工作簿,详细讲解了Save方法的语法。文中的示例:①保存所有...
Sub vba_close_workbook() Dim wbCheck As String wbCheck = Dir("C:UsersDellDesktopmyFoldermyFile.xlsx") If wbCheck = "" Then Workbooks("Book6").Close _ SaveChanges:=True, _ Filename:="C:UsersDellDesktopmyFoldermyFile.xlsx" Else MsgBox "Error! Name already used." End If End Sub...
VBA中新建、读取、保存和另存EXCEL Dim app_excel As Excel.Application Dim book_excel As Excel.Workbook Set app_excel = New Excel.Application '申请一个Excel.Application内存空间 Set book_excel = app_excel.Workbooks.Open("d:/net/vba/test.xls") '打开EXCEL文件,然后把值返回赋给Workbook类型 book_...
1、定义一个WorkBook对象 Dim wb As Workbook 这里的wb,就是一个WorkBook对象,wb只是一个代号,用什么其他字符串都可以,只要符合VBA的命名规范。但我们建议还是要定义一个有一定意义的对象、变量名称,并且尽量保持一惯性。这样做的好处是显而易见的,一是加快你写代码的速度,二是复制代码的时候,改动的地方会比较少...