VBA Hyperlink erstellen

[pjo12345]

Moin!

Ich brauche mal wieder eure Hilfe. Ich möchte per VBA eine Link erzeugen. Leider scheitern alle Versuche bis jetzt.

Also als Beispiel: 

• in Tabelle 1 Zelle A1 steht 12345
  
• in Tabelle 2 Zelle B5 soll jetzt ein Link per VBA erstellt werden, welcher einen Pfad zu der Datei "Name aus Tabelle 1 A1" & ".txt" in C:\Test\ enthält. Also B5 müsste dann als Link zeigen: c:\Test\12345.txt
  

Danke schon mal.

[Kl@us-M.]

Moin zurück,

muss es VBA sein? Sonst reicht die Fkt. =HYPERLINK()

Arbeitsblatt mit dem Namen 'Tabelle2'
	B
5	C:\Test\12345.txt

Zelle	Formel
B5	=HYPERLINK("C:\Test\"&Tabelle1!A1&".txt")

Diese Tabelle wurde mit Tab2Html (v2.4.1) erstellt. ©Gerd alias Bamberg

Wenn unbedingt VBA, dann als Ansatz:

Code:

Sub Pjo()
Range("B5").FormulaR1C1 = _
        "=HYPERLINK(""C:\Test\""&Tabelle1!R[-4]C[-1]&"".txt"")"
End Sub