Supportnet / Forum / Skripte(PHP,ASP,Perl...)
Origin:= _xlWindows. Daten importieren aus gleichem ordner
Frage
Hallo!
Ich habe ein Excel makro der auf 6 dateien zugreift und die jeweiligen daten importiert zu einem excel sheet.
Wenn ich den makro starte, greift er immer auf dem gleichen ort auf diese 6 dateien.
ich vermute dass es dieser befehl ist:
Origin:= _xlWindows.
Hier ist der gesamte quellcode.
Kann ich das nicht so eingeben das er auf die 6 dateien zugreift die im gleichen ordner sind wie das Excel sheet.Workbooks.OpenText Filename:="$___15cS.abs", Origin:= _
xlWindows, StartRow:=1, DataType:=xlDelimited, TextQualifier:= _
xlDoubleQuote, ConsecutiveDelimiter:=True, Tab:=True, Semicolon:=False, _
Comma:=False, Space:=True, Other:=False, FieldInfo:=Array(Array(1, 1), _
Array(2, 1), Array(3, 1), Array(4, 1), Array(5, 1), Array(6, 1), Array(7, 1), Array(8, 1), _
Array(9, 1), Array(10, 1), Array(11, 1), Array(12, 1), Array(13, 1), Array(14, 1), Array(15 _
, 1), Array(16, 1), Array(17, 1), Array(18, 1), Array(19, 1), Array(20, 1), Array(21, 1), _
Array(22, 1), Array(23, 1), Array(24, 1))
Rows("1:220").Select
Selection.Copy
Windows("Loadcase ranking_15xle_5dg.xls").Activate
Range("A1").Select
ActiveSheet.Paste
Windows("$___15cS.abs").Activate
ActiveWorkbook.Close SaveChanges:=False
Sheets("$___L16S").Select
Range("A1").Select
Ich wäre sehr froh wenn SIe mir weiter helfen könnten.
gruss nyzar

