Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
764to768
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
764to768
764to768
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Hyperlinks in Text
21.05.2006 13:29:08
cdino
Hallo,
ich habe in einer Spalte eine Menge Hyperlinks. Diese möchte ich herauslesen, am besten in eine andere Spalte in TEXTFORM, also nur TEXT http://www....
Danke für die Hilfe
cdino

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Hyperlinks in Text
21.05.2006 13:56:28
Josef
Hallo ? (realnames sind hier üblich!)
Diesen Code in ein allgemeines Modul!
' **********************************************************************
' Modul: Modul1 Typ: Allgemeines Modul
' **********************************************************************
Option Explicit
Function LinkToText(ByRef Zelle As Range) As String
Application.Volatile
On Error GoTo ErrExit
LinkToText = Zelle.Hyperlinks(1).Address
Exit Function
ErrExit:
LinkToText = "#NoLink"
End Function

In der Tabelle wendest du das so an!
Tabelle1
 ABCD
1test  https://www.herber.de/
2Link  https://www.herber.de/forum/index.htm
3test  #NoLink
Formeln der Tabelle
D1 : =linktotext(A1)
D2 : =linktotext(A2)
D3 : =linktotext(A3)
 
Diagramm - Grafik - Excel Tabellen einfach im Web darstellen    Excel Jeanie HTML  3.0    Download  
'******************************
'* Gruß Sepp
'*
'* Rückmeldung wäre nett!
'******************************

Anzeige
AW: Hyperlinks in Text
21.05.2006 18:04:44
cdino
Danke schön, hat wunderbar funktioniert.

306 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige