Excel VBA，在不打开浏览器的情况下打开网址

Question

我正在做一个项目，该项目需要 excel 用户和 Web 服务器之间进行一定程度的交互。

我知道你可以使用

    hyperlink.follow 

在默认浏览器中打开网址的方法。

但是我想要完成的是能够在后台打开 url 而无需在浏览器中打开页面。

有谁知道如何做到这一点。

以下限制适用。

1. 我们不能假设用户安装了特定的浏览器，即。例如，chrome，我们也不能假设用户安装了浏览器。
2. 我们不能假设所有用户都有相同的操作系统。有的可能有win7，有的可能有win10。我们只是不知道。
3. 我们可以假设计算机已连接到 Internet 并具有 IP 地址，并且防火墙不会成为问题。

Answer 1

您可以打开（阅读全部内容）其 Url 指定的网页，如以下 Excel VBA 代码 sn-p 所示：

Option Explicit

'sample procedure to read entire url content
Sub ReadUrlDoc()
  'sample url address
  Const url As String = "http://www.examn8.com"
  Dim urlText As String

  With CreateObject("MSXML2.XMLHTTP")
    .Open "GET", url, False
    .Send
    'url content
    urlText = .ResponseText
  End With
End Sub

解决方案不打开/不依赖于网络浏览器。希望这可能会有所帮助。