Mit Macro Hyperlinks erzeugen

Bild

Betrifft: Mit Macro Hyperlinks erzeugen von: Fabienne
Geschrieben am: 18.02.2005 18:44:54

Hi,

wie kann ich mit einem Macro eine Zelle itself bearbeiten:

Beispiel:
In A1 steht der Name einer Datei. Diesen möchte ich via Macro als =HYPERLINK() anzeigen lassen, entweder in einer anderen Zelle, oder besser in der gleichen Zelle: Also einfach den Namen umwandeln in eine Link.

Vielen Dank für Eure Hilfe!

Bild


Betrifft: AW: Mit Macro Hyperlinks erzeugen von: Tim
Geschrieben am: 18.02.2005 18:53:53


Sub hlink()
Dim strAdd As String
strAdd = [a1]
[a1].Hyperlinks.Add Anchor:=[a1], Address:=strAdd, TextToDisplay:=strAdd
End Sub


Tim


Bild


Betrifft: AW: Mit Macro Hyperlinks erzeugen von: ransi
Geschrieben am: 18.02.2005 18:55:59

hallo fabienne

versuch mal so:
Public

Sub t()
With Worksheets(1)
    .Hyperlinks.Add Anchor:=.Range("a1"), _
        Address:=Range("a1").Text, _
        ScreenTip:="Ich bin ein Hyperlink"
End With
End Sub


ist aus der VBA-Hilfe :
"Add-Methode, wie sie auf das Hyperlinks-Objekt angewendet wird."

ransi


 Bild

Beiträge aus den Excel-Beispielen zum Thema "Mit Macro Hyperlinks erzeugen"