Anzeige
Archiv - Navigation
536to540
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
536to540
536to540
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Hyperlink

Hyperlink
28.12.2004 13:59:58
Michael
Hallo Zusammen,
ich habe in einer Zelle eine Hyperlink mit Adresse und Text erstellt.
=HYPERLINK("http://www.smcue.de";"SMCÜ")
Mit welchen Befehlen kann ich dieses Hyperlink wieder auftrennen in den Text und die Adresse? Damit ich eine weitere Zelle habe mit dem Text und eine mit der Adresse.
Gruß, Michael

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Hyperlink
Martin
Hallo Michael,
Zelle mit Hyperlink markieren und dann folgendes Makro:

Sub Aufspalten()
txtLang = ActiveCell.FormulaR1C1
z = Application.WorksheetFunction.Find(",", txtLang)
Adresse = Mid(txtLang, 13, z - 14)
Text = Mid(txtLang, z + 2, Len(txtLang) - 3 - z)
MsgBox Adresse
MsgBox Text
End Sub

Das Anpassen dürfte mit Level "VBA gut" ja kein Problem sein. ;-)
Gruß
Martin Beck
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige