Skip to main content

Hoe selecteer en kopieer ik alle hyperlinks uit een Word-document?

Author: Sun Last Modified: 2025-05-29

Als je een lang Word-document hebt met meerdere hyperlinks en ze allemaal tegelijk moet kopiëren, kan het handmatig selecteren van elk ervan tijdrovend zijn. Gelukkig zijn er efficiënte manieren om alle hyperlinks of alleen hun adressen te extraheren en te kopiëren. Deze gids introduceert verschillende methoden om dit snel te doen.


Kopieer alle hyperlinks naar een nieuw document met behulp van VBA

Met behulp van VBA kun je alle hyperlinks uit een document extraheren en kopiëren naar een nieuw document.

  1. Open het Word-document met de hyperlinks en druk op Alt + F11 om het Microsoft Visual Basic for Applications-venster te openen.
  2. Klik op Invoegen > Module, kopieer en plak vervolgens de volgende VBA-code in het modulevenster:
    Sub HyperlinksExtract()
    'Updateby20140214
        Dim oLink As Hyperlink
        Dim docCurrent As Document 'current document
        Dim docNew As Document 'new document
        Dim rngStory As StoryRanges
        Set docCurrent = ActiveDocument
        Set docNew = Documents.Add
        For Each oLink In docCurrent.Hyperlinks
            oLink.Range.Copy
            docNew.Activate
            Selection.Paste
            Selection.TypeParagraph
        Next
        
        Set docNew = Nothing
        Set docCurrent = Nothing
    End Sub
    
  3. Klik op de Uitvoeren knop om de VBA-code uit te voeren. Er wordt een nieuw document geopend met daarin alle hyperlinks uit het originele document.
    Document with text with hyperlinks >>> New document with only text with hyperlinks

Opmerking: Deze VBA-methode werkt alleen voor tekstgebaseerde hyperlinks. Het extraheert geen hyperlinks die zijn ingebed in afbeeldingen.


Extraheer alleen hyperlinkadressen (platte tekst) naar een nieuw document met behulp van VBA

Deze VBA-methode extraheert alleen de hyperlinkadressen uit een document en plakt ze in een nieuw document.

  1. Open het Word-document en druk op Alt + F11 om de VBA-editor te openen.
  2. Klik op Invoegen > Module, kopieer en plak vervolgens de volgende VBA-code:
    Function GetAllHyperlinks()
    'Updateby20140214
        Dim docCurrent As Document
        Dim docNew As Document
        Dim oLink As Hyperlink
        Dim rng As Range
        Application.ScreenUpdating = False
        Set docCurrent = ActiveDocument
        Set docNew = Documents.Add
        For Each oLink In docCurrent.Hyperlinks
            Set rng = docNew.Range
            rng.Collapse
            rng.InsertParagraph
            rng.InsertAfter (oLink.Address)
        Next
        docNew.Activate
        Application.ScreenUpdating = True
        Application.ScreenRefresh
    End Function
    
  3. Klik op de Uitvoeren knop. Er wordt een nieuw document gemaakt met alleen de hyperlinkadressen (platte tekst).
    Document with text with hyperlinks >>> New document with only hyperlink addresses

Opmerking: De geëxtraheerde hyperlinkadressen kunnen niet in dezelfde volgorde verschijnen als in het originele document.


Kopieer hyperlinks of adressen naar het klembord met behulp van Kutools voor Word

Kutools voor Word biedt een eenvoudige manier om alle hyperlinks of alleen hun adressen naar het klembord te kopiëren met een paar klikken.

Kutools voor Word,uitgerust met AI 🤖, biedt meer dan 100 handige functies om uw taken te vereenvoudigen.
  1. Klik op Kutools Plus > Hyperlink Kopiëren.
    Copy Hyperlink button on the Kutools tab on the ribbon
  2. Selecteer in het dialoogvenster Kopieer alle hyperlinks naar klembord de gewenste optie.
    Copy all hyperlinks to clipboard dialog box
  3. Plak de gekopieerde hyperlinks waar je wilt door op Ctrl + V te drukken.
  • Als je de Hyperlinks optie selecteert, worden zowel de weergavetekst als de hyperlink gekopieerd.
    Text with hyperlinks pasted
  • Als je de Hyperlinkadressen optie selecteert, wordt alleen het hyperlinkadres als platte tekst gekopieerd.
    Hyperlinks addresses pasted
Kutools voor Word is de ultieme Word-add-in die uw werk stroomlijnt en uw vaardigheden in documentverwerking verbetert. Haal het nu!

Demo: Kopieer alle hyperlinks in een Word-document

Ontdek de Kutools / Kutools Plus tab in deze video van Kutools voor Word. Geniet van 100+ functies en permanente gratis AI-hulpprogramma's. Download nu!


Tabbladen voor het bekijken en bewerken van meerdere Word-documenten/Excel-werkboeken, net zoals in Chrome en Edge!

Net zoals het bekijken van meerdere webpagina's in Chrome, Safari en Edge, stelt Office Tab je in staat om meerdere Word-documenten of Excel-werkboeken in één Word-venster of Excel-venster te openen en beheren. Wisselen tussen documenten of werkboeken is nu eenvoudig met een klik op hun tabbladen!

Probeer Office Tab nu gratis!


Gerelateerde artikelen:

Beste productiviteitstools voor kantoor

Kutools voor Word – Til uw Word-ervaring naar een hoger niveau met meer dan 100 indrukwekkende functies!

🤖 Kutools AI-functies: AI Assistent / Realtime Assistent / Super Pools (Formaat behouden) / Super Vertalen (Formaat behouden) / AI Redactie / AI Proeflezen...

📘 Documentbeheersing: Pagina’s splitsen / Documenten samenvoegen / Selectie exporteren in diverse formaten (PDF/TXT/DOC/HTML...) / Batch converteren naar PDF...

Inhoud bewerken: Batch Zoeken en Vervangen in meerdere bestanden / Alle afbeeldingen formaat wijzigen / Rij- en kolomindeling van tabellen transponeren / Tabel naar tekst converteren...

🧹 Moeiteloos opschonen: Verwijder extra spaties / sectie-eindes / tekstvakken / hyperlinks / Voor meer verwijderopties, ga naar de groep Verwijderen...

Creatieve invoegingen: Voeg duizendtallen-scheidingstekens toe / selectievakjes / keuzerondjes / QR-code / barcode / meerdere afbeeldingen / Ontdek meer in de groep Invoegen...

🔍 Nauwkeurige selecties: Selecteer specifieke pagina’s / tabellen / vormen / kopalinea’s / Verbeter de navigatie met meer Selecteer -functies...

Ster-upgrades: Navigeer naar elke locatie / Automatisch herhalende tekst invoegen / Wissel tussen documentvensters /11 conversietools...

Kutools and Kutools Plus tabs on the Word Ribbon
👉 Wilt u deze functies uitproberen? Download Kutools voor Word nu! 🚀