Hoe converteer je een heleboel tekst-URL's naar actieve hyperlinks in Excel?

Als je een lijst met URL-adressen hebt die platte tekst zijn, hoe kun je deze tekst-URL's dan activeren tot klikbare hyperlinks zoals in de volgende schermafbeelding wordt getoond?

Converteer een heleboel tekst-URL's naar actieve hyperlinks met formules

Converteer een heleboel tekst-URL's naar actieve hyperlinks Kutools voor Excel

Converteer een heleboel tekst-URL's naar actieve hyperlinks met VBA-code

Converteer een heleboel tekst-URL's naar actieve hyperlinks met formules

Het dubbelklikken op de cel om de hyperlinks één voor één te activeren zal veel tijd verspillen. Hier kan ik je enkele formules introduceren. Volg de onderstaande stappen:

Voer deze formule in: =HYPERLINK(A2, A2) in een lege cel waar je het resultaat wilt uitvoeren, en sleep vervolgens de vulgreep omlaag om deze formule toe te passen op de cellen die je wilt, en alle tekst-URL's zijn geconverteerd naar actieve hyperlinks, zie onderstaande schermafbeelding:

Converteer een heleboel tekst-URL's naar actieve hyperlinks Kutools voor Excel

Hier is een handig hulpmiddel - Kutools voor Excel, met de functie Hyperlinks converteren, kun je snel zowel een heleboel tekst-URL's omzetten in klikbare hyperlinks als echte hyperlinkadressen extraheren uit een hyperlinktekstreeks.

Na het installeren van Kutools voor Excel, doe dan het volgende:

1. Selecteer de cellen die de tekst-URL's bevatten die je wilt activeren.

2. Klik vervolgens op Kutools > Koppeling > Hyperlinks converteren, zie onderstaande schermafbeelding:

3. In het dialoogvenster Hyperlinks converteren, selecteer de optie Celinhoud converteren naar hyperlinkadres onder de sectie Conversietype, en vink Bronbereik converteren aan als je de werkelijke adressen in het originele bereik wilt plaatsen, zie onderstaande schermafbeelding:

4. Klik vervolgens op de knop OK, en de tekst-URL's zijn meteen geactiveerd, zie onderstaande schermafbeelding:

Opmerking: Als je het resultaat in een andere cel wilt plaatsen in plaats van in de originele cel, vink dan Bronbereik converteren uit, en selecteer een cel waar je het resultaat wilt uitvoeren vanuit het Resultaatbereik zoals in de volgende schermafbeelding wordt getoond:

Klik hier om Kutools voor Excel te downloaden en gratis te proberen!

Converteer een heleboel tekst-URL's naar actieve hyperlinks met VBA-code

De onderstaande VBA-code kan je ook helpen bij het oplossen van deze taak, doe het volgende:

1. Houd de toetsen ALT + F11 ingedrukt om het venster Microsoft Visual Basic for Applications te openen.

2. Klik op Invoegen > Module, en plak de volgende code in het Modulevenster.

VBA-code: Converteer een heleboel tekst-URL's naar actieve hyperlinks:

Sub activateHyperlinks()
'Updateby Extendoffice
Dim Rng As Range
Dim WorkRng As Range
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
For Each Rng In WorkRng
    Application.ActiveSheet.Hyperlinks.Add Rng, Rng.Value
Next
End Sub

3. Druk vervolgens op de toets F5 om deze code uit te voeren, en er verschijnt een pop-upvenster dat je eraan herinnert de cellen te selecteren die je wilt omzetten in klikbare hyperlinks, zie onderstaande schermafbeelding:

4. Klik vervolgens op de knop OK, en de platte tekst-URL's zijn geconverteerd naar actieve hyperlinks, zie onderstaande schermafbeelding: