hbm

导航

 

最近做仿真的时候需要用到这个功能,所以网上搜了一下,找到一个可行的方法。

 

-----------------------------------------------------------------------------

excel = actxserver('excel.application');  % 打开一个excel操作对象
set(excel,'visible',2);                   % 使excel对象可见,即打开excel窗口,

                                          % 实际应用时设置其为不可见
workbooks = excel.workbooks;              % 创建工作本组对象
workbook = invoke(workbooks,'add');       % 添加一个工作本
sheets = excel.activeworkbook.sheets;     % 获取当前活跃工作本的表单组,一个工作本有三个表单(sheets)
sheet = get(sheets,'item',1);             % 获取表单组的一个表单
invoke(sheet,'activate');                 % 激活该表单
activesheet = excel.activesheet;          % 获取当前活跃表单的句柄
activesheetrange = get(activesheet,'range','a1:a170');  % 设置写到范围
set(activesheetrange,'value',10);         % 写入数据
invoke(workbook,'saveas','w.xls');        % 保存文件

-----------------------------------------------------------------------------

    基本的语句就是这样,我试验了一下,效果还可以,看看下面的图吧。

posted on 2015-05-10 13:28  hbm  阅读(368)  评论(0编辑  收藏  举报