我试图从一个封闭的工作簿中提取一系列数据而不打开它,因为它的大小会导致滞后,并且需要从不同的数据文件中多次进行此操作,从而加剧了滞后。
我尝试了以下方法;
Dim ExampleData as "='C:\Folder\[examplefile.xls]Sheet1'!$A$1:$T$500"
With Range("ExampleRange")
.Formula = ExampleData
.Value = .Value
End With
我知道那里出了什么问题,因为它只是将公式粘贴到那里,但是除了遍历整个范围之外,还有没有办法使用类似的东西?
我也尝试过使用FileName作为字符串,对象或工作簿来执行以下操作,但均无效
Dim FileName as String
FileName = "C:\Folder\examplefile.xls"
Range("ExampleTargetRange").Value = FileName.Worksheets.Sheet1.Range("A1:T500").Value
理想情况下,我希望能够执行.Value = .Value场景,但是我不确定是否有可能在保持数据文件关闭的同时,将不胜感激。