excel - 有没有办法限制在 Excel 实例中打开其他工作簿？

Question

情况：我目前坚持了解如何防止在与我的个人工作簿相同的 Excel 实例中打开其他工作簿。

原因/尝试：在我的个人工作簿中找到 VBA 代码，我在其中创建一个单独的 Excel 实例xlApp并将我的工作簿添加到该实例并从前一个实例中删除它Application。

现在，每当我打开其他文件/工作簿时，它们都会被分配到Application，这就是我正在寻找的；但是，如果我关闭我打开的所有文件，除了我的个人工作簿，并尝试再次打开任何文件，它们将以xlApp.

目标：程序应该做的是打开实例中的所有其他文件Application，而不是xlApp实例，无论是否Application没有打开工作簿。

有什么办法可以防止它们被打开xlApp吗？

Public Sub createNewInstance()

Dim xlApp as Excel.Application

Set xlApp = New Excel.Application             'Creating new Excel instance.

xlApp.Workbooks.Add ThisWorkbook.FullName     'Adding my open workbook to that instance.

xlApp.Visible = True

Set xlApp = Nothing

ThisWorkbook.Saved = True                     
ThisWorkbook.Close SaveChanges:=False        'Closing the workbook of this current instance (not the new one).

End Sub

标签： excelvba