平常关闭工作簿的时候,一般会有提示,是否保存更改。如下图
1、下面代码关闭工作簿,不保存更改。
sub 关闭工作簿()
workbooks('123.xls').close
end sub
若要保存更改,可以在close后面加上true
sub 关闭工作簿()
workbooks('123.xls').close true
'有改动就自动保存,不弹出保存对话框
end sub
下面代码打开c盘的123.xls文件,并对其编辑,保存更改。SaveChanges:= 可以省略。
保存工作簿的方法很多,如,我们常规的操作。先保存--再关闭。
Sub CloseWorkbook()
ThisWorkbook.Save '保存更改
ThisWorkbook.Close '关闭工作簿
End Sub
联系客服