Hallo profis.. :-)
habe ein Makro, womit ich die Hyperlink Adresse auslesen kann.
Private Sub Worksheet_BeforeRightClick(ByVal Target As Range, Cancel As Boolean)
Dim lrZelle As Range
For Each lrZelle In Selection
If lrZelle.Hyperlinks.Count > 0 Then
If lrZelle.Hyperlinks(1).Address <> "" Then
text = lrZelle.Value
zelle = lrZelle.Hyperlinks(1).Address
Else
text = lrZelle.Value
zelle = lrZelle.Hyperlinks(1).SubAddress
End If
End If
Next
End sub
Das einzige Problem ist. Ich möchte nur die Zeile ausgegeben bekommen.
Aber ich bekomme dann "'Tabelle10'!C10:C15". hierbei würde mir reichen, wenn ich wüsste, dass die Adresse sich auf die spalte C bezieht..
Danke für eure hilfe.