Sub exchange_rates()
Set xmlList = CreateObject("Microsoft.XMLDOM")
url = "http://www.cbr.ru/scripts/XML_daily.asp?date_req=22.03.2017"
xmlList.Load (url)
MsgBox xmlList.SelectSingleNode("/ValCurs/Valute[@ID=""R01235""]/Value").Text
End Sub
Получаю XML с ЦБ с курсом рубля относительно других валют и достаю оттуда курс доллара, но при попытке обработать данные вылетает ошибка
Если прогонять скрипт пошагово, то всё работает. Пробовал вставлять задержку через sleep и wait между загрузкой и обработкой, но не помогает. При этом если засунуть туда MsgBox, то всё работает, но это не выход, когда нужно будет обработать таким образом 1000+ дат.