将

MATLAB

数据保存到

Excel

中的程序

excel = actxserver(

'excel.application'

);

%

打开一个

Excel

操作对象

set(excel,

'visible'

,2);

%

使

exce l

对象可见

,

即打开

Excel

窗口

,

实际应用时设置其为不可见的

workbooks = excel.workbooks;

%

创建工作本组对象

workbook = invoke(workbooks,

'add'

);

%

添加一个工作本

sheets = excel.activeworkbook.sheets;

%

获取当前活跃工作本的

表单组，一个工作本共有

3

个表单(

sheets

)

sheet = get(sheets,

'item'

, 1);

%

获取表单组中的一个表单

sheet1

invoke(sheet,

'activate'

);

%

激活该表单

activesheet = excel.activesheet;

%

获取当前活跃表单的句柄

activesheetrange = get(activesheet,'range',

'a1:a1764'

);

%

设置写到范围

a1:a1764

set(activesheetrange,

'value'

, d);

%

写入数据

d

invoke(workbook,

'saveas'

,

'w.xls')

;

%

保存文件

,

可以写绝对路径，

相对路径总是保存在我的文档中

,

文件名为

w.xls