使用VBA无法点击标签栏关闭按钮（叉号按钮）的问题求助

我最近碰到个棘手的情况：想用VBScript点击页面上的特定元素来关闭标签栏，代码执行完全没报错，但标签栏就是纹丝不动。

先看看页面的相关截图：

第一种尝试：直接通过ID获取元素点击 #

我先试着直接通过元素ID定位并点击，代码如下：

Set objDoc = objIE.document
Set objElement = objDoc.getElementById("ext-gen2687")
objElement.Click

这段代码执行成功，但标签栏完全没有关闭的迹象。

第二种尝试：循环遍历锚点元素点击 #

后来我换了一种方式，通过多层遍历找到对应ID的锚点元素再点击，代码是这样的：

For Each ul In objDoc.getElementsByTagName("ul")
    For Each li In ul.getElementsByTagName("li")
        For Each anchor In li.getElementsByTagName("a")
            If anchor.ID = "ext-gen2687" Then
                anchor.Click
            End If
        Next
    Next
Next

这次确实成功获取到了目标锚点元素对象，但点击之后，标签栏还是没被关闭。

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