返回列表 上一主題 發帖

[發問] 沒有設定物件變數或With區塊變數

[發問] 沒有設定物件變數或With區塊變數

先跟各位拜個早年

跑程式main會出現,執行階段錯誤91
「沒有設定物件變數或With區塊變數」

可是單獨在跑裡面的爬蟲是沒有問題的!!

請各位神人們,可以幫小弟解答為什麼嗎?
以及要如何更改程式!

先謝謝大家了,這問題我網路尋找了2天沒有答案,真是想破我的頭

by VBA新手

practice.zip (50.05 KB)

.SetText HTMLsourcecode.body.innerhtml

TOP

感謝quickfixer,好人一生平安,上廁所都有衛生紙可用!

謝謝你,解決我的問題!

TOP

本帖最後由 tsmc2330 於 2021-2-10 11:33 編輯

請教一下,為什麼不能直接使用,以下這一行(因為想要的資料在這個table)
HTMLsourcecode.all.tags("table")(8).outerhtml

是要我去宣告和設定物件嗎變數嗎?
可是不是已經宣告和設定了?
    Dim HTMLsourcecode As Object
    Set HTMLsourcecode = CreateObject("HTMLFile")

TOP

本帖最後由 quickfixer 於 2021-2-10 11:45 編輯

回復 4# tsmc2330



HQLZES9jbU.png
2021-2-10 11:44

2020/1/5證交所沒你要的資料,沒資料就沒table,當然會出錯
加個if就可以用table
            If Len(HTMLsourcecode.body.innerhtml) = 26 Then Exit Sub
   With Clipboard
            .SetText HTMLsourcecode.all.tags("table")(8).outerhtml
            .PutInClipboard
        End With

TOP

我知道我想了兩天的原因了!
今天晚上總算可以好好睡一覺了!

謝謝quickfixer

TOP

        靜思自在 : 是非當教育,讚美作警惕。
返回列表 上一主題