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
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 ABCD1test https://www.herber.de/2Link https://www.herber.de/forum/index.htm3test #NoLinkFormeln der TabelleD1 : =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