Einfügen von Hyperlinks in die Bibliographie in Word 2013

465
aroukouth

Ich bemühe mich, Hyperlinks in meine Word-generierte Bibliographie aufzunehmen (ich verwende das Wort 2013). Ich habe die folgende Lösung gefunden (ich habe etwas Code von Raystafarians Antwort auf Alle Instanzen eines Textes ausleihen und ihn mit einem Makro zu einem Hyperlink machen )

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

Dies scheint für die meisten Quellen gut zu funktionieren, aber leider (und ich kann nicht erklären, warum dies geschieht), scheint er bei einigen Quellen die URL nicht in einen Hyperlink zu ändern. Wenn ich manuell nach der URL suche, finde ich sie. Vielleicht kann jemand erklären, warum der Code in manchen Fällen die URL nicht durch einen Hyperlink ersetzt.

Ich habe auf der Website nach ähnlichen Fragen gesucht und nur diesen Thread gefunden: Einschließlich Hyperlinks in Microsoft Word 2013-Referenzen, die keine Antworten hatten.

1
Ich habe es funktioniert, indem ich den Code "Set rngSearch = ActiveDocument.Range" in "Set rngSearch = Selection" geändert habe. aroukouth vor 7 Jahren 0
Füllen Sie Ihr Profil ein wenig aus und Sie können diesen Kommentar als Antwort absenden und dann akzeptieren. Dies ist eine gute Sache, weil wir gerne Antworten auf Probleme sehen und Sie Ihr Problem beantwortet haben. Eine andere Person hat möglicherweise dasselbe Problem, und wenn Ihre Antwort klar als solche markiert ist, wird dies hilfreich sein. music2myear vor 7 Jahren 0

0 Antworten auf die Frage

Verwandte Probleme