Sub Hyperlinks_erzeugen()
Dim z As Long
For z = 1 To 100
With ActiveSheet
On Error Resume Next
.Hyperlinks.Add .Cells(z, 1), .Cells(z, 1).Value
End With
Next
End Sub
Sub Hyperlinks_erzeugen()
Dim z As Long
For z = 1 To 100'Hier die Anzahl Zeilen angeben
With ActiveSheet
On Error Resume Next
.Hyperlinks.Add .Cells(z, 8), .Cells(z, 8).Value
End With
Next
End Sub
Um die Pfadangaben in deiner Excel-Tabelle in Hyperlinks umzuwandeln, kannst du die folgende Schritt-für-Schritt-Anleitung verwenden:
VBA-Editor öffnen:
Extras > Makros > VBA-Editor.Neues Modul einfügen:
Einfügen und wähle Modul.Code kopieren und anpassen:
Sub Hyperlinks_erzeugen()
Dim z As Long
For z = 2 To 100 'Hier die Anzahl der Zeilen anpassen
With ActiveSheet
On Error Resume Next
.Hyperlinks.Add .Cells(z, 8), .Cells(z, 8).Value 'Spalte H ist die 8. Spalte
End With
Next
End SubMakro ausführen:
Extras > Makros, wähle das Makro Hyperlinks_erzeugen aus und klicke auf Ausführen.Überprüfen:
Fehler: "Hyperlink.Add" funktioniert nicht:
Fehler: Es passiert nichts beim Ausführen des Makros:
Falls du den VBA-Ansatz nicht verwenden möchtest, kannst du auch die Funktion "Hyperlink" in Excel nutzen:
Einfügen > Hyperlink und füge den Pfad manuell ein.OK.Diese Methode ist jedoch zeitaufwendig, wenn du viele Links erstellen möchtest.
Beispiel 1: Um einen lokalen Dateipfad in einen Hyperlink umzuwandeln, könnte der Pfad so aussehen:
C:\Users\DeinName\Documents\Beispiel.pdfNach Anwendung des Codes wird dieser Pfad als klickbarer Hyperlink angezeigt.
Beispiel 2: Wenn du einen URL-Link hast, wie https://www.example.com, wird dieser durch den VBA-Code automatisch in einen Hyperlink umgewandelt.
Benutzerdefinierte Hyperlink-Texte: Wenn du die Anzeige des Hyperlinks individuell gestalten möchtest, kannst du den Code anpassen, um einen anderen Text anzuzeigen:
.Hyperlinks.Add .Cells(z, 8), .Cells(z, 8).Value, TextToDisplay:="Link zu Datei"Hyperlinks auf Zellen in anderem Tabellenblatt: Um einen Hyperlink zu einer Zelle in einem anderen Tabellenblatt zu erstellen, kannst du den folgenden Code verwenden:
.Hyperlinks.Add .Cells(z, 8), "'Tabelle2'!A1"1. Wie kann ich einen Excel-Pfad in einen Link umwandeln?
Du kannst dies tun, indem du den oben beschriebenen VBA-Code nutzt, um die Pfadangaben in Hyperlinks umzuwandeln.
2. Funktioniert dieser Code in allen Excel-Versionen?
Der VBA-Code sollte in den meisten modernen Excel-Versionen funktionieren, wobei Excel 2010 oder neuer empfohlen wird.
3. Kann ich auch Text in Links umwandeln?
Ja, der Code kann leicht angepasst werden, um Text in Links umzuwandeln, indem du den gewünschten Text in die .Cells(z, <Spalte>).Value-Zeile einfügst.
Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden
Suche nach den besten AntwortenEntdecke unsere meistgeklickten Beiträge in der Google Suche
Top 100 Threads jetzt ansehen