matlab 更底层操作excel

clear;

e = actxserver('excel.application');

% Insert a new workbook.
% WorkBook=e.Workbooks.Open(path);
eWorkbook=e.Workbooks.Add;
% e.visible=1;

% Make the second sheet active.
% eActiveWorkbook = get(e, 'ActiveWorkBook');
% eSheets = get(eActiveWorkbook, 'Sheets');
eSheets = e.ActiveWorkBook.Sheets; 
eSheets.Add;
eSheets.Item(1).Name = 'haha';
eSheets.Item(2).Name = 'hehe';
eSheets.Item(3).Name = 'OoOo';
% eSheet2 = Item(eSheets, 2);
eSheet2 =eSheets.Item(2);
% Rename the fault sheet 2.
eSheet2.name = 'new1';
% Activate(eSheet2);
eSheet2.Activate;

% Get a handle to the active sheet.
eActiveSheet = get(e, 'ActiveSheet');

% Put a MATLAB array into Excel.
A = [1 2; 3 4];
eActiveSheetRange = Range(eActiveSheet, 'A1:B2');
set(eActiveSheetRange, 'Value', A);

B=2*A;
%Make the Third sheet active
eSheet3 = Item(eSheets, 3);
Activate(eSheet3);
eActiveSheet = get(e, 'ActiveSheet');
eActiveSheetRange = Range(eActiveSheet, 'A4:B5');
set(eActiveSheetRange, 'Value', B);

% Now save the workbook 
eWorkbook.SaveAs('F:\文档\MATLAB\test.xlsx');
e.Quit;
e.delete;

参考:
http://blog.csdn.net/lyfadd85/article/details/5874407
http://blog.sina.com.cn/s/blog_615d5f190100sv3n.html
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值