如何使用 VBA 从网页中全选和复制答案

【问题标题】：How to Select All & Copy from a webpage using VBA如何使用 VBA 从网页中全选和复制
【发布时间】：2014-02-04 16:05:34
【问题描述】：

我正在处理网页上的嵌入式表格，并尝试将其复制到 Excel 中的过程自动化。一个简单的“全选”+复制+粘贴就可以完美地工作，但我不知道如何使用 VBA 自动执行此操作。

有什么想法吗？

【问题讨论】：

到目前为止你尝试过什么？您的尝试有哪些成功或没有成功？
我尝试了一个宏来直接从对象中获取文本并将其分成几行，但它没有携带页面中的格式（未保留 web 表中的列）。我对告诉 Excel 在我告诉它打开的网页上简单地执行“全选”和“复制”命令有多么困难（也许只有我？）感到困惑。
您是否尝试过使用内置的Get External Data From Webpage？，另一种选择是使用Send Keys Method，另一种选择是使用IE Automation。研究这些方法并尝试它们，如果您有任何更直接的问题，请返回并提出另一个问题。

标签： excel internet-explorer vba copy

【解决方案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 变量中，您可以从中检索表格及其数据，使用字符串函数和循环分析表格行及其格式并将数据写入工作表行。

【讨论】：