[發問] Excel網頁外部資料匯入失敗之解決(.Refresh BackgroundQuery:=False)

最近需要使用VBA來抓取一些網頁上的資料，所以使用到網頁外部資料匯入，

當開始錄製巨集，就發現出現了錯誤，重複幾次亦是如此，檢視了一下程式碼，

總是在 .Refresh BackgroundQuery:=False 這行程式碼出現錯誤，想問要如何證才正確?

'***********************
' 下載上市融資餘額資料
'***********************
Sub WebQuery_TWII_Credit(theDATE As String)

Dim theURL, saveSheetName As String

saveSheetName = "download2"

With Sheets(saveSheetName)
      .Visible = True
      .Select
      .Cells.Clear
End With

theURL = "http://www.tse.com.tw/ch/trading/exchange/MI_MARGN/MI_MARGN_2.php?select2=MS&type=list&input_date=" & theDATE

With Sheets(saveSheetName).QueryTables.Add(Connection:="URL;" & theURL, Destination:=Range("A1"))
      .Name = "Credit"
      .FieldNames = True
      .RowNumbers = False
      .FillAdjacentFormulas = False
      .PreserveFormatting = True
      .RefreshOnFileOpen = False
      .BackgroundQuery = True
      .RefreshStyle = xlInsertDeleteCells
      .SavePassword = False
      .SaveData = True
      .AdjustColumnWidth = True
      .RefreshPeriod = 0
      .WebSelectionType = xlAllTables
      .WebFormatting = xlWebFormattingNone
      .WebPreFormattedTextToColumns = True
      .WebConsecutiveDelimitersAsOne = True
      .WebSingleBlockTextImport = False
      .WebDisableDateRecognition = False
      .Refresh BackgroundQuery:=False
      .Delete  '記得手動加入
End With

End Sub

樓主熱帖

joey0415

　暱稱: joey0415

中學生 Rank: 2

帖子: 361
主題: 57
精華: 0
積分: 426
點名: 0
作業系統: win7
軟體版本: 2003,2010
閱讀權限: 20
性別: 男
註冊時間: 2010-5-13
最後登錄: 2022-12-8

2^#

發表於 2016-8-16 10:57 | 只看該作者

回復 1# long8448

http://club.excelhome.net/thread-874608-1-1.html

http://club.excelhome.net/thread-917808-1-1.html

這兩篇看完應該有幫助

網頁抓取有很多要注意的地方，手法好多

上市櫃的資料常常會換手法，自己多練習

目前改用post的方法比較多一些

參考看看

TOP

ybh891026

中學生 Rank: 2

帖子: 36
主題: 11
精華: 0
積分: 86
點名: 0
作業系統: WIN7
軟體版本: 2010
閱讀權限: 20
註冊時間: 2016-5-4
最後登錄: 2020-3-26

2017 雞年全勤獎章

3^#

發表於 2016-8-16 22:08 | 只看該作者

回復 2# joey0415

請問J大 https://www.dailyfx.com/sentiment?ref-author=Stanley

這網頁有辦法破解嗎? 試過沒辦法匯入,麻煩J大指導

TOP

zyzzyva

中學生 Rank: 2

帖子: 109
主題: 1
精華: 0
積分: 116
點名: 0
作業系統: win7
軟體版本: 2007
閱讀權限: 20
註冊時間: 2016-8-4
最後登錄: 2018-10-22

論壇榮譽勳章論壇贊助勳章

4^#

發表於 2016-8-16 22:40 | 只看該作者

本帖最後由 zyzzyva 於 2016-8-16 22:41 編輯

回復 1# long8448
樓主是要抓什麼資料？我測試融資券餘額可以正常匯入耶？
測試的是這個網址：http://www.twse.com.tw/ch/trading/exchange/MI_MARGN/MI_MARGN.php

TOP

long8448