Страницы: 1
RSS
Выбор из выпадающего списка на html странице через vba
 
Пытаюсь написать макрос, который должен заполнять форму на сайте. В форме есть выпадающий список, и в зависимости от того, какой элемент выпадающего списка будет выбран, меняется и сама форма.

Мне удалось сделать так, чтобы макрос выбирал нужный элемент из выпадающего списка, но при этом форма почему-то не меняется, она остается такой как будто выбран элемент по умолчанию. Не могу понять, проблема у меня в коде или в самой форме на сайте?

Код макроса:
Код
Sub тест()

Dim oIE As Object

Set oIE = CreateObject("InternetExplorer.Application")
oIE.Visible = 1
s = "http://support.fsa.gov.ru/"
oIE.Navigate (s)
Do While oIE.busy Or (oIE.ReadyState <> 4): DoEvents: Loop
                 
Set Start = oIE.Document.getElementsbyTagname("a")
Start(13).Click

Set SelectList = oIE.Document.getElementsbyTagname("Select")
SelectList(19).Value = "measurements"

End Sub
 
Так все переключает
Код
Set SelectList = oIE.Document.getElementbyid("metrology_org_type")
SelectList.Value = "measurements"
SelectList.Value = "docs_expertise"
 '
 
Переключать-то переключает, но там сама форма для заполнения должна меняться. Для measurements форма содержит одни поля, а для docs_expertise уже другие. Если вручную переключить, то это все норм, а если макросом, то не работает  :(

Если делать макросом, то форма как на скрине 1. А если все делать вручную, то форма как на скрине 2. Правильно на втором.
Изменено: vikttur - 12.12.2021 12:10:43
 
Помимо выбора кодом нужного элемента в выпадающем списке, нужно еще вызвать событие изменения этого поля.
https://www.planetaexcel.ru/forum/index.php?PAGE_NAME=message&FID=1&TID=96514&TITLE_SEO=96514-rabota-s-ie-iz-vba-pri-zapolnenii-znacheniy-iz-makrosa-ne-aktiviruetsya&MID=798258#message798258
 
Анализируйте текст страницы, ищите какие функции повешены на событие onchange в селекте
Страницы: 1
Наверх