Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

hyperlinks in hoher Anzahl aktivieren

Forumthread: hyperlinks in hoher Anzahl aktivieren

hyperlinks in hoher Anzahl aktivieren
29.11.2023 10:04:00
JanaK
Beispieldatei: https://www.herber.de/bbs/user/164647.xlsx

Servus, in automatisch erstellter Liste möchte ich die hyperlinks in hoher Anzahl aktivieren, damit sie für einen anderen Nutzer sehr schnell abrufbar sind. Im Moment löse ich es, indem ich in jeder Zelle mit hyperlink ans Ende klicke und Enter, dann ist er aktiviert. ist aber leider nicht praktikabel bei einer Liste mit 100 Links ;) Über einen Tip freue ich mich!

Anzeige

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: hyperlinks in hoher Anzahl aktivieren
29.11.2023 10:25:22
UweD
Hallo

- Den Code in ein normales Modul kopieren.
- den Bereich markieren
- und makro starten


   Sub Hyper()

Dim Z

For Each Z In Selection
ActiveSheet.Hyperlinks.Add Anchor:=Z, Address:= _
Z.Value, TextToDisplay:=Z.Value
Next
End Sub



LG UweD
Anzeige
AW: hyperlinks in hoher Anzahl aktivieren
29.11.2023 10:26:42
Alwin Weisangler
Hallo JanaK,

mit VBA wäre der Weg so:



Sub LinksErzeugen()
With Tabelle1
For i = 2 To .Cells(Rows.Count, 1).End(xlUp).Row
Cells(i, 2).Hyperlinks.Add Cells(i, 2), Cells(i, 2)
Next i
End With
End Sub


Gruß Uwe
Anzeige

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige