我的目标是使用VBA获取给定股票代码的历史雅虎融资价格。通常使用.responseText来删除数据很容易。 我使用下面的代码,但似乎字符串太长,无法废弃数据。当我看到strResult时,我无法看到数据。
有没有人经历过同样的事情? 它是字符串大小的限制吗? 你有任何解决方法吗?感谢
Public Sub Hdata2()
Dim strURL As String Dim obj作为MSXML2.XMLHTTP60 Dim strResult As String
strURL = "https://uk.finance.yahoo.com/quote/DRI.F/history?period1=1428620400&period2=1523314800&interval=1wk&filter=history&frequency=1wk"
Set obj = New MSXML2.XMLHTTP60
obj.Open "GET", strURL, False
obj.send
strResult = obj.responseText
Set obj = Nothing
End Sub