- 帖子
- 549
- 主題
- 152
- 精華
- 0
- 積分
- 691
- 點名
- 0
- 作業系統
- WIN7
- 軟體版本
- OFFICE 2010
- 閱讀權限
- 50
- 性別
- 男
- 註冊時間
- 2013-8-10
- 最後登錄
- 2022-9-7
 
|
[發問] 用錄製巨集的方式下載網頁資料,有辦法轉為陣列,不直接輸出嗎?
小弟有個疑問,麻煩各位大大
例如下方程式碼,通常都會輸出到EXCEL分頁上
但實際上或許只用的到其中一個項目而已,是否可以將資料轉為陣列
由程式碼自行判斷要輸出的資料
就不用將所有資料都輸出到EXCEL上面,畢竟輸出的動作是最耗時的- With ActiveSheet.QueryTables.Add(Connection:= _
- "URL;http://jsjustweb.jihsun.com.tw/z/zc/zcw/zcw1_2330.djhtm", Destination:= _
- Range("$A$1"))
- .CommandType = 0
- .Name = "zcw1_2330.djhtm"
- .FieldNames = True
- .RowNumbers = False
- .FillAdjacentFormulas = False
- .PreserveFormatting = True
- .RefreshOnFileOpen = False
- .BackgroundQuery = True
- .RefreshStyle = xlInsertDeleteCells
- .SavePassword = False
- .SaveData = True
- .AdjustColumnWidth = True
- .RefreshPeriod = 0
- .WebSelectionType = xlEntirePage
- .WebFormatting = xlWebFormattingNone
- .WebPreFormattedTextToColumns = True
- .WebConsecutiveDelimitersAsOne = True
- .WebSingleBlockTextImport = False
- .WebDisableDateRecognition = False
- .WebDisableRedirections = False
- .Refresh BackgroundQuery:=False
- End With
複製代碼 |
|