vba打开指定excel文件并关闭(vba打开指定excel文件并关闭操作)

vba打开指定excel文件并关闭(vba打开指定excel文件并关闭操作)

AccessVBA代码关闭指定的Excel文件,源码示例分享。

一、问题描述:

请问Access VBA代码如何关闭指定路径的 Excel 文档?例如: D:\a.xls。

二、解决方法:

写个自定义函数即可。Sub CloseXlsFileE(FileName As String, SaveChange As Boolean) Dim xlapp As Object Dim wrk As Object Set xlapp = GetObject(, “excel.application”) Set wrk = GetObject(FileName) wrk.Close xlapp.Quit Set xlapp = NothingEnd Sub 调用方法,按钮的单击事件过程写:Call CloseXlsFileE(“D:\a.xls”, True) 参数,True为保存关闭 参数,False为不保存关闭

三、演示图:

发表评论

登录后才能评论