Получить значение из закрытой книги Excel по ссылке http - PullRequest
2 голосов
/ 02 июня 2019

У меня есть куча книг Excel, которые хранятся в общем онлайн-каталоге (вроде Dropbox) в разных папках.Я создаю основную рабочую книгу для извлечения значений из этих рабочих книг в виде резюме.Во время тестирования мне удалось создать книгу, которая работает, если книги хранятся на моих дисках, и я обращаюсь к их каталогам, но не через ссылки http, на которых они хранятся.

В настоящее время я использую ExecuteExcel4Macroмакрос для извлечения значений из закрытых книг на моем компьютере и передачи каталога в качестве аргумента.Пример кода, который работает, если это каталог на жестком диске:

'   Retrieves a value from a closed workbook
    Dim arg As String
'   Make sure the file exists
    If Right(path, 1) <> "\" Then path = path & "\"
    If Dir(path & file) = "" Then
        GetValue = "File Not Found"
        Exit Function
    End If
'   Create the argument
    arg = "'" & path & "[" & file & "]" & sheet & "'!" & _
      Range(ref).Range("A1").Address(, , xlR1C1)
'   Execute an XLM macro
    GetValue = ExecuteExcel4Macro(arg)
End Function
Sub TestGetValue()
    p = "c:\XLFiles\Budget"
    f = "Budget.xls"
    s = "Sheet1"
    a = "A1"
    MsgBox GetValue(p, f, s, a)
End Sub

Есть ли способ заставить его работать с прямыми ссылками http на книги Excel вместо каталогов?Загрузка их всех в мой компьютер на самом деле не вариант, если только я не смогу каким-либо образом изменить их, чтобы автоматически загружать каждую рабочую книгу, получать значение и затем удалять его, или что-то в этом роде

Спасибо за любую помощь.

Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...