Javascript 不带ID或标记的Vba fire onclick事件

我试图使用VisualBasic触发Onclick事件，但是，Onclick事件似乎没有任何标记或名称，只有Onclick事件本身。因此，我不知道如何触发它的onclick事件。下面是onclick事件的HTML。我不确定如何创建的代码行是appIE.Document.GetElementsByTagName（“？？？？？？？”）.FireEvent

Sub GoToWebsiteTest()

Dim appIE As InternetExplorerMedium
Dim objElement As Object
Dim objCollection As Object

Set appIE = New InternetExplorerMedium
sURL = "http://websitename"
With appIE
    .Navigate sURL
    .Visible = True
End With

Application.Wait (Now + TimeValue("0:00:02"))
SendKeys "{ENTER}"

Do While appIE.Busy Or appIE.ReadyState <> 4
    DoEvents
Loop

Set objCollection = appIE.Document.GetElementsByTagName("input")
Set objElement = appIE.Document.GetElementById("menulink33")
objElement.Click

Do While appIE.Busy Or appIE.ReadyState <> 4
    DoEvents
Loop

appIE.Document.GetElementsByTagName("select")("participantId").Value = "XXXXXXXXX"
Set objElement = appIE.Document.GetElementById("searchBtn")
objElement.Click
Do While appIE.Busy Or appIE.ReadyState <> 4
    DoEvents
Loop

Set objElement = appIE.Document.GetElementById("dtcTotalRootInd")
objElement.Click

Do While appIE.Busy Or appIE.ReadyState <> 4
    DoEvents
Loop

appIE.Document.GetElementsByTagName("?????").FireEvent

Do While appIE.Busy Or appIE.ReadyState <> 4
    DoEvents
Loop

End Sub

子GoToWebsiteTest（）
Dim应用程序作为InternetExplorerMedium
作为对象的模糊对象
作为对象的Dim OBJ集合
Set appIE=New InternetExplorerMedium
苏尔=”http://websitename"
和阿皮
.导航sURL
.Visible=True
以
Application.Wait（现在+时间值（“0:00:02”））
SendKeys“{ENTER}”
在appIE.Busy或appIE.ReadyState 4时执行
多芬特
环
Set-objCollection=appIE.Document.GetElementsByTagName（“输入”）
Set-objElement=appIE.Document.GetElementById（“menulink33”）
对象。单击
在appIE.Busy或appIE.ReadyState 4时执行
多芬特
环
appIE.Document.GetElementsByTagName（“选择”）（“参与者ID”）.Value=“xxxxxxxx”
Set-objElement=appIE.Document.GetElementById（“searchBtn”）
对象。单击
在appIE.Busy或appIE.ReadyState 4时执行
多芬特
环
Set-objElement=appIE.Document.GetElementById（“dtcTotalRootInd”）
对象。单击
在appIE.Busy或appIE.ReadyState 4时执行
多芬特
环
appIE.Document.GetElementsByTagName（“？？？”）.FireEvent
在appIE.Busy或appIE.ReadyState 4时执行
多芬特
环
端接头

这是我试图触发的onclick的HTML

<a onclick="javascript:app.part.submitLink('D','Activity Balance','470993367.62','565573414.24','94580046.62','P')" href="#">
Activity Balance</a>

我不太熟悉HTML，请让我知道，如果我可以提供更多的细节。非常感谢您的帮助

---

谢谢

您是否尝试过使用a标记、Activity Balance的innertext和fireevent（）获取元素？嗨，nathan，我不熟悉内部文本？那代码是什么样子的？另外，我对appIE.Document.GetElementsByTagName（“a”）中的每个l都使用了此代码

，如果l.href=“#”则
i。单击
如果
则结束，但它不起作用。如果l.innerText=“Activity Balance”则l.Click是否使用i？或者.FireEvent（）我尝试了这两种方法，如果l.InnerText=“Activity Balance”，那么I.FireEvent如果l.InnerText=“Activity Balance”，那么I.Click既没有出错也没有工作查看google上的FireEvent你必须指定事件，即“Click”你是否尝试过通过a标记获取元素，InnerText为Activity Balance，并使用FireEvent（），我不熟悉里面的文字？那代码是什么样子的？另外，我对appIE.Document.GetElementsByTagName（“a”）中的每个l都使用了此代码
，如果l.href=“#”则
i。单击
如果
则结束，但它不起作用。如果l.innerText=“Activity Balance”则l.Click是否使用i？或者.firevent（）如果l.InnerText=“Activity Balance”则我尝试了这两种方法，如果l.InnerText=“Activity Balance”则我尝试了这两种方法。单击两种方法均未出错但均未成功查看google上的FireEvent您必须指定事件，即“单击”