某些时候需要打开Excel文件来获取或者写入数据,但又不希望跳出打开的Excel文件窗口,可以用下面的代码: Dim eb As New excel.Application, wb as excel.WorkbookSet wb = eb.Application.Workbooks.Open(FileName:=nameOfFile, ReadOnly:=False) ' open ' do your work wb.Close True ' save and close 原理:New Exce