text import
03.08.2004 11:19:34
Markus
ich versuche eine text datei über das intranet nach excel einzulesen.
mit nachfolgendem code kann ich die text datei in eine neue datei einlesen. wie ist es möglich die datei in der aktuelle arbeitsmappe einzulesen.
Sub test2()
Dim ifn As String
ifn = <a href=""http://server:port/verz1/verz2/14452808113215.txt"">"http://server:port/verz1/verz2/14452808113215.txt"</a>
Workbooks.Open Filename:=ifn
End Sub
Markus
Anzeige