VBA HTML Объект Inte rnet Автоматизация Explorer

Question

Как выбрать опцию из выпадающего меню и обновить веб-страницу. Код:

Dim IE As New SHDocVw.InternetExplorer

Dim HTMLDoc As MSHTML.HTMLDocument

, затем я перехожу к URL-адресу и извлекаю раскрывающееся меню, используя html идентификатор и введите значение = мое желаемое значение

HTMLDoc.getElementById("xyz").Value = "dropdown_option" 

Я успешно получил вариант. Но сайт не обновляется? например, заполняя другие поля.

Я считаю, что некоторые javascript должны быть запущены. Как я могу это исправить с помощью VBA?

Исходный код поля выпадающего меню:

<div id="ctl00_MainContent_CreateWebForm__SubjectComboBox_ComboBox" class="Invalid RadComboBox RadComboBox_Telerik SearchComboBox" style="width:206px;white-space:normal;">
    <table summary="combobox" style="border-width:0;border-collapse:collapse;width:100%" class="rcbFocused rcbExpanded">
        <tbody><tr class="rcbReadOnly">
            <td class="rcbInputCell rcbInputCellLeft" style="width:100%;"><input name="ctl00$MainContent$CreateWebForm_$SubjectComboBox$ComboBox" type="text" class="rcbInput radPreventDecorate" id="ctl00_MainContent_CreateWebForm__SubjectComboBox_ComboBox_Input" value="Vælg" readonly="readonly" accesskey="s" autocomplete="off"></td><td class="rcbArrowCell rcbArrowCellRight"><a id="ctl00_MainContent_CreateWebForm__SubjectComboBox_ComboBox_Arrow" style="overflow: hidden;display: block;position: relative;outline: none;">select</a></td>
        </tr>
    </tbody></table><input id="ctl00_MainContent_CreateWebForm__SubjectComboBox_ComboBox_ClientState" name="ctl00_MainContent_CreateWebForm__SubjectComboBox_ComboBox_ClientState" type="hidden" autocomplete="off">
</div>

Source code for dropdown options:

    <div id="ctl00_MainContent_CreateWebForm__SubjectComboBox_ComboBox_DropDown" class="RadComboBoxDropDown RadComboBoxDropDown_Telerik " style="width: 204px; display: block; top: 0px; visibility: visible; transition: none 0s ease 0s;">
        <div class="rcbScroll rcbWidth" style="height: 126px;">
    <ul class="rcbList"><li class="rcbHovered">Forespørgsel til Energinet</li>
    <li class="rcbItem">Måledata</li><li class="rcbItem">Målepunkt eller ad hoc spørgsmål</li>
    <li class="rcbItem">Orientering til alle</li>
    <li class="rcbItem">Priser</li><li class="rcbItem">Pristilknytninger</li></ul></div></div>