軟體:excel
版本:2010
我想試著抓msci台灣指數的權重表直接匯入excel
https://www.msci.com/eqb/custom_indexes/tw_performance.xls
過去使用的程式碼如下，抓網頁跟csv都可以用，但這次抓xls不行
會在.Refresh BackgroundQuery:=False 這裡顯示"不正確的web查詢"
請問高手們該如何解決?
Sub test()
Set DataSheet = ActiveSheet
Range("A1").CurrentRegion.ClearContents
qurl = "網址"
QueryQuote:
With ActiveSheet.QueryTables.Add(Connection:="URL;" & qurl,
Destination:=DataSheet.Range("A1"))
.AdjustColumnWidth = False
.BackgroundQuery = True
.TablesOnlyFromHTML = False
.Refresh BackgroundQuery:=False
.SaveData = True
End With
End Sub

用workbooks.add 接網址，試試如要用唯讀的話 workbooks.open 接網址

已解決!原來這樣就行了，非常感謝