0
Мой код ниже. Открывает браузер, заполняет форму, но я не мог нажать кнопку. В источнике нет имени или идентификатора кнопки.Как нажимать кнопку на веб-странице (имя скрыто) с VBA?
Спасибо за помощь.
Melis.
Dim htmlDoc As HTMLDocument
Dim MyBrowser As InternetExplorer
Sub ICON()
Dim MyHTML_Element As IHTMLElement
Dim MyURL As String
MyURL = "http://icon.icon-mng.com/login/"
Set MyBrowser = New InternetExplorer
MyBrowser.navigate MyURL
MyBrowser.Visible = True
Do
Loop Until MyBrowser.ReadyState = READYSTATE_COMPLETE
Set htmlDoc = MyBrowser.document
htmlDoc.all.login.Value = "xxx"
htmlDoc.all.pass.Value = "xxx"
For Each MyHTML_Element In htmlDoc.getElementsByTagName("input")
If MyHTML_Element Like "submit" Then MyHTML_Element.Click: Exit For
Next
End Sub