Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Hyperlink

Forumthread: 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
Anzeige

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
Anzeige
Anzeige