Clever-Excel-Forum

Normale Version: Link Userform Textbox aus Zelle
Du siehst gerade eine vereinfachte Darstellung unserer Inhalte. Normale Ansicht mit richtiger Formatierung.
Hallo,

ich habe eine Userform, wo sich unter anderem eine Textbox befindet. Diese Textbox soll mit einem Link aus der Tabelle1 (Zelle: A1) gefüllt werden, so dass ich ihn nach starten des Userforms anklicken kann und sich der
Explorer mit diesem Pfad öffnet. Geht das, muss übrigends nicht zwingend eine Textbox sein, hauptsache es funktioniert. 
Wer hat eine Idee ?

Liebe Grüße
Kathrin
Hallöchen,

hole beim Start des Userform den Link aus A1 in die Textbox.
Die Textbox hat dann verschiedene Ereignisse wie z.B. MousDown. Da fügst Du einen Code zum folgen des Hyperlinks ein

z.B.

Code:
Option Explicit

Private Sub UserForm_Initialize()
TextBox1.Text = Range("A1").Value
End Sub

Private Sub TextBox1_MouseDown(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single)
ActiveWorkbook.FollowHyperlink Address:="https://" & TextBox1.Text, NewWindow:=True
End Sub