Tipp: Andere Sprachen sind Google-Übersetzungen. Sie können die English Version dieses Links.
Einloggen
x
or
x
x
Registrieren
x

or

Wie ändert man mehrere Hyperlink-Pfade gleichzeitig in Excel?

Zu einem bestimmten Zweck können Sie mehrere Hyperlinks für Ihre Werte im Arbeitsblatt erstellen, und alle Hyperlinks sind mit demselben Dateipfad oder derselben Adresse verknüpft. Jetzt müssen Sie diesen Hyperlink-Pfad jedoch durch eine andere Adresse ersetzen. Um den Pfad der Hyperlinks individuell zu ändern, kann viel Zeit verschwendet werden. Gibt es einen schnellen Weg, dieses Problem zu lösen?

Ändern Sie mehrere Hyperlink-Pfade gleichzeitig mit VBA-Code

Extrahieren Sie echte Adressen aus Hyperlinks mit Kutools for Excel

Entfernen Sie alle Hyperlinks aus Auswahl / Arbeitsblatt / Arbeitsmappe mit Kutools für Excel


Extrahieren / Anzeigen von realen Adressen aus Hyperlinks:

Mit  Kutools for Excel Konvertiere Hyperlinks, können Sie schnell echte URL-Adressen aus verknüpften Zellen auf einmal extrahieren.

doc extrahiert Adresse von Hyperlinks


Pfeil blaue rechte Blase Ändern Sie mehrere Hyperlink-Pfade gleichzeitig mit VBA-Code


Angenommen, Sie haben eine Liste von Daten mit denselben Hyperlinks wie im folgenden Screenshot und mit einem VBA-Code, können Sie den alten Dateipfad oder die Adresse schnell durch einen neuen ersetzen.

doc-change-hyperlinks1

1. Halten Sie die ALT + F11 Schlüssel, und es öffnet die Microsoft Visual Basic für Applikationen-Fenster.

2. Drücken Sie Einsatz > Modul, und fügen Sie das folgende Makro in die Modulfenster.

VBA-Code: Ändern Sie mehrere Hyperlink-Pfade gleichzeitig

Sub ReplaceHyperlinks()
'Updateby20140220
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. Dann drücken F5 Schlüssel, um diesen Code auszuführen, und ein Eingabeaufforderungsfeld, mit dem Sie Ihre alte Hyperlink - Adresse in das Feld eingeben können Alter Text Box. Siehe Screenshot:

doc-change-hyperlinks2

4. Klicken Sie OK, und eine weitere Eingabeaufforderung wird angezeigt, um Sie an die Eingabe der neuen Hyperlinkadresse zu erinnern, die Sie verwenden möchten.

doc-change-hyperlinks3

5. Und dann klick OK, die gleichen alten Hyperlink-Adressen wurden sofort durch die neuen ersetzt. Siehe Screenshots:

doc-change-hyperlinks4 -2 doc-change-hyperlinks5

Pfeil blaue rechte Blase Extrahieren Sie echte Adressen aus Hyperlinks mit Kutools for Excel

Wenn Sie die tatsächlichen Adressen aus den Hyperlinks in Excel extrahieren möchten, wie können Sie das tun? Mit Konvertiere Hyperlinks of Kutools for ExcelSie können diese Aufgabe schnell erledigen.

Kutools for Excel : mit mehr als 300 praktischen Excel-Add-Ins, die Sie in 60-Tagen kostenlos ausprobieren können.

Wenn Sie Kutools for Excel, machen Sie bitte wie folgt :( Kutools für Excel jetzt herunterladen )

1. Klicken Sie Kutoolen > Link > Konvertiere Hyperlinks, siehe Screenshot:

doc-change-hyperlinks5

2. In dem Konvertiere Hyperlinks Dialogfeld auswählen Hyperlink-Adressen ersetzen Zellinhalte Option unter dem Konvertiert den Typ Abschnitt, und klicken Sie dann auf den ersten doc ändern Hyperlinks8 Klicken Sie auf die Schaltfläche, um den Bereich der Hyperlinks auszuwählen, die Sie die echten Adressen extrahieren möchten doc ändern Hyperlinks8Wählen Sie eine Zelle aus, in die Sie das Ergebnis setzen möchten, siehe Screenshot:

doc-change-hyperlinks5

3. Dann klick OK Schaltfläche, und alle realen Adressen wurden aus den ausgewählten Hyperlinks extrahiert, siehe Screenshot:

doc-change-hyperlinks5

Klicken Sie hier, um mehr über diese Funktion zum Konvertieren von Hyperlinks zu erfahren.

Kutools für Excel jetzt herunterladen


Pfeil blaue rechte Blase Entfernen Sie alle Hyperlinks aus Auswahl / Arbeitsblatt / Arbeitsmappe mit Kutools für Excel

Viele Hyperlinks mussten aus Ihrem Arbeitsblatt oder Ihrer Arbeitsmappe entfernt werden. Kutools for Excel Löschen Sie Hyperlinks Funktion kann Ihnen helfen, die Hyperlinks in einem ausgewählten Bereich in einem oder mehreren Arbeitsblättern in einer Arbeitsmappe zu entfernen.

Nach der Installation Kutools for Excelmach es bitte so :( Kutools für Excel jetzt herunterladen )

Drücken Sie Kutoolen > Links > Löschen Sie HyperlinksWählen Sie dann den Bereich aus, in dem Sie die Hyperlinks entfernen möchten, siehe Screenshot:

doc-change-hyperlinks5

Klicken Sie hier, um mehr über die Funktion zum Löschen von Hyperlinks zu erfahren.

Kutools für Excel jetzt herunterladen


In Verbindung stehende Artikel:


Kutools for Excel löst die meisten Ihrer Probleme und steigert Ihre Produktivität um 80%

  • Wiederverwendung: Schnell einlegen komplexe Formeln, Diagramme und alles, was du vorher benutzt hast; Zellen verschlüsseln mit Passwort; Mailingliste erstellen und E-Mails senden ...
  • Super Formula Bar (Bearbeiten Sie mühelos mehrere Textzeilen und Formeln); Layout lesen (Leichtes Lesen und Bearbeiten einer großen Anzahl von Zellen); In gefilterten Bereich einfügen...
  • Zellen / Zeilen / Spalten zusammenführen ohne Daten zu verlieren; Inhalt der Zellen teilen; Kombinieren Sie doppelte Zeilen / Spalten... Doppelte Zellen verhindern; Bereiche vergleichen...
  • Wählen Sie "Duplizieren" oder "Eindeutig" Reihen; Wählen Sie Leere Zeilen (alle Zellen sind leer); Super Find und Fuzzy Find in vielen Arbeitsmappen; Zufallsauswahl ...
  • Exakte Kopie Mehrere Zellen ohne Änderung der Formelreferenz; Referenzen automatisch erstellen auf mehrere Blätter; Bullets einfügen, Kontrollkästchen und mehr ...
  • Extract Text, Text hinzufügen, Nach Position entfernen, Leerzeichen entfernen; Erstellen und Drucken von Paging-Zwischensummen; Zwischen Zelleninhalt und Kommentaren konvertieren...
  • Superfilter (Speichere und wende Filterschemata auf andere Blätter an); Erweiterte Sortierung nach Monat / Woche / Tag, Häufigkeit und mehr; Spezialfilter fett, kursiv ...
  • Arbeitsmappen und Arbeitsblätter kombinieren; Zusammenführen von Tabellen basierend auf Schlüsselspalten; Daten in mehrere Blätter aufteilen; Stapelkonvertierung von xls, xlsx und PDF...
  • Mehr als 300 leistungsstarke Funktionen. Unterstützt Office / Excel 2007-2019 und 365. Unterstützt alle Sprachen. Einfache Bereitstellung in Ihrem Unternehmen oder Ihrer Organisation. Kostenlose 30-Testversion für alle Funktionen.
Registerkarte Tab 201905

Registerkarte "Office" Bringt die Benutzeroberfläche mit Registerkarten in Office und vereinfacht Ihre Arbeit erheblich

  • Aktivieren Sie das Bearbeiten und Lesen von Registerkarten in Word, Excel und PowerPoint, Publisher, Access, Visio und Project.
  • Öffnen und erstellen Sie mehrere Dokumente in neuen Registerkarten desselben Fensters und nicht in neuen Fenstern.
  • Steigert Ihre Produktivität um 50% und reduziert täglich Hunderte von Mausklicks für Sie!
officetab unten
Say something here...
symbols left.
You are guest ( Sign Up? )
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.
    wannabeIT · 4 months ago
    Had a spreadsheet with over 200 items that had hyperlinks that needed to be edited. This just saved me SO MUCH TIME. THANK YOU!!
  • To post as a guest, your comment is unpublished.
    Lona · 1 years ago
    I need to only get part of my text in the hyperlinks removed.
  • To post as a guest, your comment is unpublished.
    Taylor · 1 years ago
    For some reason, these macros have quit working recently. I have used them multiple times to fix issues on many spreadsheets but now it doesn't do anything. No errors just no corrections
    • To post as a guest, your comment is unpublished.
      Jafedi · 4 months ago
      I´m the same problem. What´s the reason?
  • To post as a guest, your comment is unpublished.
    Fabio · 1 years ago
    Wow, thanks. Its amazing that Excel doesn't have a solution for cases like this.
  • To post as a guest, your comment is unpublished.
    Vern · 2 years ago
    Sorry, nevermind about my question, I stumbled on my answer. I exited out of the macro editor, placed my cursor in cell A1 of the worksheet I wanted to edit and ran the macro and Boom all the links were changed! Thanks so much!
  • To post as a guest, your comment is unpublished.
    Vern Poplaski · 2 years ago
    I loaded the hyperlink change macro and ran it. It worked but only on the active cell. How do you get it to go through the entire worksheet?
  • To post as a guest, your comment is unpublished.
    Hannes · 2 years ago
    I have a spreadsheet with thousands of links to scanned images on a Google Drive folder. When Excel crashes, it decides to change all my hyperlinks and have it point at a APP ROAMING directory. It took me less than 15 minutes to fix all links. You are the best !!!!
  • To post as a guest, your comment is unpublished.
    pranav · 2 years ago
    great help. the code helped me mass update hyperlinks in a minute.

    thanks a ton
    Pranav
  • To post as a guest, your comment is unpublished.
    Tom · 2 years ago
    Amazing - thanks v much, this just saved me a load of manual editing after a spreadsheet of mine crashed and recovered but with corrupted hyperlinks
  • To post as a guest, your comment is unpublished.
    Diishaa · 2 years ago
    How would I change this in order to update hyperlinks that link to folders within a hard drive rather than external web addresses?
  • To post as a guest, your comment is unpublished.
    Diishaa · 2 years ago
    I tried to run it on hyperlinks that contains other folders reference but it didn't work.
    How would I change this in order to update hyperlinks that link to folders within a hard drive rather than external web addresses?
  • To post as a guest, your comment is unpublished.
    Benjamin · 2 years ago
    Amazing. Worked like a charm on excel 2013, no tweaking required, unlike similar fixes I've seen for this problem. THANK YOU sooooo much. Saved a massive headache and hours of time.
  • To post as a guest, your comment is unpublished.
    Jeanie H · 2 years ago
    Thank you so much for developing this! I had a user who created a bunch of hyperlinks on multiple tabs (at least several hundred) and somehow they had a file path to his AppData\Roaming folder on his c drive instead of to the network folder. I was able to use your VBA script to remove that portion of the link code and now it all works. Saved us probably a week's worth of updating and it took me less than 2 minutes to implement!
  • To post as a guest, your comment is unpublished.
    Terri Floren · 3 years ago
    This is brilliant. You saved me SO.MUCH.TIME. today. Thanks for sharing!
  • To post as a guest, your comment is unpublished.
    Terri Floren · 3 years ago
    Wow! This saved me SO.MUCH.TIME. You're awesome. Thanks for sharing!
  • To post as a guest, your comment is unpublished.
    Rob Smith · 3 years ago
    This is the most helpful Excel article I have ever come across. I have had many problems where hyperlinks within a file become corrupted, or I want to move location of some hyperlinked files, and updating has always been a major problem. My Excel programmer didn't have a simple fix. This works faultlessly. I am very grateful - thank you!
  • To post as a guest, your comment is unpublished.
    abdralin · 4 years ago
    it did a lot of help
    thank you very much
  • To post as a guest, your comment is unpublished.
    carl · 4 years ago
    No worries I figured it out and set as a string
  • To post as a guest, your comment is unpublished.
    carl · 4 years ago
    Hey guys what am i missing, I get 'Compile error - Variable not defined' for the XTitleId in Excel 2013 :cry:
  • To post as a guest, your comment is unpublished.
    Peter · 4 years ago
    Brilliant! Thanks a lot!!!!
  • To post as a guest, your comment is unpublished.
    Mansoor · 4 years ago
    Thanks for a brilliant Piece of Program. Works LIKE a CHARM..."WLC"
  • To post as a guest, your comment is unpublished.
    Tony V · 4 years ago
    Is there a way to change multiple hyperlink "text to display" at the same time?
  • To post as a guest, your comment is unpublished.
    Lasse A · 4 years ago
    Thank thanks thanks !!!!!!!
    you saved me for 2 days of work here
  • To post as a guest, your comment is unpublished.
    Dylan · 4 years ago
    mauricio-

    You are awesome! Thanks! Also, for another report I'll need it to just update the links on only specified tabs, is that possible?
  • To post as a guest, your comment is unpublished.
    Dylan · 5 years ago
    How would I change this in order to update hyperlinks that link to references within a workbook rather than external web addresses?
    • To post as a guest, your comment is unpublished.
      mauricio · 5 years ago
      Just needed the same, try these changes:

      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("Old text:", xTitleId, "", Type:=2)
      xNew = Application.InputBox("New text:", 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)
      Next
      Next
      Application.ScreenUpdating = True
      End Sub
  • To post as a guest, your comment is unpublished.
    gav · 5 years ago
    thanks!!!! :lol: that helped a great deal.
  • To post as a guest, your comment is unpublished.
    Kid Jägerskiöld · 5 years ago
    Hi, this seems to work great but some characters (for example "\" and "%"). In my case I have hyperlink adresses like [../../../../../../Application%20Data/Microsoft/2012/Relacom%20Uki-Kantvik-Tallinna-Pietari-Uki_saate151012.xls] and I need to get the start [../../../../../../Application%20Data/Microsoft/] away from the adress from hundreds of links. The beginning of the links are the same, but the ends are different. Do you have any good advice?
  • To post as a guest, your comment is unpublished.
    Eric Ong · 5 years ago
    Hi, could you give me the VB code if i need to change links in Powerpoint instead of excel?

    Thanks
  • To post as a guest, your comment is unpublished.
    alex ximenez · 5 years ago
    love it, you save me a ton of work.
  • To post as a guest, your comment is unpublished.
    Tarun Varshne · 5 years ago
    Ammazing it saved my lots of effort.