excel - 使用 Excel VBA 在 Web 表单中选择列表选项（onchange）

Question

我正在尝试将案例重新打开列表选项更改为“是”。在这里，我的代码更改了选项，但没有很好地触发。

示例：如果将Case Reopen更改为“是”，那么我可以更改TAT 开始日期

请参阅下面的图像和代码以更好地理解我的问题

选项：否：

选项：是

VBA 代码

ie.document.getElementsByName("cf_1314")(0).selectedIndex = "1"

  ie.document.getElementsByName("cf_1314")(0).FireEvent ("onchange")

html代码：

标签： excelvbaweb-scraping

Answer 1

您是否尝试过将 getElementsByTagName 与选项标签一起使用？就像是

Set TDelements = HTMLdoc.getElementsByTagName("option")

For Each TDelement In TDelements
  If TDelement.Value = "No" Then
     TDelement.Value = "Yes"  
  End if
Next