如何将网站数据拉入 Excel?

如何将网站数据拉入 Excel?

例如,

如果我想在 Excel 电子表格的 A2 单元格中显示此商品的最低价,我可以编写任何代码来实现吗?这不是连续抓取数据。也许每天/每周查找一次价格。

http://steamcommunity.com/market/listings/440/Strange%20Hillbilly%20Speed-Bump

答案1

以下是一个基本示例,可帮助您入门。它展示了如何将网站显示为 HTML 代码。从那里,您必须确定如何读取已转换为文本的页面上的内容,但至少这是一个开始:

Private Sub GetWebsiteHtml_Click()

Dim x As Long, y As Long
Dim htmlText As Object

Set htmlText = CreateObject("htmlFile")

With CreateObject("msxml2.xmlhttp")
    .Open "GET", "http://google.com", False
    .send
    htmlText.body.innerHTML = .responsetext
End With

End Sub

htmlText 将是包含您的网站的变量。我使用 google 作为示例。

相关内容