xlswrite wps matlab,Matlab实例学习-----Matlab与Excel交互，Matlab作为自动化客户端调用Excel服务器...

(1)xlsread  从Excel中读取数据

语法：

[num,txt,raw] = xlsread(filename)

[num,txt,raw] = xlsread(filename,-1)

[num,txt,raw] = xlsread(filename,sheet)

[num,txt,raw] = xlsread(filename,range)

[num,txt,raw] = xlsread(filename,sheet,range)

[num,txt,raw] = xlsread(filename,sheet,range,‘basic‘)

[num,txt,raw,custom] = xlsread(filename,sheet,range,‘‘,functionHandle)

其中：

filename是文件路径，sheetn表示读取第几个sheet

range表示范围：A1:B2

-1表示可以打开图形界面用鼠标选择要读取的区域

实例：

data=xlsread('C:\Users\zhou\Desktop\新建 Microsoft Excel 工作表.xls','sheet1','A1:J10')

data =

1 2 3 4 5 6 7 8 9 0

2 3 4 5 6 7 8 9 0 NaN

3 4 5 6 7 8 9 0 NaN NaN

4 5 6 7 8 9 NaN NaN NaN NaN

5 6 7 8 9 0 NaN NaN NaN NaN

6 7 8 9 0 NaN NaN NaN NaN NaN

7 8 9 0 NaN NaN NaN NaN NaN NaN

8 9 0 NaN NaN NaN NaN NaN NaN NaN

9 0 NaN NaN NaN NaN NaN NaN NaN NaN

0 NaN NaN NaN NaN NaN NaN NaN NaN NaN其中：Excel表中的内容为：

(2)xlswrite 向Excel中写入数据

语法：

xlswrite(filename,A)

xlswrite(filename,A,sheet)

xlswrite(filename,A,range)

xlswrite(filename,A,sheet,range)

status = xlswrite(filename,A,sheet,range)

[status,msg] = xlswrite(filename,A,sheet,range)

实例：

values = {1, 2, 3 ; 4, 5, 'x' ; 7, 8, 9};

headers = {'First', 'Second', 'Third'};

xlswrite('myExample.xls', [headers; values],'sheet3');注意：如果电脑中没有安装Office的而是安装的WPS的话，需要新建myExample.xls文件，否则可能会出错。。。

结果：

   

(3)xlsfinfo 判断文件是否包含Excel表格

语法：

status = xlsfinfo(filename)

[status,sheets]= xlsfinfo(filename)

[status,sheets,xlFormat]= xlsfinfo(filename)

实例：

[typ, desc, fmt] = xlsfinfo('myaccount.xlsx')

This code returns:

typ =

Microsoft Excel Spreadsheet

desc =

'Sheet1' 'Income' 'Expenses'

fmt =

xlOpenXMLWorkbook

(4)Matlab作为自动化客户端调用Excel服务器

实例：

% MATLAB作为自动化客户端调用Excel服务器

% Open OLE server OLE(对象链接与嵌入)

he = actxserver('Excel.Application');

% 上述语句创建excel服务器，句柄值为he，通过he可以访问excel服务器的属性和方法。

% 在使用中为了方便存储，可以设置默认路径，使用excel服务器的DefaultFilePath属性：

he.DefaultFilePath = 'E:\';

% 调试中为了方便观看excel文件内容，可以设置excel服务器的Visible属性，实际调试时可以改为1，调试过后改为0即可

he.Visible = 1;

% Create Workbooks 通过excel服务器的属性Workbooks创建工作簿句柄，通过该句柄的方法Add创建工作簿

hw = he.Workbooks.Add;

% get Worksheets and actived one sheet 然后，继续通过hw的Worksheets属性建立Sheets类句柄

hs = hw.Worksheets;

%访问某一sheet的方法即用sheets的Item方法

hs1 = Item(hs, 1);

% Write a number to Excel 向Excel中写入数字

hr = hs1.Range('A1');

hr.Value = 1;

% Write numbers 向Excel中写入数组

hr2 = hs1.Range('A1:A10');

hr2.Value = randint(10, 1);

% Plot 绘图

hshape = hs1.Shapes;

hchart = hshape.AddChart(hr2);

theChart = hchart.Chart;

set(theChart, 'ChartType', 'xlLine'); %绘制折线图

% Plot 2

plot(randint(10, 1));

hgexport(gcf, '-clipboard'); %先导入到粘贴板中

hs1.Range('C3').PasteSpecial; %向Excel中粘贴

thefigure = Item(hshape, 2);

IncrementLeft(thefigure, 10); %移动图形

IncrementTop(thefigure, 10);

% Save and Quit 保存退出

hw.SaveAs('a.xlsx');

he.Quit;