Question

我创建了Excel宏，其中我在其他已关闭的工作簿中搜索当前日期并获取此日期所在行的编号。一切都很完美，但只有我打开这个其他工作簿。

是否有可能在不打开此工作簿的情况下使代码正常工作？或者也许可以让这个工作簿不显示，因为我不希望它出现在屏幕上？

我尝试了很多方法，例如Application.ScreenUpdating = false或ActiveWorkbook.Windows(1).Visible = False，但它不会按照我想要的方式运作。

Answer 1

您需要创建一个新的Excel应用程序才能隐藏窗口：

Dim xlApp As New Excel.Application 'New Excel Application
Dim xlWB As Excel.Workbook 'Workbook Object

xlApp.Visible = False 'Hide Application

Set xlWB = xlApp.Workbooks.Open("PATH TO FILE") 'Open File in new App

'do something here
xlWB.Sheets(1).Cells(1, 1).Value = "Hello, this is a Test"

xlWB.Close 'Close Workbook (Use SaveChanges:=True to save changes)
Set xlWB = Nothing 'Clear Object
xlApp.Quit 'Quit Excel App
Set xlApp = Nothing 'Clear Object

使用其他工作簿而无需打开它

1 个答案: