Ga naar hoofdinhoud

Hoe daadwerkelijke adressen uit hyperlinks in Excel te extraheren?

Stel dat je een reeks cellen hebt die hyperlinks bevatten, en nu moet je de echte bestemming van de hyperlinks zien en ze uit de hyperlinks extraheren zoals in het volgende screenshot wordt getoond. Zijn er eenvoudige manieren om dit probleem snel op te lossen? Dit artikel zal u helpen om actuele adressen uit meerdere hyperlinks te extraheren.


pijl blauw rechts bel Extraheer actuele adressen uit hyperlinks met de functie Hyperlink bewerken

Hier de Hyperlink bewerken functie kan u helpen de onderliggende URL voor elk van deze hyperlinks te extraheren en dat daadwerkelijke adres in een andere cel te plaatsen. U kunt als volgt doen:

1. Selecteer de cel met hyperlink en klik met de rechtermuisknop, kies in het contextmenu Hyperlink bewerken, zie screenshot:

2. En een Hyperlink bewerken dialoogvenster zal verschijnen, selecteer en kopieer (Ctrl + C) de volledige URL van het Adres veld van het dialoogvenster.

3. Sluit vervolgens het dialoogvenster en plak het werkelijke adres in elke gewenste cel.

Note: Met deze methode kunt u slechts één hyperlinkadres per keer extraheren, maar als u meerdere hyperlinks wilt extraheren, moet u deze functie herhaaldelijk toepassen.


pijl blauw rechts bel Haal daadwerkelijke adressen uit hyperlinks met VBA-code

Voor veel hyperlinks zal de bovenstaande methode vervelend en tijdrovend zijn, dus de volgende VBA-code kan u helpen snel meerdere adressen uit de hyperlinks tegelijk te extraheren.

1. Houd de ALT + F11 toetsen om de te openen Microsoft Visual Basic voor toepassingen venster.

2. Klikken Invoegen > Moduleen plak de volgende code in het modulevenster.

Sub Extracthyperlinks()
'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
    If Rng.Hyperlinks.Count > 0 Then
        Rng.Value = Rng.Hyperlinks.Item(1).Address
    End If
Next
End Sub

3. Druk vervolgens op F5 sleutel om de code uit te voeren, en er verschijnt een dialoogvenster waarin u de hyperlinks kunt selecteren waarvan u de echte adressen wilt extraheren, zie screenshot:

4. Dan klikken OK, en de geselecteerde celinhoud is geconverteerd naar de echte hyperlinkadressen in het oorspronkelijke bereik. Zie screenshots:


pijl blauw rechts bel Haal daadwerkelijke adressen uit hyperlinks met de functie User Definde

De volgende door de gebruiker gedefinieerde functie kan ook de daadwerkelijke URl uit de hyperlinks halen.

1. Houd de ALT + F11 toetsen om de te openen Microsoft Visual Basic voor toepassingen venster.

2. Klikken Invoegen > Moduleen plak de volgende code in het Module Venster.

Function GetURL(pWorkRng As Range) As String
'Updateby Extendoffice
    GetURL = pWorkRng.Hyperlinks(1).Address
End Function

3. Sla de code op en sluit het venster, selecteer een lege cel om deze formule te typen = GetURL (A2) (A2 is de cel waarin de hyperlink zich bevindt), en druk op Enter knop. U kunt zien dat het echte hyperlinkadres is geëxtraheerd.


pijl blauw rechts bel Extraheer actuele adressen uit hyperlinks met Kutools voor Excel snel en gemakkelijk

Hier is een handig hulpmiddel, genaamd Kutools for Excel, Met Hyperlinks converteren functie, kunt u snel de volgende bewerkingen uitvoeren:

  • Haal daadwerkelijke adressen uit hyperlinks;
  • Converteer url-tekst naar klikbare hyperlinks.
Kutools for Excel : met meer dan 300 handige Excel-invoegtoepassingen, gratis te proberen zonder beperking in 30 dagen.

Als je hebt geïnstalleerd Kutools for Excelgaat u als volgt te werk:

1. Selecteer het bereik dat de hyperlinks bevat die moeten worden geëxtraheerd.

2. Klikken Kutools > Link > Hyperlinks converteren, zie screenshot:

3. In de Hyperlinks converteren dialoogvenster, selecteer Hyperlinkadressen vervangen de celinhoud optie en klik op doc-knop1 knop van Resultaatbereik om een ​​cel op te geven om het resultaat te plaatsen.

4. En klik vervolgens op OKzijn de daadwerkelijke adressen uit de hyperlinks gehaald. Zie screenshot:

Note: Als u de werkelijke adressen in het oorspronkelijke bereik wilt plaatsen, controleer dan Converteer het bronbereik.

Klik Hyperlinks converteren voor meer informatie over deze functie.

Download en gratis proef Kutools voor Excel nu!


pijl blauw rechts bel Demo: extraheer actuele adressen uit hyperlinks met Kutools voor Excel

Kutools for Excel: met meer dan 300 handige Excel-invoegtoepassingen, gratis te proberen zonder beperking in 30 dagen. Download en probeer nu gratis!

Gerelateerd artikel:

Hoe url-tekst naar klikbare hyperlink in Excel te converteren?

Beste Office-productiviteitstools

Populaire functies: Zoek, markeer of identificeer duplicaten   |  Verwijder lege rijen   |  Combineer kolommen of cellen zonder gegevens te verliezen   |   Ronde zonder formule ...
Super opzoeken: Meerdere criteria VLookup    VLookup met meerdere waarden  |   VOpzoeken over meerdere bladen   |   Fuzzy opzoeken ....
Geavanceerde vervolgkeuzelijst: Maak snel een vervolgkeuzelijst   |  Afhankelijke vervolgkeuzelijst   |  Multi-select vervolgkeuzelijst ....
Kolom Beheerder: Voeg een specifiek aantal kolommen toe  |  Kolommen verplaatsen  |  Schakel de zichtbaarheidsstatus van verborgen kolommen in  |  Vergelijk bereiken en kolommen ...
Uitgelichte functies: Raster focus   |  Ontwerpweergave   |   Grote formulebalk    Werkmap- en bladbeheer   |  resource Library (Auto-tekst)   |  Datumkiezer   |  Combineer werkbladen   |  Cellen coderen/decoderen    Stuur e-mails per lijst   |  Super filter   |   Speciaal filter (filter vet/cursief/doorhalen...) ...
Top 15 gereedschapsets12 Tekst Tools (toe te voegen tekst, Tekens verwijderen, ...)   |   50+ tabel Types (Gantt Chart, ...)   |   40+ Praktisch Formules (Bereken leeftijd op basis van verjaardag, ...)   |   19 Invoeging Tools (QR-code invoegen, Afbeelding invoegen vanaf pad, ...)   |   12 Camper ombouw Tools (Getallen naar woorden, Currency Conversion, ...)   |   7 Samenvoegen en splitsen Tools (Geavanceerd Combineer rijen, Gespleten cellen, ...)   |   ... en meer

Geef uw Excel-vaardigheden een boost met Kutools voor Excel en ervaar efficiëntie als nooit tevoren. Kutools voor Excel biedt meer dan 300 geavanceerde functies om de productiviteit te verhogen en tijd te besparen.  Klik hier om de functie te krijgen die u het meest nodig heeft...

kte tabblad 201905


Office-tabblad Brengt een interface met tabbladen naar Office en maakt uw werk veel gemakkelijker

  • Schakel bewerken en lezen met tabbladen in Word, Excel, PowerPoint in, Publisher, Access, Visio en Project.
  • Open en maak meerdere documenten in nieuwe tabbladen van hetzelfde venster in plaats van in nieuwe vensters.
  • Verhoogt uw productiviteit met 50% en vermindert honderden muisklikken voor u elke dag!
Comments (44)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Bonjour
Auriez vous une solution pour mettre en place le fonctionnement par la formule sur Excel 365 sur Mac ?
This comment was minimized by the moderator on the site
Hello, Edouard,
Sorry, the methods in this article are only applied to Microsoft Excel.
Thank you!
This comment was minimized by the moderator on the site
Ola colegas ,

Tenho uma planilha com mais de 2000 linhas, preciso exportar o documento que esta no hiperlink estas celulas, para um diretório da maquina, alguém sabe como fazer ?

agradeço a atenção

at..
cássia
This comment was minimized by the moderator on the site
Thank you it solve my problem
This comment was minimized by the moderator on the site
Thank you, the VBA code worked like a charm :)
This comment was minimized by the moderator on the site
Thank you for the tip to Extract Actual Addresses From Hyperlinks in Excel With VBA Code. It was exactly what I needed!
This comment was minimized by the moderator on the site
How does this apply to Excel on Mac?
This comment was minimized by the moderator on the site
I think it's nice to have an option that doesn't require macros since so many haven't used VBA at all.
This comment was minimized by the moderator on the site
If you're not comfortable with VBA, the key step to getting this done is the FORMULATEXT() formula that is included with excel. For example, if cell A1 has this...
=HYPERLINK("https://www.google.com","Google Homepage")
...then it would display "Google Homepage" but you want to extract "https://www.google.com". You can use =FORMULATEXT(A1) to get the output of "=HYPERLINK("https://google.com","Google Homepage")".

Then you use the find and mid functions to find the double quotes (which is CHAR(34)) and pull the string between the first two double quotes. Nesting it all together, you can use this formula to get the URL without any VBA required...
=MID(FORMULATEXT(A1),FIND(CHAR(34),FORMULATEXT(A1))+1,FIND(CHAR(34),FORMULATEXT(A1),FIND(CHAR(34),FORMULATEXT(A1))+1)-FIND(CHAR(34),FORMULATEXT(A1))-1)
This comment was minimized by the moderator on the site
Thankyou for an easy method to extract the complete URL from a weblink. I looked at other methods that were too nebulous but yours was straightforward and easy. Thanks.
This comment was minimized by the moderator on the site
Thanks for the " Extract actual addresses from hyperlinks with VBA code" VBA and clear instructions. It worked great for me.
There are no comments posted here yet
Load More
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations