在 Word 2013 中的参考书目中包含超链接

Question

我无法在 Word 生成的参考书目中添加超链接（我使用 Word 2013）。我想出了以下解决方案（我从 Raystafarian 的回答中借用了一些代码查找文本的所有实例并使用宏使其成为超链接）

Sub Add_Hyperlinks_Bibliography()
On Error Resume Next
Set rngSearch = ActiveDocument.Range
For I = 1 To ActiveDocument.Bibliography.Sources.Count
   strStyle = "Intensieve benadrukking"
   strSearch = ActiveDocument.Bibliography.Sources.Item(I).Field("URL")
   strAddress = strSearch
   With rngSearch.Find
      Do While .Execute(findText:=strSearch) = True
          With rngSearch 'we will work with what is found as it will be the selection
              ActiveDocument.Hyperlinks.Add Anchor:=rngSearch, Address:=strAddress
            .Style = ActiveDocument.Styles(strStyle) 'throw the style on it after the link
        End With
        rngSearch.Collapse Direction:=wdCollapseEnd
        'keep it moving
    Loop
 End With
Next I
On Error GoTo 0
Set rngSearch = Nothing
End Sub

对于大多数来源，这似乎都很好用，但不幸的是（我无法解释为什么会发生这种情况），对于某些来源，他似乎没有将 URL 更改为超链接。如果我手动搜索 URL，我会找到它。也许有人可以解释为什么在某些情况下代码不会用超链接替换 ​​URL？

我在网站上搜索了类似的问题，只找到了这个帖子：在 Microsoft Word 2013 引用中包含超链接，尚未收到任何回复。