Я хочу вызвать определенную функцию на внутреннем веб-сайте - PullRequest
0 голосов
/ 06 декабря 2018

Я пытаюсь щелкнуть или вызвать функцию "Titlebar_simple_search", как показано на рисунке из VBA в Excel.Это на внутренней странице моего рабочего места.Я знаю, что далека от цели, но мне интересно, могу ли я получить совет, с чего начать.

Является ли HTMLdoc лучшим способом?Должен ли я сначала вызвать класс тела или класс div, внутри которого находится функция?

Любая помощь приветствуется

печать scrn с веб-сайта

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

1 Ответ

0 голосов
/ 06 декабря 2018

Пожалуйста, не размещайте изображения HTML.Используйте инструмент сниппета.Похоже, вам нужно сначала переместиться по фрейму, а затем получить элемент по его идентификатору

Ie.document.getElementsByName("titlebar")(0).contentDocument.getElementById("simple_search_link").click
Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...