Sub Hyperlink_create()
'Wenn Spalte ungleich "Z" oder "kein Text" in Zelle-> raus
If ActiveCell.Column <> 26 Or ActiveCell.Text = "" Then Exit Sub
'Als SubAddress dann Name der aktiven Tabelle + !A + Zeile der aktiven Zelle (z.B. "Tabelle1!A24")
'Als TextToDisplay dann den Textinhalt der aktiven Zelle
ActiveSheet.Hyperlinks.Add Anchor:=Selection, Address:="", SubAddress:= _
ActiveSheet.Name & "!A" & ActiveCell.Row, TextToDisplay:=ActiveCell.Text
End Sub
Hyperlink per Makro starten
afetinci 27.02.2009 - 559 Hits - 2 Antworten
Hyperlink per Makro erstellen ??
Petra65 06.06.2009 - 309 Hits - 12 Antworten
Makro automatisches Hyperlink zu Email
Dareertzu 09.09.2009 - 114 Hits - 1 Antwort
Fehler im Makro .... Hyperlink soll generiert werden
Petra65 20.10.2009 - 119 Hits - 4 Antworten
Makro für Hyperlink
penutt 24.02.2010 - 207 Hits - 5 Antworten