返回列表 上一主題 發帖

[發問] WebBrowser1在Excel VBA無法運行

回復 9# GBKEE


    我知道錯誤在哪,如我一開始補圖

TOP

回復 11# Amin

錯誤訊息已明確說明,如圖


別人的範例可以work,如附件
jKtC2df0.rar (24.63 KB)

請問GBKEE大大,該怎麼才能讓我的範例在不添加OLEObjects情況下也能work,如圖


感謝

TOP

回復 12# Amin
你所謂可以work的範例,是因為他已經手動加入一個WebBrowser的控制項了
只是他把那個控制項的寬和高縮小讓你看不見而已...
所以你自己手動加入控制項就可以了...

TOP

回復 13# stillfish00


stillfish00大感謝你的回覆

請問有辦法查看出物件的樣子嗎?或是圖片?

TOP

回復 14# Amin
Sub Test()
    Sheet1.WebBrowser1.Width = 400
    Sheet1.WebBrowser1.Height = 200
End Sub
簡單調整寬高就出現了

TOP

回復 15# stillfish00

stillfish00大大 果然很強

請問一定要用程式才能看到嗎?
能否透過設計模式查看?
我試了很久也顯示不出來

TOP

希望這一篇有幫助

http://excelvbaandmacros.blogspot.tw/2012/02/excel-browse-internet-in-excel.html

TOP

本帖最後由 老夏 於 2014-8-23 09:15 編輯

WebBrowser1本身就是物件,可以直接使用,用不著VBA控制
//它就是無功能表之IE

布置WebBrowser1,縮小Excel視窗,拉入資料夾,即可使用檔案總管之所有功能

拉入.htm,即是網頁
//當然用htm語法寫,而非vba

這叫做OLE,不同東西拉一拉,叫做難

TOP

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

Excel.rar (10.84 KB)

TOP

程式碼一行搞定

Private Sub CommandButton1_Click()
WebBrowser1.Navigate "http://www.youtube.com/embed/bV7nFXhL8QY?feature=player_detailpage"
End Sub

Private Sub CommandButton2_Click()
WebBrowser1.Navigate "C:\"
End Sub


//VBA只是用個框架頁超連結而已,沒甚麼大學問
飛行史.rar (8.44 KB)

TOP

        靜思自在 : 【為善競爭】人生要為善競爭,分秒必爭。
返回列表 上一主題