軟體:Excel
版本:2003
我想用VBA上這個網頁http://traderoom.cnyes.com/tse/quote2FB.aspx?code=3550
抓取其中的成交量，抓下來放到Sheet2的A5這個儲存格
但寫完跑一遍出現錯誤，如圖:https://imgur.com/a/9yzdf
程式碼如下:
Sub 股價成交量抓取()
Application.ScreenUpdating = False
Sheet2.Select
With ActiveSheet.QueryTables.Add(Connetion:= _
"URL;http://traderoom.cnyes.com/tse/quote2FB.aspx?code=3550",
Destination:= _
Range("$A$5"))
.WebSelectionType = xlSpecifiedTables
.WebFormatting = xlWebFormattingNone
.WebTables = "4"
.Refresh BackgroundQuery:=False
End With
End Sub
請問一下，是哪裡需要修改呢?
謝謝大家的解答！
<(_._)>