Herbers Excel-Forum - das Archiv

Hyperlinks per Makro erstellen?

Bild

Betrifft: Hyperlinks per Makro erstellen?
von: Selma

Geschrieben am: 18.03.2005 10:31:42
Hallo Leute,
ich möchte für den markierten Zellenbereich die Hyperlinks erstellen.
Der Zelleninhalt gilt als Link.
Wie mache ich es per Makro?

Danke im Voraus...
Liebe Grüße
SELMA
Bild

Betrifft: AW: Hyperlinks per Makro erstellen?
von: marcl
Geschrieben am: 18.03.2005 11:07:01
Hallo Selma,
Sub Hyperlink()
ActiveSheet.Hyperlinks.Add Anchor:=Selection, Address:= _
Range("A1")
End Sub


Gruß
marcl
Bild

Betrifft: AW: Hyperlinks per Makro erstellen?
von: Frank Domke
Geschrieben am: 18.03.2005 11:12:15
Sub Makro1()
Dim ws As Worksheet
Set ws = ActiveSheet
With ws
.Hyperlinks.Add Anchor:=.Range("a5"), _
Address:=.Range("a5").Text, _
ScreenTip:=.Range("a5").Text, _
TextToDisplay:=.Range("a5").Text
End With
Set ws = Nothing
End Sub

Gruß
Frank.
Bild

Betrifft: AW: Hyperlinks per Makro erstellen?
von: marcl
Geschrieben am: 18.03.2005 11:35:29
Hallo Frank,
das Ding ist ja viel besser, als mein kleines Teil.
Supi, werd ich mir gleich mal aschreiben
Danke

Gruß
marcl
Bild

Betrifft: AW: Hyperlinks per Makro erstellen?
von: Selma
Geschrieben am: 18.03.2005 13:29:58
Hallo Frank,
wie kann ich Dein Code NUR für den markierten Zellenbereich anwenden?
Danke nochmals....
Liebe Grüße
SELMA
Bild

Betrifft: AW: Hyperlinks per Makro erstellen?
von: Ralf (Schwabenland)
Geschrieben am: 18.03.2005 15:26:41
Hallo Selma,
hier mal ein Beispiel:
https://www.herber.de/bbs/user/19841.xls
Bereich markieren und los...
Hoffe es hilft.
Gruß
Ralf
Bild

Betrifft: AW: Hyperlinks per Makro erstellen?
von: Frank Domke

Geschrieben am: 18.03.2005 18:15:30
Hallo Marcl,
versuch es so:
Sub Makro1()
Dim ws As Worksheet
Dim Zelle As Range
Dim rg As Range
Set ws = ActiveSheet
Set rg = Selection
For Each Zelle In rg.Cells
ws.Hyperlinks.Add Anchor:=Zelle, _
Address:=Zelle.Text, _
ScreenTip:=Zelle.Text, _
TextToDisplay:=Zelle.Text
Next Zelle
Set ws = Nothing
End Sub

Viel Erfolg
Frank.
Bild

Betrifft: AW: Hyperlinks per Makro erstellen?
von: Selma
Geschrieben am: 21.03.2005 22:03:46
Danke Ralf, danke Frank ......
Liebe Grüße
SELMA
 Bild
Excel-Beispiele zum Thema "Hyperlinks per Makro erstellen?"
URLs eines ausgewählten Bereiches in HyperLinks umwandeln HTML-Datei aus gefilterten Daten mit Hyperlinks aufbauen
Hyperlinks zu allen Excel-Dateien eines Verzeichnisses erstellen Hyperlinks zu SVERWEIS-Bezugstabellen anlegen
Aus Zelleintragungen Hyperlinks und HTML-Tabelle erstellen UserForm-TextBox-Inhalte mit Grafik-Hyperlinks einfügen
Zwei Hyperlinks in einer Zelle Hyperlinks zu einer Tabellenblattliste erstellen
Hyperlinks sollen mit Quell- und Zieladresse gelistet werden Hyperlinks in Text, Adresse und Sub-Adresse trennen