如何在excel vba脚本中单击search/button后刷新HTML CONTENT数据

我是VBAmacros的新手。 我试图使用VBA代码设置网页的不同领域的值，然后单击searchbutton。 点击searchbutton后，页面的HTML内容将被刷新。 我想使用HTML对象检索刷新的数据

我正在使用下面的目标代码获取HTML内容

处理步骤 ：

1. 获取url的默认内容并将其存储在HtmlFile对象中

   Web_URL = "http://www.ksestocks.com/Announcements" 'Create HTMLFile Object Set HTML_Content = CreateObject("htmlfile") 'Get the WebPage Content to HTMLFile Object With CreateObject("msxml2.xmlhttp") .Open "GET", Web_URL, False .send HTML_Content.Body.Innerhtml = .responseText End With 

2. 使用设置网页的不同字段的值

   HTML_Content.getElementsByTagName

3. 在“search数据库”元素上执行点击事件

    Set elems = HTML_Content.getElementsByTagName("input") For Each e In elems If (e.getAttribute("value") = "Search Database") Then e.Click 

4. 点击元素表单后发布/页面重新加载。

5. 我想再次得到formspost的新的html内容。

6. 对html内容做进一步的处理。

我无法执行第5步和第6步。我需要知道在第4步之后要写什么代码。

问候