Я пытался манипулировать внутренним сайтом с помощью vba, но столкнулся с проблемой. В настоящее время мой сценарий ниже открывает веб-страницу и вводит значения ячейки a1 в sheet1 в текстовое поле на веб-странице. Моя проблема, когда я пытаюсь нажать на кнопку поиска, я получаю следующее сообщение «ошибка времени выполнения 438 Объект не поддерживает это свойство или метод». Я пробовал несколько разных способов, но ни один не работает. Также я добавил свойства кнопки при проверке элемента. Спасибо!

<input name="Action" onclick="this.disabled=true; this.form.submit();" type="submit" value="Search">


Sub autoIE()

Dim IE As Object
Set IE = CreateObject("InternetExplorer.Application")

IE.navigate "webpage.com"

IE.Visible = True

While IE.Busy
DoEvents
Wend

IE.document.all("lookupNumberId").Value = ThisWorkbook.Sheets("Sheet1").Range("a1")

IE.document.all("Action").Click 'error 438

IE.document.getElementByName("Action").Click 'error 438

End Sub

1 ответ1

0

Просто предложение для Брюса Уэйна, которое помогло мне сработать, но мне просто нужно было изменить (0) на (1) .

IE.document.getElementsByName("Action")(1).Click

Всё ещё ищете ответ? Посмотрите другие вопросы с метками .