Here Excel? Kan Rediger link funksjonen hjelpe deg trekke den underliggende URL for hver av disse hyperkoblinger og plassere den aktuelle adressen inn i en annen celle. Du kan gjøre som dette:
1. Velg cellen med hyperkobling og høyreklikk, fra hurtigmenyen, velg Rediger link, se skjermbilde:
to. Og en Rediger hyperkobling dialogboks vil bli dukket opp, velg og kopier (Ctrl + C) hele URL fra adressefeltet i dialogboksen.
Tre. Deretter lukker du dialogboksen og lim den faktiske adressen til en celle du ønsker
. Merk: Med denne metoden kan du trekke ut bare én hyperkobling adresse, men hvis du har flere hyperkoblinger må trekkes ut, må du bruke denne funksjonen gjentatte ganger.
Utdrag faktiske adresser fra hyperkoblinger med VBA-kode
For mange hyperkoblinger, over metoden vil være kjedelig og tidkrevende, så følgende VBA-kode kan hjelpe deg raskt trekke flere adresser fra hyperkoblinger på en gang.
1. Velg området som inneholder hyperkoblinger trenger å trekke ut.
2. Hold nede ALT + F11-tastene for å åpne Microsoft Visual Basic for Applications vinduet.
3. Klikk Sett > Modul, og lim inn følgende kode i modulen Window.
Sub Extracthyperlinks () 'Updateby20140318Dim RNG Som RangeDim WorkRng Som RangeOn Error Resume NextxTitleId = "KutoolsforExcel" Set WorkRng = Application.SelectionSet WorkRng = Application.InputBox ("Range", xTitleId, WorkRng.Address, Type: = 8) For Hver RNG I WorkRng Hvis Rng.Hyperlinks.Count > 0 Then Rng.Value = Rng.Hyperlinks.Item (1) .Address End IfNextEnd Sub
4. Trykk F5 for å kjøre koden, og en dialog spretter ut for deg å velge et område, og klikk deretter OK, og de utvalgte celleinnholdet har blitt konvertert til den virkelige hyperkoblingsadresser i den originale serien. Se skjermbilde:
Utdrag aktuelle adresser fra hyperkoblinger med Definde Function
Det er en definert funksjon kan også trekke den faktiske URL fra hyperkoblinger
1.. Hold nede ALT + F11-tastene for å åpne Microsoft Visual Basic for Applications vinduet.
2. Klikk Sett > Modul, og lim inn følgende kode i modulen Window.
Funksjon getUrl (pWorkRng As Range) Som String'Updateby20140520 getUrl = pWorkRng.Hyperlinks (1) .AddressEnd Function3. Lagre koden og lukke vinduet, velg en tom celle for å skrive denne formelen = getURL (E1) (E1 er den cellen som hyperkoblingen i), og trykk på Enter-knappen. Du kan se den virkelige hyper adressen er utvunnet.
Utdrag faktiske adresser fra hyperkoblinger med Kutools for Excel
Her er et nyttig verktøy, kalt Kutools for Excel, med sin Konverter Hyper funksjonen, kan du raskt håndtere følgende operasjoner:
Utdrag faktiske adresser fra hyperkoblinger;
Konverter url tekst til klikkbare hyperlenker
Kutools for Excel omfatter mer enn 120 praktiske Excel-verktøy.. Gratis å prøve uten begrensning i 30 dager. Få den nå
Hvis du har installert Kutools for Excel, kan du gjøre som følger:
1. Velg området som inneholder hyperkoblinger trenger å trekke ut.
2. Klikk Kutools > Link Verktøy > Konverter Hyperkoblinger, se skjermbilde:
tre. I Convert Hyper dialogboksen velge hyperlenker adresser erstatte celleinnhold alternativet, og klikk knappen fra Resultat utvalg til å angi en celle for å sette resultatet.
4. Og klikk deretter på OK, selve adressene er hentet fra hyperkoblinger. Se skjermbilde:
Merk:.. Hvis du ønsker å sette den faktiske adressene til den opprinnelige serien, sjekk Konverter kilde spekter
Klikk Konverter Hyperlenker til å vite mer om denne funksjonen
Next Page:? Hvordan torget flere celler i
Det er en definert funksjon kan også trekke den faktiske URL fra hyperkoblinger
1.. Hold nede ALT + F11-tastene for å åpne Microsoft Visual Basic for Applications vinduet.
2. Klikk Sett > Modul, og lim inn følgende kode i modulen Window.
Funksjon getUrl (pWorkRng As Range) Som String'Updateby20140520 getUrl = pWorkRng.Hyperlinks (1) .AddressEnd Function3. Lagre koden og lukke vinduet, velg en tom celle for å skrive denne formelen = getURL (E1) (E1 er den cellen som hyperkoblingen i), og trykk på Enter-knappen. Du kan se den virkelige hyper adressen er utvunnet.