Ваша помощь необходима для решения этой мировой проблемы (Excel VBA). Я использую VBA для заполнения огромной рабочей книги (500 ячеек на строку) из полной загрузки рабочих книг (кол-во = 96). VBA, которую я использую, создана [@Kevin] [1] и работает около 20 файлов, пока на моем компьютере не заканчивается память и не происходит сбой Excel. Этот вид отлично подходит для работы с таким огромным количеством ячеек на рабочую книгу, потому что открытие и закрытие каждой рабочей книги значительно усложняет процесс. Откройте каждую рабочую книгу и скопируйте все 500 ячеек и закройте, затем перейдите к следующей и т. Д. X ± 96 раз, но это будет сложнее, чем просто сделать эту работу, если у вас есть какое-либо из двух решений, пожалуйста, помогите!

Вот VBA, которую я использую:

Function GetField(Path As String, WorksheetName As String, CellRange As String) As Variant

Dim wb As Workbook
Dim ws As Worksheet
Dim rng As Range

Set wb = GetObject(Path)
Set ws = wb.Worksheets(WorksheetName)
Set rng = ws.Range(CellRange)

GetField = rng.Value

wb.close 

End Function