『壹』 Excel 如何用VBA提取網頁數據
1、首先打開Excel 2007工作表,點擊想要把數據導入的位置,然後在菜單欄找到第五項'數據「,點擊,在「獲取外部數據」項下找到「自網站」並點擊。
2、這時彈出來」新建 Web 查詢「對話框,可以在「地址」一欄鍵入要添加數據的網頁的地址。
3、添加完成後,點擊「轉到(G)」,下面會出來要添加網頁的內容和黃色箭頭,單擊要選擇的表旁邊的黃色箭頭,可以看到點擊後黃色箭頭變成綠色的對號,這表示內容已經選中了,然後單擊「導入(I)」。
4、彈出來」導入數據「對話框,設置完成點擊「確定」。
5、Excel表中顯示「正在獲取數據……」。
6、數據獲取完成,之前選中的網頁內容全部導入了Excel工作表裡。
『貳』 VBA如何保存
對於2003版的xls文件,保存工作簿時就自動保存了其中的VBA。
對於2007以上版本,默認工作簿為沒有宏的xlsx文件,它無法保存VBA,要保存VBA,必須另存為啟用宏的工作簿.xlsm。
實際上在保存編輯有VBA的xlsx文件時,系統會有這個提示的。如下圖:
『叄』 用vba下載網頁數據,網址如下:
VBE--工具--引用ols
Sub獲取網頁信息1()
DimvDoc,vTag,coll
DimiAsInteger
DimjAsInteger
DimieAsNewInternetExplorer
'Setie=CreateObject("InternetExplorer.Application")
ie.Navigate"http://www.wanlicai.com/sd11y/index.shtml"
ie.Visible=True
DoUntilie.ReadyState=READYSTATE_COMPLETE'如果IE載入宏完成
DoEvents'在窗體載入時轉交操作權
Loop
Application.Wait(Now+TimeValue("0:00:03"))'等待3秒,防止網速有延遲
SetvDoc=ie.Document
DimmstrcellAsString
Setcoll=vDoc.All("historyTable")
Fori=0Tocoll.Rows.Length-1
Forj=0Tocoll.Rows(i).Cells.Length-1
mstrcell=mstrcell&Space(4)&coll.Rows(i).Cells(j).innertext
Cells(i+1,j+1)=coll.Rows(i).Cells(j).innertext
Nextj
Debug.Printmstrcell
mstrcell=""
Nexti
ie.Quit
Setie=Nothing
SetvDoc=Nothing
Setcoll=Nothing
EndSub
『肆』 EXCEL中VBA,自動點擊指定網頁中下載按鈕,並下載文件
【數據准備】
1,excel中記錄你需要下載的所有網址
2,設置下載的文檔保存路徑
【功能實現】
1,利用VBA啟動IE瀏覽器
2,打開你所需要下載的URL
3,觸發該網址中的下載按鈕
『伍』 vba 如何實現excel 上傳到網路 和打開網路excel 及從網路下載到本地
07版有這個功能 自己錄個宏 就可以