Link auf Datei
02.03.2015 12:27:46
Propman
ich würde gerne über einen Button (liegt in einem Userform) eine Datei ODER einen Ordner öffnen, die bei mir auf dem Server liegt. Folgenden Code habe ich dafür:
Private Sub AnOPEN_Click()
Dim sFolder As String
sFolder = "afp://Dynamo-2._afpovertcp._tcp.local/Controlling"
ActiveWorkbook.FollowHyperlink Address:=sFolder, NewWindow:=True
End Sub
Am liebsten würde ich auch nicht die Adresse direkt eingeben müssen, sondern diese aus der Zelle G1 auslesen lassen.
Derzeit bekomme ich folgenden Fehler:
Laufzeitenfehler -2147221014 (8000401ea) Die angegebene Datei konnte nicht geöffnet werden
Ich danke vorab für Hilfestellung,
LG Propman