Microsoft Excel

Herbers Excel/VBA-Archiv

Informationen und Beispiele zum Thema MsgBox
BildScreenshot zu MsgBox MsgBox-Seite mit Beispielarbeitsmappe aufrufen

Seltsames beim Datenimport per VBA

Betrifft: Seltsames beim Datenimport per VBA von: Mesel
Geschrieben am: 11.08.2014 15:05:41

Hallo zusammen,

ich habe ein Sheet gebastelt, welches je nach Auswahl einzelne csv Dateien einliest oder auch alle in einem definierten Ordner.

Grundsätzlich funktioniert alles aber wenn ich das Sheet öffne und alle Dateien einlesen möchte (selektieren der Zellen All SPOS / All SNEG in Tabellenblatt FLD) bekomme ich die Fehlermeldung: Laufzeitfehler 1004 .....

Gehe ich erst über Single SPOS und dann All SPOS funktioniert es...
Gehe ich erst über Single SNEG und dann All SNEG funktioniert es...

Gehe ich erst über Single SNEG und dann All SPOS funktioniert es nicht...
Gehe ich erst über Single SPOS und dann All SNEG funktioniert es nicht...

Dachte mir, dass die Pfade nicht stimmen, aber Überprüfung über MsgBox zeigt die richtigen Pfade an!

Woran liegt das?

Mit Klick auf "FILE SELECTION" werden alle Datenverknüfungen gelöscht!

Vielen Dank vorab und freundlichen Gruß
Mesel

https://www.herber.de/bbs/user/92021.zip

  

Betrifft: AW: Seltsames beim Datenimport per VBA von: Tino
Geschrieben am: 11.08.2014 15:29:10

Hallo,
versuch mal und übergebe anstatt nur den Dateinamen den kompletten Pfad.

With ActiveSheet.QueryTables.Add(Connection:= _
"TEXT;" & sPath & sFile, Destination:=Range( _
Gruß Tino


  

Betrifft: AW: Seltsames beim Datenimport per VBA von: Mesel
Geschrieben am: 11.08.2014 15:49:11

Hallo Tino,

danke funktioniert jetzt aber warum?

Gruß
Mesel


  

Betrifft: AW: Seltsames beim Datenimport per VBA von: Tino
Geschrieben am: 11.08.2014 16:21:10

Hallo,
denke weil das System nicht auf den Ordner verweist bzw.
auf einen anderen und somit die Datei nicht finden kann.

Gruß Tino