如何选择所有＆amp;使用VBA从网页复制

Question

我正在使用网页上的嵌入式表格，并尝试自动将其复制到Excel中。一个简单的“全选”+复制+粘贴将完美地工作，但我无法弄清楚如何使用VBA自动执行此操作。

有什么想法吗？

Answer 1

从网页获取数据到VBA应用程序的一种方法是使用WinHttpRequest对象：

Dim url, resp As String
Dim req As New WinHttpRequest

url = "http://www.domain.com/page"
req.Open "GET", url, False
req.Send

resp = req.ResponseText

HTML源存储在resp变量中，您可以使用字符串函数和循环从中检索表及其数据，以分析表行及其格式，并将数据写入工作表行。