This article was originally written for http://www.codeproject.com. I am replicating the same article here. You can also read the same article here.
Introduction
This tutorial gives a complete overview as to how to write to Excel file in Matlab. Lot of times, we come across situations, where we need to save the data or read the data generated from the experimental simulation to an Excel file.
Steps
Step 1: The first step is to create a COM server which runs the Excel Application:
|
1
|
Excel = actxserver('Excel.Application');
|
This assumes that the Excel Application is installed in your system. If Excel is not installed, this statement will give an error. You can put the above statement between a try-catch block:
|
1
2
3
4
5
|
try
Excel = actxserver('Excel.Application');
catch
Excel = [];
end
|
Step 2 : In this step, we will check the version of Excel.
|
1
|
ExcelVersion = str2num(Excel.Version);
|
If the Microsoft Excel Version installed in your system is 2007, 2010 or above, you would get ExcelVersion would be 12 or above. In such a case, you can handle all the Excel workbook files with extensions *.xls, *.xlsx and *.xlsm. If the version is less than 12, only *.xls file would be supported.
Step 3 : In this step, we will open an Excel file “ResultFile.xls” in the current directory.
|
1
2
|
ResultFile = [pwd '\ResultFile.xls'];
Workbook = invoke(Excel.Workbooks,'Open', ResultFile);
|
Step 4 : By default, the visibility of the Excel file is set to FALSE. You can make the Excel file visible using the command:
|
1
|
set(Excel, 'Visible', 1);
|
Step 5 : In this step, let us say, we will add some data in the sheet titled “ExperimentSheet” and take the average of the data.
Let us assume, we are taking the experimental results from 10 different Experiments and we need to populate the results in Column A and Column B as shown in the figure. Finally, we need to take the Average of the Experimental Results using the Excel formula:
|
1
|
=AVERAGE(B2:B11)
|
The first step is to open the Excel Workbook and activate the ‘ExperimentSheet’ Sheet. The following code tries to open the ‘ExperimentSheet’ in ResultFile.xls. If the sheet is not found, it adds the Excel sheet and renames it to ‘ExperimentSheet’.
|
1
2
3
4
5
6
7
8
9
10
11
|
resultsheet = 'ExperimentSheet'
try
sheet = get(Excel.Worksheets,'Item', resultsheet);
invoke(sheet, 'Activate');
catch
% If the Excel Sheet ‘ExperimentSheet’ is not found, Add an
% Excel Sheet, and rename the new sheet
% to ‘ExperimentSheet’
ExcelWorkbook = Excel.workbooks.Add;
set(ExcelWorkbook, 'Name', resultsheet);
end
|
Add the Header
In order to write to an Excel File, we are using xlswrite() function. It has a number of advantages over the xlswrite function in Matlab. The xlswrite1 function can be downloaded from here. As seen from the Excel sheet, we need to first add two headers, “Experiment and Result” in A1 and B1, respectively.
|
1
2
3
4
5
6
7
|
%% Add the Header
Location = 'A1:B1';
[status, message] = xlswrite1(ResultFile,{'Experiment','Result'}, resultsheet, Location);
if status == 0,
errordlg(message.message);
end
|
In order to make the header bold, we need to select the header:
|
1
2
3
4
5
|
% Make the header bold
HeaderRange = get(Excel.Activesheet, 'Range', Location);
HeaderRange.Select;
Excel.Selection.Font.Bold = true;
|
In this step, we need to add the iteration number in the first column:
|
1
2
3
4
5
6
7
|
iter = (1:10)';
Location = 'A2:A11';
[status, message] = xlswrite1(ResultFile num2cell(iter), resultsheet,
Location);
if status == 0,
errordlg(message.message);
end
|
Similarly, we need to add the Experimental Results to Column B. Let us say, the experimental result is saved in the array ‘ExpResults’. For example, we can add the experimental results in the second column as,
|
1
2
3
4
5
6
|
ExpResults = [12.34 12.56 12.74 11.66 13.34 12.56 13.56 12.45 12.01 12.98];
Location = 'B2:B11';
[status, message] = xlswrite1(ResultFile num2cell(ExpResults’), resultsheet, Location);
if status == 0,
errordlg(message.message);
end
|
Computing the Average
We need to add the row AVERAGE on 14th Row.
|
1
2
3
4
5
6
|
Location = 'A14:A14';
[status, message] = xlswrite1(ResultFile,{'AVERAGE'}, resultsheet,
Location);
if status == 0,
errordlg(message.message);
end
|
Entering the Average Formula
|
1
2
3
4
5
6
|
Location = 'B14:B14';
Avg_formula = {['=AVERAGE(' xlcolumn(2) '2:' xlcolumn(2) int2str(11) ')']};
[status, message] = xlswrite1(ResultFile, Avg_formula, resultsheet, Location);
if status == 0,
errordlg(message.message);
end
|
where xlcolumn() function converts between column name and number for Excel representation. The xlcolumn() module can be downloaded from here.
|
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
|
function loc = xlcolumn(column)
if isnumeric(column)
if column>256
error('Excel is limited to 256 columns! Enter an integer number <256');
end
letters = {'A','B','C','D','E','F','G','H','I','J','K','L','M','N','O','P','Q','R','S','T','U','V','W','X','Y','Z'};
count = 0;
if column-26<=0
loc = char(letters(column));
else
while column-26>0
count = count + 1;
column = column - 26;
end
loc = [char(letters(count)) char(letters(column))];
end
else
letters = ['A','B','C','D','E','F','G','H','I','J','K','L','M','N','O','P','Q','R','S','T','U','V','W','X','Y','Z'];
if size(column,2)==1
loc =findstr(column,letters);
elseif size(column,2)==2
loc1 =findstr(column(1),letters);
loc2 =findstr(column(2),letters);
loc = (26 + 26*loc1)-(26-loc2);
end
end
|
The last step is to save the Excel file and close the Excel application:
|
1
2
3
4
5
|
%Save and Close the Excel File
invoke(Workbook,'Save');
invoke(Excel,'Quit');
delete(Excel);
|
Download: The complete Matlab source can be downloaded from here.
