2 schnelle Möglichkeiten zum Batch-Extrahieren aller Hyperlinks aus Ihrem Word-Dokument

Dieser Artikel zeigt Ihnen zwei schnelle Möglichkeiten, alle Hyperlinks aus Ihrem Word-Dokument stapelweise zu extrahieren, um den Links zu folgen.

Hin und wieder können Hunderte von Hyperlinks über ein Word-Dokument verstreut sein. Wenn Sie in diesem Szenario einem bestimmten Link folgen müssen, müssen Sie zuerst durch das Dokument navigieren, um ihn zu finden, was bei einer langen Datei sehr mühsam sein kann.

Wenn Sie sie jedoch in ein neues Dokument exportieren, kann die Sache viel einfacher werden. Hier sind unsere Lösungen.

Methode 1: Verwenden Sie die Suchfunktion

1. Klicken Sie zunächst auf die Registerkarte „Startseite“ und dann auf die Pfeilschaltfläche neben dem Befehl „Suchen“.
2. Wählen Sie im Dropdown-Menü „Erweiterte Suche“, um das Dialogfeld „Suchen und Ersetzen“ zu öffnen.
3. Klicken Sie anschließend auf die Schaltfläche „Mehr“ und dann auf „Formatieren“.
4. Wählen Sie „Stil“, um das Feld „Stil suchen“ zu öffnen.
5. Wählen Sie „Hyperlink“ und klicken Sie auf „OK“.
6. Klicken Sie dann auf "Suchen in" und wählen Sie "Hauptdokument".

Sie können jetzt alle Hyperlinks in der Auswahl sehen. Wenn Sie sie jedoch kopieren und in ein neues Dokument einfügen, werden Sie feststellen, dass Links ihre Formatierung verlieren und zu einfachen Texten werden.

Derzeit bietet Microsoft keine Lösung für dieses Problem an. Sie müssen also Klartexte wieder manuell in Hyperlinks umwandeln. Hier ist unser früherer Artikel, der verschiedene Möglichkeiten auflistet, denen Sie folgen können: 5 Möglichkeiten zum Konvertieren von URL-Texten in Hyperlinks in Ihrem Word-Dokument

Aufgrund dieses Mangels empfehlen wir Ihnen einen anderen Weg, ebenfalls mit Hilfe der „Suchen“-Funktion. Weitere Informationen finden Sie im Abschnitt „Alle Hyperlinks in einem Dokument finden“ in diesem Artikel: So finden, ändern und löschen Sie Hyperlinks in Ihrem Word-Dokument

Nachdem Sie alle Hyperlinks gefunden haben, führen Sie die Schritte „Kopieren“ und „Einfügen“ durch, um sie zu exportieren.

Methode 2: Führen Sie VBA-Codes aus

1. Drücken Sie zunächst „Alt+ F11“, um den VBA-Editor zu öffnen.
2. Klicken Sie anschließend auf „Einfügen“ und wählen Sie „Modul“, um unter dem „Normal“-Projekt ein neues zu erstellen.
3. Doppelklicken Sie dann auf das Modul, um den Bearbeitungsbereich zu öffnen, und fügen Sie dort die folgenden Codes ein:

Sub ExtractAllhyperlinksInDoc()
  Dim objDoc As Document, objNewDoc As Document
  Dim objHyperlink As Hyperlink
 
  '  Initialization
  Set objDoc = ActiveDocument
  Set objNewDoc = Documents.Add
 
  '  Copy hyperlinks and paste them to a new document.
  With objDoc
    For Each objHyperlink In .Hyperlinks
      objHyperlink.Range.Copy
      objNewDoc.Activate
      With Selection
        .Paste
        .InsertParagraph
        .Collapse Direction:=wdCollapseEnd
      End With
    Next objHyperlink
  End With
End Sub

4. Klicken Sie abschließend auf die Schaltfläche "Ausführen".

Nun wird ein neues Dokument geöffnet und alle Hyperlinks sind dort anklickbar.

Außerdem können Sie für den Fall, dass eine Reihe von Dateien verarbeitet werden müssen, das folgende Makro ausführen:

Sub ExtractHyperlinksFromMultiDoc()
  Dim objDoc As Document, objNewDoc As Document
  Dim objHyperlink As Hyperlink
  Dim strFile As String, strFolder As String
 
  '  Initialization
  Set objNewDoc = Documents.Add
  strFolder = InputBox("Enter folder path here: ", "Folder path")
  strFile = Dir(strFolder & "\" & "*.docx", vbNormal)
 
  '  Open each file in the folder to extract hyperlinks and past them to a new document.
  While strFile <> ""
    Set objDoc = Documents.Open(FileName:=strFolder & "\" & strFile)
 
    With objDoc
      For Each objHyperlink In .Hyperlinks
        objHyperlink.Range.Copy
        objNewDoc.Activate
        With Selection
          .Paste
          .InsertParagraph
          .Collapse Direction:=wdCollapseEnd
        End With
      Next objHyperlink
    End With
    objDoc.Close
    strFile = Dir()
  Wend
End Sub

Denken Sie daran, alle Dokumente zunächst in einem Ordner anzuordnen. Führen Sie dann das obige Makro aus, um ein Eingabefeld zu erhalten. Geben Sie den Ordnerpfad ein und klicken Sie auf „OK“.

Alle Hyperlinks sind jetzt in einem neuen Dokument verfügbar.

Bereit für Wortfehler

Ganz gleich, wie sehr wir davor zurückschrecken, auf einen Word-Fehler zu stoßen. Es ist unvermeidlich, dass man von Zeit zu Zeit darunter leidet. Unser Vorschlag ist, wenn Word zusammenbricht, wählen Sie einen kompetenten Wortreparatur Werkzeug. Überlassen Sie einfach alles dem Profi.

Einführung des Autors:

Vera Chen ist eine Datenrettungsexpertin in DataNumen, Inc., das weltweit führend bei Datenwiederherstellungstechnologien ist, einschließlich XLS-Schaden und pdf Reparatur von Softwareprodukten. Für weitere Informationen besuchen Sie www.datanumen.com €XNUMX