Добрый день!
Прошу помочь нажать кнопку на сайте Яндекса. Вот код:
123 появляется, а кнопку не могу нажать.
Заранее спасибо!
Прошу помочь нажать кнопку на сайте Яндекса. Вот код:
Код |
---|
Sub Ya() Set ie = CreateObject("InternetExplorer.Application") ie.Visible = True ie.Navigate ("yandex.ru") Do Until ie.ReadyState = 4 'For STATE as COMPLETE DoEvents Loop ie.Document.getelementbyID("text").value = "123" ie.Document.GetElementsByTagName ("type") End Sub |
123 появляется, а кнопку не могу нажать.
Заранее спасибо!