我想在内部网站上调用特定功能

Question

我试图单击或调用功能“ Titlebar_simple_search”，如Excel中VBA中的图片所示。它在我工作场所的Intranet页面上。我知道我离目标还很遥远，但是我想知道是否可以从哪里开始获得一些建议。

HTMLdoc是最好的方法吗？ 我应该先调用该函数位于其中的body类还是div类吗？

感谢您的帮助

print scrn from website

Private Sub CommandButton4_Click()

Dim IE As Object

 Set IE = New InternetExplorerMedium

   IE.Visible = True

 Url = "https://urlremovedduetoprivacy"

   IE.Navigate Url

    Do While IE.ReadyState = 4: DoEvents: Loop   'Do While
    Do Until IE.ReadyState = 4: DoEvents: Loop   'Do Until

Application.Wait (Now + TimeValue("0:00:05"))

Dim HTMLdoc As HTMLDocument

Set HTMLdoc = IE.Document
HTMLdoc.getElementById("simple_search_link").Click


End Sub

Answer 1

请不要发布HTML图片。使用摘要工具。看来您需要先导航一个框架，然后通过其ID获取元素

Ie.document.getElementsByName("titlebar")(0).contentDocument.getElementById("simple_search_link").click