Я хочу взять значения из таблицы Excel и сохранить их в массиве. Затем я хочу взять значения из массива и использовать их для заполнения веб-формы.
Мне удалось сохранить значения в массиве, и мне удалось заставить VBA открыть Internet Explorer (IE)
Код выполняется и ошибки не появляются, но текстовые поля не заполняются, и кнопка не нажимается
(отладчик указывает на [While .Busy]
в качестве источника ошибки, расположенного в блоке WITH
)
Как мне заполнить форму (всего 3 текстовых поля для заполнения)?
Существует также раскрывающееся меню, из которого мне нужно выбрать значение, но мне нужно заполнить текстовые поля, прежде чем перейти к этой части задачи.
Sub CONNECT_TO_IE()
the_start:
Dim ie As Object
Dim objElement As Object
Dim objCollection As Object
acct = GET_CLIENT_NAME()
name = GET_CODE()
Set ie = CreateObject("InternetExplorer.Application")
ie.Visible = True
ie.navigate ("<<my_website>>")
ie.FullScreen = False
On Error Resume Next
Do
DoEvents
If Err.Number <> 0 Then
ie.Quit
Set ie = Nothing
GoTo the_start:
End If
Loop Until ie.readystate = 4
Application.Wait Now + TimeValue("00:00:10")
ie.Document.getElementbyid("<<field_1>>").Value = "PPP"
ie.Document.getElementbyid("<<field_2>>").Value = "PPP"
ie.Document.getElementbyid("<<field_3>>").Click
Set ie = Nothing
End Sub