从Excel VBA打开网页时出错，但在浏览器

Question

我刚刚在浏览器中执行打开网页的VBA代码时发现了一个奇怪的错误。在Excel模型中，我有几个不同基金的ID，我想打开所有网页，其中包含有关这些基金的信息。除了地址末尾的ID之外，所有网页都具有相同的地址。

代码实际上是有效的。它试图打开所有页面，但是我被重定向到“https://companyadress.com/”甚至在我的浏览器的空标签中粘贴相同的地址字符串，手动将我带到正确的位置。

代码如下：

Dim numFunds As Integer
numFunds = FundData.Range("fdNumFunds")

Dim webpage As String, webpageFull As String
Dim fundID As String
Dim i As Integer

webpage = "https://fund.companyadress.com/"

For i = 1 To numFunds

    fundID = FundData.Range("fdFundsTopLeft")(i, 2)
    webpageFull = webpage & fundID

    ThisWorkbook.FollowHyperlink _
      Address:=webpageFull, NewWindow:=False

Next i

感谢有人在尝试从Excel打开页面时弄清楚出了什么问题。我认为它必须与Excel如何在浏览器中粘贴地址有关。