通过ACCESS VBA控制Excel和TXT文件

Question

我正在尝试打开EXCEL文件，对其进行编辑，然后通过ACCESS VBA将其另存为.txt文件。这是我目前的代码：

Set xls = New Excel.Application
Set xlbook = xls.Workbooks.Open(xlpath, ReadOnly:=True)
Set xlsheet = xlbook.Sheets("Extract")
xlsheet.Rows(1).EntireRow.Delete
xlsheet.Range("A1:" & xlsheet.Range("A1").End(xlDown).Address).Sort xlsheet.Range("A1"), xlAscending
xlbook.SaveAs OutputDir & dARR(i) & ".txt", xlText
Close xlbook
xls.Workbooks(1).Close

我遇到的问题是我无法关闭.txt或excel文件。代码的底部两行错误输出。