Excel VBA中Microsoft Web Browser突发运行时错误'424'的原因咨询

我正在使用一个嵌入Google Maps的Excel工作簿，此前一切运行正常，但突然触发运行时错误。该地图基于ActiveX组件Microsoft Web Browser，由按钮触发加载，会从按钮旁单元格读取地图URL的部分内容。对应VBA代码如下：

Private Sub CommandButton1_Click()
    Dim rowNum As Long
    rowNum = Sheets("Map").Range("B2")
    rowNum = rowNum - 43396
    MapViewer1.Navigate ("https://www.google.com/maps/d/u/0/embed?mid=" + Sheets("Map").Range("D" & rowNum).Value)
End Sub

目前代码在MapViewer1.Navigate...行报错，且无人修改过工作簿的VBA代码，请问可能的原因是什么？

可能的触发原因及排查方向 #

1. Google Maps嵌入服务的变动 #

Google Maps的嵌入规则和权限经常会悄悄更新，这是最常见的外部原因：

• 你引用的地图（对应mid参数）可能被修改了分享权限，比如从“公开可嵌入”改成了“私有”，导致链接失效；
• Google可能调整了嵌入URL的结构，比如/d/u/0/这类路径的规则变化，旧格式不再被支持；
• 你的网络环境出现了限制，比如防火墙、代理拦截了Google Maps的请求，控件无法加载页面。

2. ActiveX控件本身的异常 #

Microsoft Web Browser控件（基于IE内核）很容易因为系统或Office的变更出问题：

• 系统更新后，控件的注册信息被破坏，导致MapViewer1对象无法正常调用Navigate方法；
• Office的安全设置升级，禁用了ActiveX控件的运行权限——你可以去Excel的信任中心→ActiveX设置里检查是否限制了控件执行；
• 控件文件损坏，试试重新注册：以管理员身份打开命令提示符，执行regsvr32.exe ieframe.dll（这个控件依赖ieframe.dll文件）。

3. 单元格数据的意外变化 #

虽然没人碰代码，但单元格里的数据可能出问题：

• B2的数值异常，计算后的rowNum超出了工作表的有效行范围，或者指向了空行；
• D列对应行的mid值被删除、修改成了无效字符串，拼接后的URL格式错误（比如带空格、特殊字符），导致Navigate无法识别合法地址。

4. 环境兼容性问题 #

• 最近升级了Office或系统版本，比如从32位切换到64位，ActiveX控件的兼容性出现冲突；
• 系统里的IE浏览器被卸载或禁用（因为Web Browser控件依赖IE），导致控件无法工作；
• 工作簿的宏安全级别被调整，虽然代码没改，但宏的执行权限被限制，间接导致控件调用失败。

内容的提问来源于stack exchange，提问作者화이트케이크