excel - 是否可以从网站直接获取超链接信息到 Excel？

Question

有时我需要获取几个(20-30)超链接文本(在网站上)的基础电子邮件地址，并将它们复制到 excel 中。是否可以直接从网站执行此操作，而不是先将信息作为 HTML 复制到 excel 中，然后运行宏从那里获取。
这就是我目前使用的:

Function emailAddress(cell)
    On Error Resume Next
    emailAddress = Replace(cell.Hyperlinks(1).Address, "mailto:", "")
    If emailAddress = 0 Then 
       emailAddress = ""
End Function

但我想知道是否有办法绕过这一步

Answer 1

有几种方法可以完成此任务。

第一个是将网站数据直接加载到工作簿中:

 Workbooks.Open Filename:="http://yoururlhere.com/data.html"

这是最直接的，因为我相信您可以指定是否希望您的数据进入特定的工作表。

另一种是使用 Excel 连接 Internet Explorer。见 this例如。这涉及了解更多关于如何访问页面的不同 DOM 元素以获取所需信息的信息。

您可能还可以用 C# 或 VB.NET 编写数据访问权限，并使用他们的 Office 自动化库来控制 Excel，但这会更加复杂。