从关闭的工作簿中取值

有许多种从关闭的工作簿中取值的方法,下面是其中之一。下面的VBA代码从关闭的工作簿中获取值。
Sub ExtractDataFromClosedWorkBook()
    
    Application.ScreenUpdating = False
    
     ‘创建链接来从关闭的工作簿中获取数据
     ‘可以将相关代码修改为相应的路径和单元格
    With [Sheet1!A1:B4]
        .Value = “=’” & ActiveWorkbook.Path & “\[testDataWorkbook.xls]Sheet1′!A1:B4″
        
         ‘删除链接
        .Value = .Value
    End With
    
    Application.ScreenUpdating = True
    
End Sub

其中,可以将代码中的路径修改为需要从中获取值的工作簿的路径,单元格也作相应的修改。


提示:您可以在评论中使用HTML标签,且任何与HTML标签相同的符号都会被理解为HTML标签并以相应的格式显示.如果您的评论中有代码,可以使用相应的标签,例如,如果有VB或VBA代码,则可以使用[vb]标签,即[vb]放置的代码[/vb],这样会很清晰地显示代码.

发表评论