Mit Array ( Excel) verdammt langsam

Hallo,

habe da ein Problem mit meinen Skript.

Func openexcel()


FileCopy("C:\KDMU\Woche\Master.XLT, ScriptDir & "\Liste\mw.csv", 9) ; Kopieren  der Datei ( Master.XLT ) und umbenennen




$sFilePath1 = @ScriptDir & "\Liste\mv.csv" ; Datei öffnen
$xlsdir =_ExcelBookOpen ($sFilePath1, $fVisible = 1) ; unsichtbar öffnen
If @error = 1 Then
    MsgBox(0, "Fehler!", "Das Excel-Objekt konnte nicht erstellt werden")
    Exit
ElseIf @error = 2 Then
    MsgBox(0, "Fehler!", "Die Datei existiert nicht!")
    Exit
EndIf
$aArray = _ExcelReadSheetToArray($xlsdir, 5, 1, 0, 2) ; Lese die ersten beiden reihen ab der 5 Zeile  5102
;_ArrayDisplay($aArray, "Lese fünf Zeilen") ; nur zur kontrolle




$bArray = _ExcelReadSheetToArray($xlsdir, 5, 3, 0, 0) ; Lese den rest ab der 5 Zeile und der 3 Reihe 5300
;_ArrayDisplay($bArray, "den Rest einlesen") ; nur zur kontrolle
_ExcelBookClose($xlsdir) ; Programm verlassen


$sFilePath2 = @ScriptDir & "\Liste\sv.xls" ; Datei öffnen
$oExcel = _ExcelBookOpen($sFilePath2) ; sichtbar
If @error = 1 Then
    MsgBox(0, "Fehler!", "Das Excel-Objekt konnte nicht erstellt werden")
    Exit
ElseIf @error = 2 Then
    MsgBox(0, "Fehler!", "Die Datei existiert nicht!")
    Exit
EndIf
_ExcelWriteSheetFromArray($oExcel, $aArray, 8, 1, 1, 1) ; Schreibt die ersten beiden Reihen in die neue excel Tabelle  8111
_ExcelWriteSheetFromArray($oExcel, $bArray, 8, 4, 1, 1) ; Schreibt den Rest ab der 4 Reihe


EndFunc   ;==>openexcel

Es rennt so weit, bis auf das Datum da sind nur Rauten drin oder komische Zahlen. Denke aber mal das dies wohl eher ein Problem von Excel ist als von Autoit.
Ähm nicht das gleich auf mich losgeschlagen wird, ist einer meiner ersten Skripte ( und alles nur zusammengesucht und zum laufen gebracht)
Fange erst an mit Autoit.

Beispiel einer Datei aus der gelesen wird :
Das ist die Tabelle die ich bekomme. Diese kann ich nicht ändern da sie automatisch erstellt wird.

Beispiel einer Datei in die geschrieben wird :
Hier werden die Daten dann wieder eingefügt.

Mein Problem ist es das es sehr langsam geht. Das Einlesen der Array´s geht noch nur das Schreiben in die neue Tabelle ist verdammt langsam.
Die Tabellen sind bis zu 50MB groß. Gibt es da noch andere Möglichkeiten das umzusetzen ?
Habe hier Klick mich mal was von Listen gelesen aber hmm, naja nur gelesen und null verstanden.

MFG
oh-ha

Hallo und frohe Weihnachten,

naja kann bis zu einer Stunde gehen das ganze. Sind auch Dateien bis zu 50MB die da hin und hergebaggert werden. Das komische ist das die Datei die von der Anlage kommt in *.xlt Format rauskommt.
Wenn man die allerdings in Excel aufmachen will geht das nur über den Textkonvertierungs-Assistenten. Also war das für mich eine verkappte csv Datei. Deshalb habe ich die dann ja auch im Skript einfach
umbenannt in *.csv. Dann wird die von Excel auch richtig erkannt. Könnte es sein das ich die einfach so belassen sollte im xlt Format ?

Was ich gerne mal probieren möchte ist das über Listen zu machen Klick mich nur muß ich ehrlich sagen das ich keinen blassen schimmer davon habe wie man das umsetzen kann. Verstehe das da noch nicht mal im Ansatz.

mfg
oh-ha

Hallo,

Zitat von progandy

Ich verstehe nicht, warum du das von der einen in die andre Datei kopierst. Machst du das nur, um an den Anfang der Tabelle noch die Kopfzeilen einzufügen

jepp zum teil schon. Habe mir einen Kopf für die Tabelle zusammengestellt mit Grafik und auch einigen anderen
Angaben. Dann habe ich diese fertige Excel-tabelle auch noch mit Formeln versehen die eine Auswertung der Daten machen. Füge, im Gegensatz zur ersten Tabelle, noch Zeilen ein in der das Ergebnis einer Berechnung steht.
Habe mir eine Gui gemacht in der dann auch noch weitere Angaben im Kopf hinzugefügt werden können.
Wenn es denn mal irgendwann Funktionieren sollte.
Kämpfe mich da irgendwie durch Autoit. Bin halt ein Anhänger von " learning by doing "
Danke dir für den Code den kann ich auch gut gebrauchen zwecks ändern der Kopfzeile.

mfg
oh-ha

Ups, sorry das hatte ich nicht gesehen. Da ist mir das Brett vorm Kopf wohl vor die Augen gerutscht.
Na da habe ich ja erst einmal ne menge zu verarbeiten.
Werde das hier mal auf gelöst stellen.

Danke dir und noch einen schönen Feiertag
oh-ha