Vba - 无法导航以检索雅虎财务上的股票代码

时间:2014-12-10 16:49:51

标签: vba

我不确定为什么我无法导航到我想要的股票代码。 而是转到“http://finance.yahoo.com/q?s=” 你能帮我解决上面的问题吗?以下是我的VBA代码。

Sub Button1_Click()

Dim ie As Object
Dim r As Integer

With Application
 .DisplayAlerts = False
 .ScreenUpdating = False
 .StatusBar = "Retrieving data from internet explorer"
End With

Set ie = CreateObject("InternetExplorer.Application")


For r = 2 To 50


With ie
  .Visible = 1
  .navigate "http://finance.yahoo.com/q?s=" & Cells(r, "B").Value

End With



Next r

End Sub

0 个答案:

没有答案