Можно ли извлечь указанные c данные из неоткрытой книги, например, с помощью v-lookup с использованием VBA? - PullRequest
0 голосов
/ 12 февраля 2020

В настоящее время у меня есть приведенный ниже код для копирования и вставки данных из листа c нераспечатанной рабочей книги (который работает), однако теперь мне нужно извлечь данные c из этого листа на основе указанной переменной c (как v-lookup). Возможно ли это с помощью VBA и без открытия рабочей книги?

Sub GetFileCopyData()
   Dim Fname As String
   Dim SrcWbk As Workbook
   Dim DestWbk As Workbook

   Set DestWbk = ThisWorkbook

   Fname = Application.GetOpenFilename(FileFilter:="Excel Files (*.xls*), *.xls*", Title:="Select a File")
   If Fname = "False" Then Exit Sub
   Set SrcWbk = Workbooks.Open(Fname)

   SrcWbk.Sheets("Projects Register").Range("A1:V500").Copy DestWbk.Sheets("ProjectsDelivery").Range("A2,V500")

   SrcWbk.Close False
End Sub
...