online 1
gast (50)

/ Forum / Tabellenkalkulation

TabellenkalkulationTabellenkalkulation

Fragevon finelani vom 14.10.2021, 13:08 Options

hyperlink auslesen

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.


Antwort schreiben

Antwort 1 von Hajo_Zi vom 14.10.2021, 13:13 Options

Hallo,

benutze doch Mid und Instr (suche nach !)
Damit bekommst Du doch den Adressbereich.

Gruß Hajo

Antwort 2 von coros vom 14.10.2021, 13:21 Options

Halo,

die Befehlszeile

zeile = lrZelle.Row
schreibt Dir die Zeilennummer in der Variablen "zeile"

MfG,
Oliver
Da hier der einzige Lohn für die Helfer eine Rückmeldung ist, wäre es nett, wenn Du
ein Feedback abgeben könntest, ob der Lösungsvorschlag Dein Problem gelöst hat.

Ähnliche Themen

Hyperlink über Bezug in einem anderen Datenblatt auslesen
SchalUndRauch  11.06.2008 - 105 Hits - 3 Antworten

Hyperlink nicht drucken
JeremyMcNeill  22.06.2008 - 45 Hits - 4 Antworten

Hyperlink - Formelproblem
Meikel  30.08.2008 - 34 Hits - 2 Antworten

Verweise/Hyperlink
NIMS  26.11.2008 - 53 Hits - 1 Antwort

Funktion HYPERLINK
Petra65  29.08.2009 - 190 Hits - 2 Antworten

Hinweis

Diese Frage ist schon etwas älter, Sie können daher nicht mehr auf sie antworten. Sollte Ihre Frage noch nicht gelöst sein, stellen Sie einfach eine neue Frage im Forum..

Neue Einträge

Version: supportware 1.9.150 / 10.06.2022, Startzeit:Mon Jan 26 01:23:17 2026