Добрый день. Использую следующий код для скачивания файла с биржи (https://spimex.com/old/indexes/service_functions_oil.php?request=csv&index=eri&market=s) Файл качается, проблем нет, но пока я не открою файл и не сохраню его (ответив на вопрос про cvs) не могу с ним работать из сторонних файлов. Выдает ошибку невозможности обновления связей. Как это можно исправить? Открыть файл кодом и сохранить его? Качаю файл каждый день.
Код
Private Declare PtrSafe Function URLDownloadToFile Lib "urlmon" _
Alias "URLDownloadToFileA" (ByVal pCaller As Long, ByVal szURL As String, _
ByVal szFileName As String, ByVal dwReserved As Long, ByVal lpfnCB As Long) As Long
Код
Sub DownloadIndex()
лист7.Activate
Dim a
a = Date
filesrc = Cells(3, 86)
dlpath = Cells(3, 85)
Filename = Cells(3, 87)
URLDownloadToFile 0, filesrc, dlpath & Filename, 0, 0
Cells(3, 88) = "файл скачан " & a
End Sub