VBA-从封闭的工作簿中的范围复制值

时间:2019-02-20 04:15:47

标签: excel vba

我试图从一个封闭的工作簿中提取一系列数据而不打开它,因为它的大小会导致滞后,并且需要从不同的数据文件中多次进行此操作,从而加剧了滞后。

我尝试了以下方法;

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场景,但是我不确定是否有可能在保持数据文件关闭的同时,将不胜感激。

0 个答案:

没有答案