Как извлечь данные из закрытого файла — Visual Basic(Бейсик)

Range("A1").Formula = "='" & iPath & "[" & iFile & "]" & iList & "'!" & "A1"
Range("A1") = Range("A1")
извлечение данных из 100 ячеек

Range("A1:A100").Formula = "='" & iPath & "[" & iFile & "]" & iList & "'!" & "A1"
Range("A1:A100") = Range("A1:A100").Value
Второй способ (для записи данных в переменную) :

iAddress = "'" & iPath & "[" & iFile & "]" & iList & "'!" & Range("A1").Address(ReferenceStyle:=xlR1C1)
iData = ExecuteExcel4Macro(iAddress)
Предполагается, что:

iPath - это месторасположения файла (каталог)
Обратите внимание, что путь к файлу должен быть указан полностью, например вот так:
"C:\Katalog\"
iFile - это название файла - донора
iList - это название листа в файле из которого мы извлекаем данные
"A1" - это адрес ячейки из которой нам нужно получить данные
P.S. Если файл - донор и файл - extractor находятся в одном каталоге (папке), то " & iPath & " - можно убрать

Leave a Comment