打开Excel文件，无需显示即可使用VBA进行读取

Question

打开Excel文件，无需显示即可使用VBA进行读取我想用宏搜索现有的Excel文件，但我不希望在代码打开这些文件时显示这些文件。有没有办法让它们在“背景”中打开，可以这么说？

Answer 1

不确定是否可以在当前的excel实例中无形地打开它们

您可以打开一个新的excel实例，隐藏它然后打开工作簿

Dim app as New Excel.Application

app.Visible = False 'Visible is False by default, so this isn't necessary

Dim book As Excel.Workbook

Set book = app.Workbooks.Add(fileName)

'

' Do what you have to do

'

book.Close SaveChanges:=False

app.Quit

Set app = Nothing

正如其他人发布的那样，请确保在完成任何已打开的工作簿后进行清理

Answer 2

如果这符合您的需求，我会简单地使用

Application.ScreenUpdating = False

还有加速代码的好处，而不是通过使用第二个Excel实例来降低代码速度。

Answer 3

要打开隐藏在现有Excel实例中的工作簿，请使用以下命令：

    Application.ScreenUpdating = False
    Workbooks.Open Filename:=FilePath, UpdateLinks:=True, ReadOnly:=True
    ActiveWindow.Visible = False
    ThisWorkbook.Activate
    Application.ScreenUpdating = True