将
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