Tag: vba

VBA在填写下拉列表并提交搜索后检索HTML Web数据: 我是excel vba脚本编写HTML数据的新手。我需要从中下载数据的网站是http://www.hkexnews.hk/sdw/search/mutualmarket.aspx?t=hk%2f%3f 我的目标是自动将下拉列表更改为特定日期，并下载当天的库存相关数据。我设法编写代码来更改下拉值（即日期和持股日期）并自动激活搜索function。但是当它试图读取该特定值时，它会从网站返回一个“未刷新”的值。现在，我只是测试一个数据点以使我的代码运行得更快 – .getElementById(“pnlResult”).getElementsByTagName(“div”)(0).innerText 在下面的代码中，我试图获得“持股日期：22/08/2017”的价值，但它目前正在返回“持股日期：11/11/2017”，即使IE窗口显示为22/08 / 2017年。非常感谢您的帮助！谢谢！ Private Sub downloadfromhkex() Cells.Clear ‘**LOAD website on IE Dim IE As New InternetExplorer IE.Visible = True IE.navigate “http://www.hkexnews.hk/sdw/search/mutualmarket.aspx?t=hk/?” Do DoEvents Loop Until IE.readyState = READYSTATE_COMPLETE ‘***END ‘**Dim Doc As HTMLDocument Dim doc As HTMLDocument Set doc = IE.document Dim objEvent Set […]

Javascript与VBA的DoEvents有什么相似之处吗？: 我的代码中有一个长时间运行for循环，我想延迟循环来处理事件队列中的其他任务（比如按下按钮）。 javascript或JQuery有什么可以帮助我吗？基本上我正在尝试做类似延迟循环的事情（ https://support.microsoft.com/en-us/kb/118468 ）。

使用vba和InternetExplorer.Application触发事件以重新计算jquery表单: 我正在尝试从不同的网站收集数据。因此，我正在使用excel vba并启动Internet Explorer。我可以填写正常表格。但有时我必须用后面的jquery脚本填写动态表单。如果填写前2个字段并触发事件，则表单将仅启用所有输入字段（下拉菜单）。所以我的脚本能够填写表格，但不能解雇所需的“重新计算”事件。如果您使用鼠标手动填写表单，它可以正常工作。我该如何模拟这个事件？这是我的excel vba脚本： Sub test_fill_form() Dim url1 As String Dim url2 As String Dim url3 As String url1 = “https://auto.” url2 = “ar” url3 = “do.ch/selling/?step=1&uniqueid=8a7d2327-f426-4df7-8291-d6b55fc62e3c” Dim ie As Object Set ie = CreateObject(“InternetExplorer.Application”) ie.Visible = True apiShowWindow ie.hwnd, SW_MAXIMIZE ie.navigate url1 & “ric” & url2 […]