grasihuepfer
Goto Top

Import Textdatei von Dateiname aus Zelle

Hi Leute,

Ich möchte eine Textdatei importieren. Und zwar soll der Pfad des Datei Ortes in einer bestimmten Zelle stehen. Diese Zelle wiederum soll in das Makro integriert werden, so das die entsprechende Textdatei importiert wird

Content-Key: 317267

Url: https://administrator.de/contentid/317267

Printed on: April 18, 2024 at 10:04 o'clock

Mitglied: 131026
131026 Oct 08, 2016 updated at 07:43:42 (UTC)
Goto Top
Link direkt unter deinem Beitrag
HTML File import in Excel Zelle
Import von Dateiname in Zelle A1 nach A2
Sub Import()
    fso = CreateObject("Scripting.FileSystemObject")  
    ActiveSheet.Range("A2").Value = fso.OpenTextfile(ActiveSheet.Range("A1").Value,1).ReadAll()  
End Sub
R.
Member: grasihuepfer
grasihuepfer Oct 27, 2016 at 03:23:47 (UTC)
Goto Top
Funktioniert leider nicht.

In Zelle 1 steht: F:\Test.txt

Makro steht drin

Es kommt nach dem Start diese Meldung:

Laufzeitfehler '438'
Objekt unterstützt diese Eigenschaft oder Methode nicht.