Live-Forum - Die aktuellen Beiträge
Datum
Titel
19.04.2024 08:41:23
Zwei Makros in ein Arbeitsblatt - zweite wird nicht ausführt
18.04.2024 21:09:11
4 Spalten aus smarter Tabelle in andere smarte Tab. kopieren
18.04.2024 20:45:35
Worksheet_Activate für alle Sheets
18.04.2024 19:30:20
VBA - Tabelle mit Mannschaftsergebnissen sortieren
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1572to1576
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1572to1576
1572to1576
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Hyperlink anzeigen

Hyperlink anzeigen
15.08.2017 09:11:53
ExcelDirk
Wertes Forum,
der anzuzeigende Text eines Hyperlinks lautet
Kurzer_Hyperlink
Die Adresse lautet
Laaaaaaanger_AugeschriebenerHyperlink
In einer 'Nebenzelle' möchte ich die Adresse, also Laaaaaaanger_AugeschriebenerHyperlink
anzeigen lassen.
Wie könnte das gehen?
Danke schon mal und schöne Grüsse
Dirk

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Hyperlink anzeigen
15.08.2017 09:38:02
ChrisL
Hi Dirk
Folgender Code in ein Standardmodul kopieren:
Function ShowLink(rng As Range) As String
ShowLink = rng.Hyperlinks(1).Address
End Function
Als Formel verwendet
=ShowLink(A1)
cu
Chris
AW: Hyperlink anzeigen
15.08.2017 09:38:55
Sepp
Hallo Dirk,
eine Möglichkeit.
' **********************************************************************
' Modul: Modul1  Typ: Allgemeines Modul
' **********************************************************************

Option Explicit

Public Function LinkAddress(Target As Range) As String
On Error GoTo ErrExit
LinkAddress = Target.Hyperlinks(1).Address
Exit Function
ErrExit:
LinkAddress = "no hyperlink!"
End Function

In der Tabelle dann wie eine "normale" Funktion verwenden.
Gruß Sepp

Anzeige
AW: Hyperlink anzeigen
15.08.2017 09:50:03
ExcelDirk
merci
hätte angenommen daß das ohne VBA geht
dennoch: es funzt!
merci vielmals

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige