升级IE11后Excel VBA的getElementById失效，出现运行时错误424

运行时错误424本质是找不到目标对象，结合IE11和旧版IE的DOM模型差异，给你几个实用的排查方向：

• 先确认目标元素的ID是否真的存在，且拼写完全匹配
  旧版IE对DOM元素ID的大小写几乎不敏感，但IE11严格遵循W3C标准，大小写必须完全一致。你可以打开IE11的开发者工具（按F12），切换到「元素」标签，用Ctrl+F搜索NewProperty，看看页面里的元素ID是不是和代码里的完全一样，有没有被JS动态修改，或者嵌套在iframe里——如果是在iframe里，旧IE可能允许直接跨iframe访问，但IE11必须先获取对应的iframe对象，再访问它的document，比如：

  Set iframeObj = IE.document.frames("目标iframe的name或ID")
  Set targetElem = iframeObj.document.getElementById("NewProperty")
  

• 优化页面等待逻辑，确保元素完全加载
  你当前的Do Until Not IE.Busy And IE.readyState = 4只能判断页面的初始加载状态，但IE11里很多页面会用AJAX或动态脚本生成元素，就算readyState=4了，目标元素可能还没渲染出来。可以改成循环等待目标元素出现，同时增加超时机制避免无限循环：

  Dim targetElem As Object
  Dim timeout As Integer
  timeout = 0
  Do
      On Error Resume Next
      Set targetElem = IE.document.getElementById("NewProperty")
      On Error GoTo 0
      DoEvents
      timeout = timeout + 1
      If timeout > 1000 Then ' 大概等待10秒左右，可根据情况调整
          MsgBox "元素加载超时"
          Exit Sub
      End If
  Loop Until Not targetElem Is Nothing
  ' 找到元素后再设置选中项
  targetElem.selectedIndex = 51
  

• 检查IE11的兼容性视图设置
  旧版IE的渲染模式和IE11差异很大，把目标网站加入兼容性视图，可能会让页面DOM结构和旧IE一致。操作步骤：打开IE11 → 点击右上角齿轮图标 → 兼容性视图设置 → 把目标网站添加进去，再重新运行代码试试。

• 修正属性名的大小写
  虽然你报错是在getElementById这一步，但顺便提一句：旧IE允许selectedindex（小写i），但标准DOM属性是selectedIndex（大写I），IE11严格遵循标准，找到元素后如果写错属性名也会报错，建议提前把代码里的selectedindex统一改成selectedIndex。

• 确认IE对象的创建方式
  旧版IE用Set IE = CreateObject("InternetExplorer.Application")没问题，但IE11里可以试试用Set IE = New InternetExplorerMedium（需要先引用「Microsoft Internet Controls」库），这个方式能避免一些权限或渲染模式的问题。

内容的提问来源于stack exchange，提问作者VBAnewguy