html - 运行时错误 '424' vba 宏需要对象

Question

我收到了

'424 runtime error; object required'

当涉及到下面发布的代码时，在我的 excel 宏上。我正在尝试将 html 用户窗体的内容设置为我从文本文档中解析出的字符串。

Set wb = WB1.document
Set wb.getElementById("booktitle").Value = book

我也试过:

Set wb = WB1.document

With wb
    .getElementById("booktitle").Value = book
End With

这是我的 HTML:

 <div class="section"><span>1</span>Book</div>
 <div class="inner-wrap">
     <label>Full Book Title <input id="booktitle" type="text" name="bookTitle" /></label>

WB1 是我的用户表单网络浏览器

Answer 1

在处理属性 时，您有几个选择。 .Value 是一个属性，但您正在使用 Set 命令，它是为对象保留的。 p>

您可以将对象设置为一个变量，例如:

Dim oBookTitle As Object
Set oBookTitle = wb.getElementById("booktitle")
oBookTitle.Value = book

getElementByID() 返回一个对象 --- .Value 返回或设置对象的值(它是一个属性)。

或者您可以直接使用该属性:

wb.getElementById("booktitle").Value = book   

---

"Yes I changed it to try set earlier in the day when I originally had what you posted, it does not work with or without set." – bella98789

我在 HTML 代码中没有看到“值”。您可以尝试使用 .innerText 或 .outerText 代替 .Value，看看是否能解决您的问题。

此外，如果您没有等待网页完全加载，那么您的对象将不可用。添加此行以进行调试:

If wb.getElementById("booktitle") Is Nothing Then MsgBox "Obj not set"

---