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

Hoe verander ik meerdere hyperlinkpaden tegelijk in Excel?

Om een ​​of andere reden kunt u meerdere hyperlinks voor uw gegevens in het werkblad maken en alle hyperlinks zijn gekoppeld aan hetzelfde bestandspad of adres, maar nu moet u dit hyperlinkpad per keer vervangen door een ander adres. Als u het pad van de hyperlinks afzonderlijk wilt wijzigen, kan dit veel tijd kosten. Is er een snelle manier om dit probleem op te lossen?

Wijzig meerdere hyperlinkpaden tegelijk in een werkblad met VBA-code

Verander meerdere hyperlinkpaden tegelijk in een werkblad / werkmap / meerdere bladen / selectie met een geweldige functie


Wijzig meerdere hyperlinkpaden tegelijk in een werkblad met VBA-code

Stel dat u een lijst met gegevens heeft met dezelfde hyperlinks als in de volgende schermafbeelding, en met een VBA-code kunt u snel het oude bestandspad of adres in een werkblad vervangen door een nieuwe.

1. Houd de toets ingedrukt ALT + F11 toetsen, en het opent de Microsoft Visual Basic for Applications-venster.

2. Klik Invoegen > Moduleen plak de volgende macro in het Module venster.

VBA-code: wijzig meerdere hyperlinkpaden tegelijk

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. Druk vervolgens op F5 key om deze code uit te voeren, en een promptvenster om je oude hyperlinkadres in te voeren in het Oude tekst doos. Zie screenshot:

4. Klikken OK, en er verschijnt een ander promptvenster om u eraan te herinneren het nieuwe hyperlinkadres in te voeren dat u wilt gebruiken.

5. En klik vervolgens op OKzijn alle dezelfde oude hyperlinkadressen in één keer vervangen door de nieuwe. Zie screenshots:


Verander meerdere hyperlinkpaden tegelijk in een werkblad / werkmap / meerdere bladen / selectie met een geweldige functie

Als u de hyperlinkpaden van een selectie, meerdere bladen, huidig ​​werkboek of meerdere werkmappen wilt vervangen, hoe zou u dat dan kunnen doen? Met Zoeken en vervangen kenmerk van Kutools for Excel, kunt u deze taak snel uitvoeren.

Opmerking:Om dit toe te passen Zoeken en vervangen hulpprogramma, moet u eerst het Kutools for Excelen pas de functie vervolgens snel en gemakkelijk toe.

Na het installeren van Kutools for Excel, doe dit als volgt:

1. Klikken Kutools > Navigatie, zie screenshot:

2. In het geopende Navigatie venster, klik op Zoek en vervang tab, in de Zoeken en vervangen venster, klik op vervangen tabblad en voer de volgende bewerkingen uit:

  • Typ de oude hyperlinktekst die u wilt vinden in het Zoeken naar tekstvak en typ vervolgens de nieuwe hyperlinktekst die u wilt vervangen in het Vervangen door tekstvak;
  • Geef het bereik op waar u het hyperlinkpad van het Binnen keuzelijst;
  • Selecteer vervolgens Hyperlinks in de vervolgkeuzelijst Zoeken in;
  • Eindelijk, klik Vind alle knop, zijn alle corresponderende cellen die de specifieke hyperlinktekst bevatten in de onderste keuzelijst weergegeven.

3. Dan klikken Alles vervangen knop, zijn de oude hyperlinkpaden in één keer gewijzigd in de nieuwe, zie screenshot:

Klik om Kutools voor Excel gratis te downloaden!


Meer relatieve artikelen:

  • Haal werkelijke adressen uit hyperlinks
  • Stel dat u een reeks cellen heeft die hyperlinks bevatten, en nu moet u 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?
  • Converteer afbeeldings-URL's naar werkelijke afbeeldingen in Excel
  • Als je een lijst met afbeeldings-URL-adressen in kolom A hebt, en nu, wil je de bijbehorende afbeeldingen van de URL's downloaden en ze in de aangrenzende kolom B weergeven zoals het linker screenshot wordt getoond. Hoe kunt u in Excel de daadwerkelijke afbeeldingen snel en gemakkelijk uit de afbeeldings-URL's extraheren?
  • Converteer URL-tekst naar klikbare hyperlink in Excel
  • Stel dat u meerdere URL's in uw werkblad heeft, maar ze zijn niet gekoppeld, en nu moet u alle niet-gekoppelde URL's converteren naar klikbare hyperlinks, zoals in de volgende schermafbeeldingen wordt getoond. U kunt er natuurlijk een voor een op dubbelklikken om ze klikbaar te maken, maar dit zal tijdrovend zijn als er veel URL's zijn. Hoe kunt u meerdere niet-gekoppelde URL's automatisch in Excel naar klikbare hyperlinks converteren?
  • Open een specifieke pagina van een PDF-document vanuit de Excel-hyperlink
  • Wanneer u een cel aan een PDF-bestand koppelt, gaat u normaal gesproken naar de eerste pagina van het PDF-bestand wanneer u klikt om de hyperlink te openen. Als u rechtstreeks naar een specifieke pagina van het pdf-bestand moet springen door op de hyperlink te klikken, kan dit artikel u wellicht een plezier doen.

De beste tools voor kantoorproductiviteit

Kutools voor Excel lost de meeste van uw problemen op en verhoogt uw productiviteit met 80%

  • visfuik: Snel invoegen complexe formules, grafieken en alles wat je eerder hebt gebruikt; Versleutel cellen met wachtwoord; Maak een mailinglijst en stuur e-mails ...
  • Super Formula-balk (bewerk eenvoudig meerdere regels tekst en formule); Lay-out lezen (gemakkelijk grote aantallen cellen lezen en bewerken); Plakken in gefilterd bereik...
  • Voeg cellen / rijen / kolommen samen zonder gegevens te verliezen; Gespleten cellen inhoud; Combineer dubbele rijen / kolommen... Voorkom dubbele cellen; Vergelijk Ranges...
  • Selecteer Dupliceren of Uniek Rijen; Selecteer lege rijen (alle cellen zijn leeg); Super zoeken en fuzzy zoeken in veel werkboeken; Willekeurige selectie ...
  • Exacte kopie Meerdere cellen zonder de formuleverwijzing te wijzigen; Maak automatisch verwijzingen naar meerdere bladen; Plaats kogels, Selectievakjes en meer ...
  • Extraheer tekst, Tekst toevoegen, Verwijderen op positie, Ruimte verwijderen; Paging-subtotalen maken en afdrukken; Converteren tussen celinhoud en opmerkingen...
  • Super filter (bewaar en pas filterschema's toe op andere bladen); Geavanceerd sorteren per maand / week / dag, frequentie en meer; Speciaal filter door vet, cursief ...
  • Combineer werkmappen en werkbladen; Tabellen samenvoegen op basis van sleutelkolommen; Gegevens splitsen in meerdere bladen; Batch Converteer xls, xlsx en PDF...
  • Meer dan 300 krachtige functies. Ondersteunt Office / Excel 2007-2021 en 365. Ondersteunt alle talen. Eenvoudig te implementeren in uw onderneming of organisatie. Volledige functies Gratis proefperiode van 30 dagen. 60 dagen geld-terug-garantie.
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!
officetab onderkant
Heb je vragen? Stel ze hier. (45)
Nog geen beoordelingen. Beoordeel als eerste!
Deze opmerking is gemaakt door de moderator op de site
Verbazingwekkend dat het me veel moeite heeft bespaard.
Deze opmerking is gemaakt door de moderator op de site
vind het geweldig, je bespaart me een hoop werk.
Deze opmerking is gemaakt door de moderator op de site
Hallo, kun je me de VB-code geven als ik links in Powerpoint moet wijzigen in plaats van uitblinken? Bedankt
Deze opmerking is gemaakt door de moderator op de site
Hallo, dit lijkt goed te werken, maar sommige tekens (bijvoorbeeld "\" en "%"). In mijn geval heb ik hyperlinkadressen zoals [../../../../../../Application%20Data/Microsoft/2012/Relacom%20Uki-Kantvik-Tallinna-Pietari-Uki_saate151012.xls] en Ik moet het begin [../../../../../../Application%20Data/Microsoft/] weghalen van het adres van honderden links. Het begin van de links is hetzelfde, maar de uiteinden zijn anders. Heb je een goed advies?
Deze opmerking is gemaakt door de moderator op de site
Met dank!!!! :lol: dat heeft enorm geholpen.
Deze opmerking is gemaakt door de moderator op de site
Hoe zou ik dit veranderen om hyperlinks bij te werken die verwijzen naar verwijzingen in een werkmap in plaats van externe webadressen?
Deze opmerking is gemaakt door de moderator op de site
Had hetzelfde nodig, probeer deze wijzigingen: 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("Oude tekst:", xTitleId, "", Type:=2) xNew = Application.InputBox("Nieuwe tekst:", xTitleId, "", Type:=2) For Each Ws In Wb.Worksheets 'Application.ScreenUpdating = False For Each xHyperlink In Ws.Hyperlinks Debug.Print ("voy" & xHyperlink.SubAddress) xHyperlink.SubAddress = Replace(xHyperlink.SubAddress, xOld, xNew) Volgende Volgende Application.ScreenUpdating Einde sub
Deze opmerking is gemaakt door de moderator op de site
mauricio- Je bent geweldig! Bedankt! Voor een ander rapport heb ik het ook nodig om de links op alleen gespecificeerde tabbladen bij te werken, is dat mogelijk?
Deze opmerking is gemaakt door de moderator op de site
Bedankt bedankt bedankt!!!!!!! je hebt me hier 2 dagen werk bespaard
Deze opmerking is gemaakt door de moderator op de site
Is er een manier om meerdere hyperlink "te tonen tekst" tegelijkertijd te wijzigen?
Deze opmerking is gemaakt door de moderator op de site
Bedankt voor een briljant stukje programma. Werkt ALS EEN CHARME..."WLC"
Deze opmerking is gemaakt door de moderator op de site
Briljant! Hartelijk bedankt!!!!
Deze opmerking is gemaakt door de moderator op de site
Hey jongens, wat mis ik, ik krijg 'Compileerfout - Variabele niet gedefinieerd' voor de XTitleId in Excel 2013:cry:
Deze opmerking is gemaakt door de moderator op de site
Geen zorgen, ik heb het bedacht en ingesteld als een string
Deze opmerking is gemaakt door de moderator op de site
het heeft veel geholpen, heel erg bedankt
Deze opmerking is gemaakt door de moderator op de site
Dit is het nuttigste Excel-artikel dat ik ooit ben tegengekomen. Ik heb veel problemen gehad waarbij hyperlinks in een bestand beschadigd raakten, of ik wil de locatie van sommige hyperlinkbestanden verplaatsen, en updaten is altijd een groot probleem geweest. Mijn Excel-programmeur had geen simpele oplossing. Dit werkt feilloos. Ik ben erg dankbaar - bedankt!
Deze opmerking is gemaakt door de moderator op de site
Wauw! Dit heeft me ZOVEEL TIJD bespaard. Je bent geweldig. Bedankt voor het delen!
Deze opmerking is gemaakt door de moderator op de site
Dit is briljant. Je hebt me ZOVEEL TIJD bespaard. vandaag. Bedankt voor het delen!
Deze opmerking is gemaakt door de moderator op de site
Heel erg bedankt voor het ontwikkelen hiervan! Ik had een gebruiker die een aantal hyperlinks op meerdere tabbladen maakte (minstens enkele honderden) en op de een of andere manier hadden ze een bestandspad naar zijn AppData\Roaming-map op zijn c-schijf in plaats van naar de netwerkmap. Ik kon je VBA-script gebruiken om dat deel van de linkcode te verwijderen en nu werkt het allemaal. Bespaarde ons waarschijnlijk een week aan updaten en het kostte me minder dan 2 minuten om te implementeren!
Deze opmerking is gemaakt door de moderator op de site
Verbazingwekkend. Werkte als een charme op Excel 2013, geen aanpassingen nodig, in tegenstelling tot vergelijkbare oplossingen die ik voor dit probleem heb gezien. DANK JE WEL. Scheelde een enorme hoofdpijn en uren tijd.
Deze opmerking is gemaakt door de moderator op de site
Ik heb geprobeerd het uit te voeren op hyperlinks die verwijzingen naar andere mappen bevatten, maar het werkte niet. Hoe kan ik dit veranderen om hyperlinks bij te werken die naar mappen op een harde schijf verwijzen in plaats van naar externe webadressen?
Er zijn nog geen reacties geplaatst
Laad meer
Laat uw commentaar
Posten als gast
×
Beoordeel dit bericht:
0   Personages
Voorgestelde locaties

Volg ons

Copyright © 2009 - www.extendoffice.com. | Alle rechten voorbehouden. Aangedreven door ExtendOffice. | Sitemap
Microsoft en het Office-logo zijn handelsmerken of gedeponeerde handelsmerken van Microsoft Corporation in de Verenigde Staten en / of andere landen.
Beschermd door Sectigo SSL