返回列表 上一主題 發帖

請問這個網頁如何用WEB查詢輸入excel

請問這個網頁如何用WEB查詢輸入excel

http://portal.sw.nat.gov.tw/PPL/pages/integration/layout.jsp?appId=APGQAGB315

出口報單號碼:BE  02XE580024

希望能將查詢結果,匯入EXCEL中,
小弟已經做了一個iqy,如下所示,但還是無法顯示,請各位先進幫忙,感激不盡!
----------------------------------------------------------------------------------------------
WEB
1
http://portal.sw.nat.gov.tw/PPL/pages/integration/layout.jsp?appId=APGQAGB315declNo=BE  02XE580024

Selection=1
Formatting=None
----------------------------------------------------------------------------------------------
Hi~

積分還不夠><"
可下載"查找標籤.zip" 的大大,可否傳給小弟!

E-mail: a82794125678@yahoo.com.tw
感激不敬~

TOP

新手 剛加入 學習了
謝謝大大們 ^^

TOP

回復 72# GBKEE
  1.     Set ie = CreateObject("InternetExplorer.Application")
  2.     ie.Navigate "about:Tabs"
  3.     '  ie.Visible = True
  4.    
  5.     Set shts = ActiveSheet    '  Sheets("工作表2")
  6.     shts.Cells.Clear
  7.    
  8.     URL = "http://www.cnyes.com/twstock/Institutional/1101.htm"
  9.     With CreateObject("InternetExplorer.Application")
  10.         '  .Visible = True     '  是否顯示 IE
  11.         .Navigate URL
  12.         
複製代碼

TOP

回復 72# GBKEE
不信邪再試一次 (Marked 後先儲存一次,再行執行)。
事後只出現過一次"權限問題"後,一切又歸於平靜 (正常了)。
這便是我佩服 Microsoft 的緣故。

TOP

回復 72# GBKEE
所以說嘛,這就是我之所以佩服 Micrsoft 的地方!
不得不服氣。

TOP

回復 71# c_c_lai
2個IE都不顯示,2003再跑一次,OK!
感恩的心......(在麻辣家族討論區.用心學習會有進步的)
但資源無限,後援有限,  一天1元的贊助,人人有能力.

TOP

回復 68# GBKEE
哈哈!
太清爽了也不行! (只能第一個 "空白網頁")

TOP

回復 68# GBKEE
事後想想,發覺利用 "空白網頁" 來做為臨時戰場  (進行複製工作),
這個 Idea 蠻好的,亦不會破壞原本網頁的 Table 內容。
  1.         Set A = .Document.getElementsBytagname("table")
  2.         For x = 1 To 6
  3.             With ie
  4.                 .Document.body.innerHTML = A(x).outerHTML
  5.                 .ExecWB 17, 2       '  Select All
  6.                 .ExecWB 12, 2       '  Copy selection
  7.             End With
  8.             
  9.             With shts
  10.                 .Range("A" & .[A65535].End(xlUp).Row + 1).Select
  11.                 .PasteSpecial Format:="HTML"
  12.             End With
  13.         Next
複製代碼

TOP

回復 68# GBKEE
說的也是!
謝謝指導。

TOP

        靜思自在 : 看別人不順眼,是自己修養不夠。
返回列表 上一主題