Note: The other languages of the website are Google-translated. Back to English

Hur ändrar jag flera hyperlänkvägar samtidigt i Excel?

För något ändamål kan du skapa flera hyperlänkar för dina data i kalkylbladet, och alla hyperlänkar är länkade till samma filsökväg eller adress, men nu måste du ersätta den här hyperlänkvägen med en annan adress åt gången. Att ändra sökvägen för hyperlänkar individuellt kan slösa mycket tid, finns det ett snabbt sätt att lösa detta problem?

Ändra flera hyperlänkvägar samtidigt i ett kalkylblad med VBA-kod

Ändra flera hyperlänkvägar samtidigt i ett kalkylblad / arbetsbok / flera ark / markering med en fantastisk funktion


Ändra flera hyperlänkvägar samtidigt i ett kalkylblad med VBA-kod

Om du antar att du har en lista med data med samma hyperlänkar som följande skärmdump visas, och med en VBA-kod kan du snabbt ersätta den gamla filvägen eller adressen i ett kalkylblad med en ny.

1. Håll ner ALT + F11 knapparna och det öppnar Microsoft Visual Basic för applikationsfönster.

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

VBA-kod: ändra flera hyperlänkvägar samtidigt

Sub ReplaceHyperlinks()
'Updateby Extendoffice
Dim Ws As Worksheet
Dim xHyperlink As Hyperlink
Dim xOld As String, xNew As String
xTitleId = "KutoolsforExcel"
Set Ws = Application.ActiveSheet
xOld = Application.InputBox("Old text:", xTitleId, "", Type:=2)
xNew = Application.InputBox("New text:", xTitleId, "", Type:=2)
Application.ScreenUpdating = False
For Each xHyperlink In Ws.Hyperlinks
    xHyperlink.Address = Replace(xHyperlink.Address, xOld, xNew)
Next
Application.ScreenUpdating = True
End Sub

3. Tryck sedan på F5 nyckel för att köra den här koden och en snabbruta för att låta dig mata in din gamla hyperlänkadress i Gammal text låda. Se skärmdump:

4. Klicka OK, och en annan snabbruta visas för att påminna dig om att ange den nya hyperlänkadressen som du vill använda.

5. Och klicka sedan på OKhar alla samma gamla hyperlänkadresser ersatts av den nya på en gång. Se skärmdumpar:


Ändra flera hyperlänkvägar samtidigt i ett kalkylblad / arbetsbok / flera ark / markering med en fantastisk funktion

Om du vill ersätta hyperlänksökvägarna från ett urval, flera ark, nuvarande arbetsbok eller flera arbetsböcker, hur kan du göra det? Med Sök och ersätt egenskap av Kutools för Excelkan du snabbt hantera den här uppgiften.

Notera:Att tillämpa detta Sök och ersätt verktyget, först bör du ladda ner Kutools för Excel, och använd sedan funktionen snabbt och enkelt.

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

1. Klicka Kutools > Navigering, se skärmdump:

2. I det öppnade Navigering fönster, klicka Hitta och ersätta fliken, i Sök och ersätt fönster, klicka ersätta fliken och gör sedan följande:

  • Ange den gamla hyperlänkstexten som du vill hitta i Hitta det textruta och skriv sedan in den nya hyperlänkstexten som du vill ersätta med Ersätt med textruta;
  • Ange omfattningen där du vill hitta och ersätt hyperlänksökvägen från Inom rullgardinsmeny;
  • Välj sedan Hyperlänkar från rullgardinsmenyn Titta in;
  • Äntligen klickar du på Hitta alla -knappen har alla motsvarande celler som innehåller den specifika hyperlänktexten listats i den nedre listrutan.

3. Klicka sedan Ersätt alla knappen har de gamla hyperlänkvägarna ändrats till de nya på en gång, se skärmdump:

Klicka för att ladda ner Kutools för Excel för gratis provversion!


Fler relativa artiklar:

  • Extrahera faktiska adresser från hyperlänkar
  • 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?
  • Konvertera webbadresser till faktiska bilder i Excel
  • Om du har en lista med webbadresser till bilder i kolumn A och nu vill du ladda ner motsvarande bilder från webbadresserna och visa dem i intilliggande kolumn B som vänster skärmdump visas. Hur kunde du extrahera de faktiska bilderna från bild-URL: erna i Excel snabbt och enkelt?
  • Konvertera webbadress till klickbar hyperlänk i Excel
  • Om du antar att du har flera webbadresser i ditt kalkylblad, men de är inte länkade, och nu måste du konvertera alla icke-länkade webbadresser till klickbara hyperlänkar, som följande skärmdumpar visas. Naturligtvis kan du dubbelklicka på dem en efter en för att göra dem klickbara, men det är tidskrävande om det finns många webbadresser. Hur kunde du konvertera flera olänkade webbadresser till klickbara hyperlänkar automatiskt i Excel?
  • Öppna en specifik sida med PDF-dokument från Excel-länk
  • När du länkar en cell till en PDF-fil, går du normalt till den första sidan i PDF-filen när du klickar för att öppna hyperlänken. Om du behöver hoppa direkt till en viss sida i PDF-filen genom att klicka på hyperlänken kan den här artikeln göra dig en tjänst.

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-2021 och 365. Stöder alla språk. Enkel implementering 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 för dig varje dag!
officetab botten
Sortera kommentarer efter
Kommentarer (45)
Inga betyg än. Bli först med att betygsätta!
Denna kommentar minimerades av moderatoren på webbplatsen
Fantastiskt att det sparade min stora ansträngning.
Denna kommentar minimerades av moderatoren på webbplatsen
älskar det, du sparar mig massor av arbete.
Denna kommentar minimerades av moderatoren på webbplatsen
Hej, kan du ge mig VB-koden om jag behöver ändra länkar i Powerpoint istället för excel? Tack
Denna kommentar minimerades av moderatoren på webbplatsen
Hej, det här verkar fungera utmärkt men vissa tecken (till exempel "\" och "%"). I mitt fall har jag hyperlänkadresser som [../../../../../../Application%20Data/Microsoft/2012/Relacom%20Uki-Kantvik-Tallinna-Pietari-Uki_saate151012.xls] och Jag måste få starten [../../../../../../Application%20Data/Microsoft/] borta från adressen från hundratals länkar. Början av länkarna är densamma, men ändarna är olika. Har du några bra råd?
Denna kommentar minimerades av moderatoren på webbplatsen
tack!!!! :lol: det hjälpte mycket.
Denna kommentar minimerades av moderatoren på webbplatsen
Hur skulle jag ändra detta för att uppdatera hyperlänkar som länkar till referenser i en arbetsbok snarare än externa webbadresser?
Denna kommentar minimerades av moderatoren på webbplatsen
Behövde bara detsamma, prova dessa ändringar: Sub ReplaceHyperlinks() 'Updateby20140220 Dim Wb As Workbook Dim Ws As Worksheet Dim xHyperlink As Hyperlink Dim xOld As String, xNew As String xTitleId = "CambiaLink" 'Set Ws = Application.ActiveSheet Set Wb = Application.ActiveWorkbook xOld = Application.InputBox("Gammal text:", xTitleId, "", Typ:=2) xNew = Application.InputBox("Ny text:", xTitleId, "", Typ:=2) För varje Ws I Wb.Worksheets 'Application.ScreenUpdating = Falskt för varje xHyperlink In Ws.Hyperlinks Debug.Print ("voy " & xHyperlink.SubAddress) xHyperlink.SubAddress = Ersätt(xHyperlink.SubAddress, xOld, xNew) Next Next Application.ScreenUpdating = TrueUpdating Avsluta Sub
Denna kommentar minimerades av moderatoren på webbplatsen
mauricio- du är fantastisk! Tack! Dessutom, för en annan rapport behöver jag den för att bara uppdatera länkarna på endast angivna flikar, är det möjligt?
Denna kommentar minimerades av moderatoren på webbplatsen
Tack tack tack!!!!!!! du räddade mig för 2 dagars arbete här
Denna kommentar minimerades av moderatoren på webbplatsen
Finns det något sätt att ändra flera hyperlänkar "text att visa" samtidigt?
Denna kommentar minimerades av moderatoren på webbplatsen
Tack för ett strålande program. Fungerar SOM EN CHARM..."WLC"
Denna kommentar minimerades av moderatoren på webbplatsen
Lysande! Tack så mycket!!!!
Denna kommentar minimerades av moderatoren på webbplatsen
Hej killar vad saknar jag, jag får "Kompileringsfel - Variabel ej definierad" för XTitleId i Excel 2013 :cry:
Denna kommentar minimerades av moderatoren på webbplatsen
Inga bekymmer, jag kom på det och satte som ett snöre
Denna kommentar minimerades av moderatoren på webbplatsen
det hjälpte mycket tack så mycket
Denna kommentar minimerades av moderatoren på webbplatsen
Det här är den mest användbara Excel-artikeln jag någonsin har stött på. Jag har haft många problem där hyperlänkar i en fil blivit skadade, eller jag vill flytta platsen för några hyperlänkade filer, och uppdatering har alltid varit ett stort problem. Min Excel-programmerare hade ingen enkel fix. Detta fungerar felfritt. Jag är väldigt tacksam - tack!
Denna kommentar minimerades av moderatoren på webbplatsen
Wow! Det här sparade mig SÅ MYCKET TID. Du är grym. Tack för att du delar med dig!
Denna kommentar minimerades av moderatoren på webbplatsen
Det här är lysande. Du sparade mig SÅ MYCKET TID. i dag. Tack för att du delar med dig!
Denna kommentar minimerades av moderatoren på webbplatsen
Tack så mycket för att du utvecklar detta! Jag hade en användare som skapade ett gäng hyperlänkar på flera flikar (minst flera hundra) och på något sätt hade de en sökväg till hans AppData\Roaming-mapp på hans c-enhet istället för till nätverksmappen. Jag kunde använda ditt VBA-skript för att ta bort den delen av länkkoden och nu fungerar allt. Sparade oss förmodligen en veckas uppdatering och det tog mig mindre än 2 minuter att implementera!
Denna kommentar minimerades av moderatoren på webbplatsen
Fantastisk. Fungerade som en charm på excel 2013, ingen justering krävs, till skillnad från liknande fixar jag har sett för det här problemet. TACK sååå mycket. Sparade en massiv huvudvärk och timmar av tid.
Denna kommentar minimerades av moderatoren på webbplatsen
Jag försökte köra det på hyperlänkar som innehåller andra mappar men det fungerade inte. Hur skulle jag ändra detta för att uppdatera hyperlänkar som länkar till mappar på en hårddisk snarare än externa webbadresser?
Det finns inga kommentarer här ännu
Ladda fler
Lämna dina kommentarer
Postar som gäst
×
Betygsätt detta inlägg:
0   Tecken
Föreslagna platser

Följ oss

Copyright © 2009 - www.extendoffice.com. | Alla rättigheter förbehållna. Drivs av ExtendOffice. | | Sitemap
Microsoft och Office-logotypen är varumärken eller registrerade varumärken som tillhör Microsoft Corporation i USA och / eller andra länder.
Skyddad av Sectigo SSL