schreiben von Daten in Excel nach jeder Schleife

Bei der Verwendung der XLSWRITE - Funktion, können Sie vermeiden, zu berechnen, Excel-Zellbereiche jeder Zeit, unter Angabe sheet-Nummer und range, wobei der Bereich nur die erste Zelle zu starten.

Es ist besonders nützlich, wenn die matrix ändert die Größe jeder iteration; wir nehmen Sie einfach die Letzte Zelle verwendet, und verschieben Sie Sie, indem Sie die Anzahl der Zeilen der matrix.

Beispiel:

offset = 1;
for i=1:5
    %# generate different size matrices each loop
    A = ones(randi(4),randi(4)).*i;

    %# insert matrix in Excel inside the 1st sheet, starting at cell specifed
    xlswrite('filename.xls', A, 1, sprintf('A%d',offset));

    %# increment offset
    offset = offset + size(A,1);
end

dieser erstellt eine Excel-Datei mit dem folgenden Inhalt:

1    1        
1    1        
1    1        
2    2    2    2
3    3
3    3
4            
4            
4            
4            
5    5    5    
5    5    5    
5    5    5    
5    5    5    

Beachten Sie, dass eine Verbindung zu Excel dann geschlossen XLSWRITE genannt wird. Dies hat einen erheblichen Mehraufwand bedeutet.

Ein besserer Ansatz wäre, um Excel zu öffnen einmal, und die Wiederverwendung der gleichen Sitzung zu schreiben, alle Ihre Daten, schließen Sie es dann, sobald wir fertig sind. Jedoch, Sie müssen rufen Sie die Office-Interop-Funktionen selbst.

Seit dem trick den ich oben erwähnt habe, funktionieren nicht jetzt, ich werde mich mit der "Berechnen Excel-Bereich" Funktion zum berechnen der Zelle reicht (es gibt noch viele weitere Implementierungen von FEX).

Hier ist der code (Wiederverwendung von code aus einem Vorherige Antwort):

%# output file name
fName = fullfile(pwd, 'file.xls');

%# create Excel COM Server
Excel = actxserver('Excel.Application');
Excel.Visible = true;

%# delete existing file
if exist(fName, 'file'), delete(fName); end

%# create new XLS file
wb = Excel.Workbooks.Add();
wb.Sheets.Item(1).Activate();

%# iterations
offset = 0;
for i=1:50
    %# generate different size matrices each loop
    A = ones(randi(4),randi(4)).*i;

    %# calculate cell range to fit matrix (placed below previous one)
    cellRange = xlcalcrange('A1', offset,0, size(A,1),size(A,2));
    offset = offset + size(A,1);

    %# insert matrix in sheet
    Excel.Range(cellRange).Select();
    Excel.Selection.Value = num2cell(A);
end

%# save XLS file
wb.SaveAs(fName,1);
wb.Close(false);

%# close Excel
Excel.Quit();
Excel.delete();

In der Tat, ich lief sowohl die version mit 50 Iterationen und timings im Vergleich mit TIC/TOC:

Elapsed time is 68.965848 seconds.      %# calling XLSWRITE
Elapsed time is 2.221729 seconds.       %# calling Excel COM directly

InformationsquelleAutor Amro