另一個工作簿中VBA EXCEL更新單元，而無需打開工作簿

Question

我有工作簿的名單目錄，我想通過他們環withouth的在一定的表

我試圖打開它們並更新單元格使用

Dim wb As Workbook 
Set wb = Workbooks("Z:\dir\bla.xls") 'THIS WILL COME TRHOUGH WHEN I LOOP 
Set ws2 = wb.Sheets("TestSheet") 'SHEET NAME 

Set CurCell_2 = ws2.Range("A1") 
CurCell_2.Value = 5 

問題來了，它只適用於我已經打開工作簿。我可以使用：

Workbooks.Open 

但是然後它在後臺打開並花費很長時間來貫穿它們。

誰能幫助請

Answer 1

你不能做到這一點，而無需打開工作簿。但是，在我的案例中，我發現使用Application.EnableEvents並將其設置爲false會大大加快該過程，因爲我們在工作簿打開事件上有宏。