使用 VBA 选择 HTML 下拉框选项答案

【问题标题】：Select HTML Dropdown Box OPtions Using VBA使用 VBA 选择 HTML 下拉框选项
【发布时间】：2017-02-09 02:03:44
【问题描述】：

我需要创建一个从图像列表中选择下拉选项的宏。我尝试使用下面的代码，其中 NGR 被定义为列表中具有值的字符串。

With ie.Document
Set dropOptions = .getElementsByTagName("select")
For Each o In dropOptions.Options
    If o.Value = NGR Then
        o.Selected = True
    Exit For
End If
Next o
End With

我也试过了：

ie.Document.all.Item("ddlGrowerRegs").Value = NGR

和

ie.Document.getelementbyid("_ct10_ContentPlaceHolder1_ddlGrowerRegs").Value = NGR

如果有人能告诉我哪里出错或如何使用字符串 NGR 选择下拉值，那就太好了。

谢谢

【问题讨论】：

标签： html excel vba select html-select

【解决方案1】：

我在尝试从下拉列表中进行选择时遇到了类似的问题。下拉菜单可能有一个“更改”事件。更改下拉值后尝试此操作。

ie.document.all.Item("_ct10_ContentPlaceHolder1_dd1GrowerRegs").Value = NRG
Dim htmldoc as HTMLDocument

Set ieEvent = htmldoc.createEvent("HTMLEvents")

ieEvent.initEvent "change", False, True
ie.document.all.Item("_ct10_ContentPlaceHolder1_dd1GrowerRegs").dispatchEvent ieEvent

如果这不起作用，那么你可以这样做。

Ie.document.getElementByTagName ("option")(0).setAttribute ("selected") = "selected"

【讨论】：