Note: The other languages of the website are Google-translated. Back to English
Logga in  \/ 
x
or
x
Registrera  \/ 
x

or

Hur extraherar jag faktiska adresser från hyperlänkar i Excel?

Om du antar att du har ett antal celler som innehåller hyperlänkar, och nu måste du se hyperlänkarnas verkliga mål och extrahera dem från hyperlänkarna enligt följande skärmdump. Finns det några enkla sätt att lösa detta problem snabbt? Den här artikeln hjälper dig att extrahera faktiska adresser från flera hyperlänkar.


pil blå höger bubbla Extrahera faktiska adresser från hyperlänkar med funktionen Redigera hyperlänk

Här, den Redigera hyperlänk -funktionen kan hjälpa dig att extrahera den underliggande webbadressen för var och en av dessa hyperlänkar och placera den faktiska adressen i en annan cell. Du kan göra så här:

1. Markera cellen med hyperlänk och högerklicka, välj från snabbmenyn Redigera hyperlänk, se skärmdump:

2. Och en Redigera hyperlänk dialogrutan visas, välj och kopiera (Ctrl + C) hela webbadressen från Adress fältet i dialogrutan.

3. Stäng sedan dialogrutan och klistra in den faktiska adressen i vilken cell du vill.

Anmärkningar: Med den här metoden kan du bara extrahera en hyperlänkadress varje gång, men om du har flera hyperlänkar måste extraheras måste du använda den här funktionen upprepade gånger.


pil blå höger bubbla Extrahera faktiska adresser från hyperlänkar med VBA-kod

För många hyperlänkar kommer metoden ovan att vara tråkig och tidskrävande, så följande VBA-kod kan hjälpa dig att snabbt extrahera flera adresser från hyperlänkarna på en gång.

1. Håll ner ALT + F11 nycklar för att öppna Microsoft Visual Basic för applikationer fönster.

2. Klicka Insert > Modulernaoch klistra in följande kod i modulfönstret.

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. Tryck sedan på F5 nyckel för att köra koden, och en dialog dyker upp för dig att välja de hyperlänkar som du vill extrahera de riktiga adresserna, se skärmdump:

4. Klicka sedan OKoch det valda cellinnehållet har konverterats till de riktiga hyperlänkadresserna i det ursprungliga intervallet. Se skärmdumpar:


pil blå höger bubbla Extrahera faktiska adresser från hyperlänkar med User Definde Function

Följande användardefinierade funktion kan också extrahera den faktiska URl från hyperlänkarna.

1. Håll ner ALT + F11 nycklar för att öppna Microsoft Visual Basic för applikationer fönster.

2. Klicka Insert > Modulernaoch klistra in följande kod i Modulfönster.

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

3. Spara koden och stäng fönstret, välj en tom cell för att skriva denna formel = GetURL (A2) (A2 är cellen som hyperlänken finns i) och tryck på ange knapp. Du kan se den verkliga hyperlänkadressen extraheras.


pil blå höger bubbla Extrahera faktiska adresser från hyperlänkar med Kutools för Excel snabbt och enkelt

Här är ett praktiskt verktyg, kallat Kutools för Excel, med dess Konvertera hyperlänkar funktion kan du snabbt hantera följande åtgärder:

  • Extrahera faktiska adresser från hyperlänkar;
  • Konvertera webbadress till klickbara hyperlänkar.
Kutools för Excel : med mer än 300 praktiska Excel-tillägg, gratis att prova utan begränsning på 30 dagar.

Om du har installerat Kutools för Excel, gör så här:

1. Välj det intervall som innehåller hyperlänkar som behöver extraheras.

2. Klicka Kutools > Länk > Konvertera hyperlänkar, se skärmdump:

3. I Konvertera hyperlänkar dialogrutan väljer du Hyperlänkar adresser ersätter cellinnehåll alternativet och klicka på doc-knapp1 knappen från Resultatintervall för att ange en cell för att placera resultatet.

4. Och klicka sedan på OKhar de faktiska adresserna extraherats från hyperlänkarna. Se skärmdump:

Anmärkningar: Om du vill lägga till de faktiska adresserna till det ursprungliga intervallet, vänligen kontrollera Konvertera källområdet.

Klicka Konvertera hyperlänkar för att veta mer om den här funktionen.

Ladda ner och testa gratis Kutools för Excel nu!


pil blå höger bubbla Demo: Extrahera faktiska adresser från hyperlänkar med Kutools för Excel

Kutools för Excel: med mer än 300 praktiska Excel-tillägg, gratis att prova utan begränsning på 30 dagar. Ladda ner och testa gratis nu!

Relaterad artikel:

Hur konverterar man webbadress till klickbar hyperlänk i Excel?


De bästa Office-produktivitetsverktygen

Kutools för Excel löser de flesta av dina problem och ökar din produktivitet med 80%

  • återanvändning: Sätt snabbt i komplexa formler, diagram och allt som du har använt tidigare; Kryptera celler med lösenord; Skapa e-postlista och skicka e-post ...
  • Super Formula Bar (enkelt redigera flera rader med text och formel); Läslayout (enkelt läsa och redigera ett stort antal celler); Klistra in i filtrerat intervall...
  • Sammanfoga celler / rader / kolumner utan att förlora data; Delat cellinnehåll; Kombinera duplicerade rader / kolumner... Förhindra duplicerade celler; Jämför intervall...
  • Välj Duplicera eller Unikt Rader; Välj tomma rader (alla celler är tomma); Super Find och Fuzzy Find i många arbetsböcker; Slumpmässigt val ...
  • Exakt kopia Flera celler utan att ändra formelreferens; Skapa referenser automatiskt till flera ark; Sätt in kulor, Kryssrutor och mer ...
  • Extrahera text, Lägg till text, ta bort efter position, Ta bort mellanslag; Skapa och skriva ut personsökningstalsatser; Konvertera mellan celler innehåll och kommentarer...
  • Superfilter (spara och tillämpa filterscheman på andra ark); Avancerad sortering efter månad / vecka / dag, frekvens och mer; Specialfilter av fet, kursiv ...
  • Kombinera arbetsböcker och arbetsblad; Sammanfoga tabeller baserat på nyckelkolumner; Dela data i flera ark; Batchkonvertera xls, xlsx och PDF...
  • Mer än 300 kraftfulla funktioner. Stöder Office / Excel 2007-2019 och 365. Stöder alla språk. Enkel distribution i ditt företag eller organisation. Fullständiga funktioner 30-dagars gratis provperiod. 60-dagars pengarna tillbaka-garanti.
kte-flik 201905

Fliken Office ger ett flikgränssnitt till Office och gör ditt arbete mycket enklare

  • Aktivera flikredigering och läsning i Word, Excel, PowerPoint, Publisher, Access, Visio och Project.
  • Öppna och skapa flera dokument i nya flikar i samma fönster, snarare än i nya fönster.
  • Ökar din produktivitet med 50% och minskar hundratals musklick åt dig varje dag!
officetab botten
Say something here...
symbols left.
You are guest
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.
  • To post as a guest, your comment is unpublished.
    Kristy Neckowicz · 1 months ago
    Thank you for the tip to Extract Actual Addresses From Hyperlinks in Excel With VBA Code. It was exactly what I needed! 
  • To post as a guest, your comment is unpublished.
    Emily · 2 months ago
    How does this apply to Excel on Mac?
  • To post as a guest, your comment is unpublished.
    dduluk · 3 months ago
    I think it's nice to have an option that doesn't require macros since so many haven't used VBA at all.
  • To post as a guest, your comment is unpublished.
    dduluk · 3 months ago
    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)
  • To post as a guest, your comment is unpublished.
    Stardust2150 · 4 months ago
    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.
  • To post as a guest, your comment is unpublished.
    Thankful · 1 years ago
    Thanks for the " Extract actual addresses from hyperlinks with VBA code" VBA and clear instructions. It worked great for me.
  • To post as a guest, your comment is unpublished.
    apodsim@gmail.com · 2 years ago
    Trying to save time creating multiple Hyperlinks and hoped this program would help with the task. I have combined several columns containing text into a single cell and then used the Edit/Link to create a working URL. Is there a tool to modify the URL to display text characters of the URL.
  • To post as a guest, your comment is unpublished.
    sujan9991@gmail.com · 3 years ago
    Hi, How to do the same in google sheets
    • To post as a guest, your comment is unpublished.
      skyyang · 3 years ago
      hello, sujan,
      To extract all real addresses from hyperlinks in Google sheets, the following script code can help you:

      function linkURL(reference) {
      var sheet = SpreadsheetApp.getActiveSheet();
      var formula = SpreadsheetApp.getActiveRange().getFormula();
      var args = formula.match(/=\w+\((.*)\)/i);
      try {
      var range = sheet.getRange(args[1]);
      }
      catch(e) {
      throw new Error(args[1] + ' is not a valid range');
      }
      var formulas = range.getFormulas();
      var output = [];
      for (var i = 0; i < formulas.length; i++) {
      var row = [];
      for (var j = 0; j < formulas[0].length; j++) {
      var url = formulas[i][j].match(/=hyperlink\("([^"]+)"/i);
      row.push(url ? url[1] : '');
      }
      output.push(row);
      }
      return output
      }

      After copying and pasting the above code, go back to your sheet, and apply this formula:=linkURL(A2).
      Please try it, hope it can help you, thank you!
      • To post as a guest, your comment is unpublished.
        sujan9991@gmail.com · 3 years ago
        Hi,thank you for reply. I'm getting following error. and LinkUrl is not detecting as function
        • To post as a guest, your comment is unpublished.
          skyyang · 3 years ago
          Hi, sujan,
          The script code is worked correctly in my google sheet, see screenshot:
          • To post as a guest, your comment is unpublished.
            sujan9991@gmail.com · 3 years ago
            Hi Can you share with me a sample link please. The function is not detecting in my file
            • To post as a guest, your comment is unpublished.
              skyyang · 3 years ago
              Hi,
              Can you give your email account, and i will share the file with you!
              Thank you!
              • To post as a guest, your comment is unpublished.
                sujan9991@gmail.com · 3 years ago
                Sujan9991@gmail.com
                • To post as a guest, your comment is unpublished.
                  skyyang · 3 years ago
                  Sujan, I have shared the file with you, please check.
  • To post as a guest, your comment is unpublished.
    Victor Nieto · 3 years ago
    Thanks!!!!!
  • To post as a guest, your comment is unpublished.
    Neeks · 3 years ago
    Ah, amazing! Thank you!
  • To post as a guest, your comment is unpublished.
    sei · 3 years ago
    pretty..and nice...and fantabulouslyfntastikittilybumpershumperazardubiliousipaparazziastically yummy :P
    huh!
  • To post as a guest, your comment is unpublished.
    Stephanie · 4 years ago
    You have no idea how much time you saved me!!!
    Thank you so much!!!!!!!!!!!!!!!!!!!
  • To post as a guest, your comment is unpublished.
    Seocheckout.com · 5 years ago
    Very nice tool! I converted 16K+ links. Tool worked fast and flawless.
  • To post as a guest, your comment is unpublished.
    Alex T · 5 years ago
    Thanks so much!


    Saved me big time of having to do 800+ of these cells!
  • To post as a guest, your comment is unpublished.
    Nimrod · 5 years ago
    For some reason this doesn't work for me.
    I created the defined function just as you described, but it doesn't do anything :\
    I also want to merge it with the Hyperlink function, like so:
    =HYPERLINK(=getURL(A1), [A1])

    So that the final result will copy A1's URL and display it as A1's text string (i.e. just copy A1 to another cell, including both its text and hyperlink. A simple thing which Excel doesn't seem to be able to do for some reason...).
  • To post as a guest, your comment is unpublished.
    Zach Solomon-Beloin · 5 years ago
    This saved me a ton of time! I extracted 500 profile IDs from 500+ names linked to their profiles. This code worked extremely well and was easy to follow. Thanks so much!
  • To post as a guest, your comment is unpublished.
    AJITA · 6 years ago
    Superb! reduced my work to less than a minute.
  • To post as a guest, your comment is unpublished.
    Tj · 6 years ago
    thanks for saving me 15mins
  • To post as a guest, your comment is unpublished.
    Arun Kumar · 6 years ago
    This is the first ever macro based excel tip that worked for me. Thank you very much for making the lives of excel dummies better.
  • To post as a guest, your comment is unpublished.
    Monica · 6 years ago
    Thank you so much :lol: I used the VBA method and it worked like a charm in Excel 365 on a Windows 8.1 OS
  • To post as a guest, your comment is unpublished.
    chris · 6 years ago
    thanks a ton. like everyone else here. this is very helpful and easy.
  • To post as a guest, your comment is unpublished.
    Eva · 6 years ago
    Super! So easy. Thanks!
  • To post as a guest, your comment is unpublished.
    Tzally · 6 years ago
    Thanks a lot! Very helpful yet simple and clear. Just as Albert meant :roll:
  • To post as a guest, your comment is unpublished.
    JC · 6 years ago
    Thankyou so much. it really helped me
  • To post as a guest, your comment is unpublished.
    Thank You · 6 years ago
    Thanks buddy.It really work in seconds.
  • To post as a guest, your comment is unpublished.
    fab · 6 years ago
    You are the best, so easy to follow!
  • To post as a guest, your comment is unpublished.
    Awesome · 6 years ago
    Thank you so much this saved my ass and make me look good.
    8)
  • To post as a guest, your comment is unpublished.
    Respected · 6 years ago
    Thank You SO SO much!
  • To post as a guest, your comment is unpublished.
    vish · 7 years ago
    thnx u made my work so easy
  • To post as a guest, your comment is unpublished.
    PO · 7 years ago
    This just saved me! Thanks
  • To post as a guest, your comment is unpublished.
    mari · 7 years ago
    thanks so much!!! :D
  • To post as a guest, your comment is unpublished.
    bla bla · 7 years ago
    Thankyou so much. it really helped me