Gå til hovedindhold

Hvordan udpakkes faktiske adresser fra hyperlinks i Excel?

Forfatter: Xiaoyang Sidst ændret: 2020-05-29

Hvis du antager, at du har en række celler, der indeholder hyperlinks, og nu skal du se den virkelige destination for hyperlinks og udtrække dem fra hyperlinks som følgende vist skærmbillede. Er der nogen nemme måder at løse dette problem hurtigt? Denne artikel vil guide dig til at udtrække faktiske adresser fra flere hyperlinks.


pil blå højre boble Uddrag faktiske adresser fra hyperlinks med Rediger hyperlink-funktionen

Her, den Rediger hyperlink funktion kan hjælpe dig med at udtrække den underliggende URL til hver af disse hyperlinks og placere den aktuelle adresse i en anden celle. Du kan gøre som dette:

1. Vælg cellen med hyperlink, og højreklik, vælg fra genvejsmenuen Rediger hyperlink, se skærmbillede:

2. Og en Rediger hyperlink dialogboks vises, vælg og kopier (Ctrl + C) hele URL'en fra Adresse felt i dialogboksen.

3. Luk derefter dialogboksen, og indsæt den aktuelle adresse i den ønskede celle.

Bemærk: Med denne metode kan du kun udpakke en hyperlinkadresse hver gang, men hvis du har flere hyperlinks, der skal ekstraheres, skal du anvende denne funktion gentagne gange.


pil blå højre boble Uddrag faktiske adresser fra hyperlinks med VBA-kode

For mange hyperlinks vil ovenstående metode være kedelig og tidskrævende, så følgende VBA-kode kan hjælpe dig med hurtigt at udtrække flere adresser fra hyperlinks på én gang.

1. Hold nede ALT + F11 nøgler til at åbne Microsoft Visual Basic til applikationer vindue.

2. Klik indsatte > Moduler, og indsæt følgende kode i modulvinduet.

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. Tryk derefter på F5 nøgle til at køre koden, og der vises en dialogboks, hvor du kan vælge de hyperlinks, du vil udtrække de rigtige adresser, se skærmbillede:

4. Klik derefter på OK, og det valgte celleindhold er konverteret til de rigtige hyperlinkadresser i det oprindelige interval. Se skærmbilleder:


pil blå højre boble Uddrag faktiske adresser fra hyperlinks med User Definde-funktion

Følgende brugerdefinerede funktion kan også udtrække den aktuelle URl fra hyperlinks.

1. Hold nede ALT + F11 nøgler til at åbne Microsoft Visual Basic til applikationer vindue.

2. Klik indsatte > Moduler, og indsæt følgende kode i Modul vindue.

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

3. Gem koden, og luk vinduet, vælg en tom celle for at skrive denne formel = GetURL (A2) (A2 er cellen, som hyperlinket er i), og tryk på Indtast knap. Du kan se den rigtige hyperlinkadresse er udpakket.


pil blå højre boble Uddrag faktiske adresser fra hyperlinks med Kutools til Excel hurtigt og nemt

Her er et praktisk værktøj, kaldet Kutools til Excel, Med Konverter hyperlinks funktion, kan du hurtigt håndtere følgende handlinger:

  • Uddrag faktiske adresser fra hyperlinks;
  • Konverter url-tekst til klikbare hyperlinks.
Kutools til Excel : med mere end 300 praktiske Excel-tilføjelsesprogrammer, gratis at prøve uden begrænsning på 30 dage.

Hvis du har installeret Kutools til Excelskal du gøre som følger:

1. Vælg det interval, der indeholder de hyperlinks, der skal ekstraheres.

2. Klik Kutools > Link > Konverter hyperlinks, se skærmbillede:

3. I Konverter hyperlinks dialogboksen, vælg Hyperlinks adresser erstatter celleindhold valgmulighed og klik doc-knap1 knap fra Resultatinterval for at angive en celle, der skal placere resultatet.

4. Og klik derefter på OK, de faktiske adresser er blevet ekstraheret fra hyperlinks. Se skærmbillede:

Bemærk: Hvis du vil placere de faktiske adresser i det originale interval, skal du kontrollere Konverter kildeområde.

Klik Konverter hyperlinks at vide mere om denne funktion.

Download og gratis prøveversion Kutools til Excel nu!


pil blå højre boble Demo: Uddrag aktuelle adresser fra hyperlinks med Kutools til Excel

Kutools til Excel: med mere end 300 praktiske Excel-tilføjelsesprogrammer, gratis at prøve uden begrænsning på 30 dage. Download og gratis prøveversion nu!

Relateret artikel:

Hvordan konverteres url-tekst til klikbart hyperlink i Excel?

Bedste kontorproduktivitetsværktøjer

🤖 Kutools AI Aide: Revolutionér dataanalyse baseret på: Intelligent udførelse   |  Generer kode  |  Opret brugerdefinerede formler  |  Analyser data og generer diagrammer  |  Aktiver Kutools funktioner...
Populære funktioner: Find, fremhæv eller identificer dubletter   |  Slet tomme rækker   |  Kombiner kolonner eller celler uden at miste data   |   Runde uden formel ...
Super opslag: VLookup med flere kriterier    Multiple Value VLookup  |   VOpslag på tværs af flere ark   |   Fuzzy Lookup ....
Avanceret rulleliste: Opret hurtigt rulleliste   |  Afhængig rulleliste   |  Multivælg rulleliste ....
Column Manager: Tilføj et bestemt antal kolonner  |  Flyt kolonner  |  Skift synlighedsstatus for skjulte kolonner  |  Sammenlign områder og kolonner ...
Fremhævede funktioner: Grid fokus   |  Designvisning   |   Stor Formel Bar    Arbejdsbog & Ark Manager   |  Ressourcebibliotek (Autotekst)   |  Datovælger   |  Kombiner regneark   |  Krypter/Dekrypter celler    Send e-mails efter liste   |  Superfilter   |   Specielt filter (filter fed/kursiv/gennemstreget...) ...
Top 15 værktøjssæt12 tekst Værktøjer (tilføje tekst, Fjern tegn, ...)   |   50 + Chart Typer (Gantt kort, ...)   |   40+ Praktisk formler (Beregn alder baseret på fødselsdag, ...)   |   19 Indsættelse Værktøjer (Indsæt QR-kode, Indsæt billede fra sti, ...)   |   12 Konvertering Værktøjer (Tal til ord, Valutaomregning, ...)   |   7 Flet og del Værktøjer (Avancerede kombinere rækker, Opdel celler, ...)   |   ... og mere

Overlad dine Excel-færdigheder med Kutools til Excel, og oplev effektivitet som aldrig før. Kutools til Excel tilbyder over 300 avancerede funktioner for at øge produktiviteten og spare tid.  Klik her for at få den funktion, du har mest brug for...

Beskrivelse


Fanen Office bringer en grænseflade til et kontor med Office, og gør dit arbejde meget lettere

  • Aktiver redigering og læsning af faner i Word, Excel, PowerPoint, Publisher, Access, Visio og Project.
  • Åbn og opret flere dokumenter i nye faner i det samme vindue snarere end i nye vinduer.
  • Øger din produktivitet med 50 % og reducerer hundredvis af museklik for dig hver 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
Leave your comments
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations