示例3:定制Excel工作表中表的格式

本例在MATLAB中新建一个工作簿,然后在第一个工作表中通过设置边框、单元格背景色和字体创建一个表格。在MATLAB命令窗口键入:[大谦MATLAB,dqmatlab点com]

code.matlab
>;> %首先,打开一个Excel服务器
>> app=actxserver('excel.application');
>;> %插入一个新的工作薄
>> bk=app.Workbooks.Add;
>> app.Visible=1;
>;> %激活第1个表
>> shts=app.ActiveWorkbook.Sheets;
>> sht=shts.get('Item',1);
>;> %设置边框的线型、颜色和线宽
>> sht.Range("B2:E5").Borders.LineStyle=1;
>> sht.Range("B2:E5").Borders.ColorIndex=3;
>> sht.Range("B2:E5").Borders.Weight=2;
>;> %设置表中第1行的背景色、字体大小、加粗、倾斜等
>> sht.Range("B2:E2").Interior.ColorIndex=7';
>> sht.Range("B2:E2").Font.Size=15;
>> sht.Range("B2:E2").Font.Bold=1;
>> sht.Range("B2:E2").Font.Italic=1;
>;> %添加表头
>> sht.Range("B2").Value='姓名';
>> sht.Range("C2").Value='性别';
>> sht.Range("D2").Value='籍贯';
>;> %保存工作薄
>> bk.SaveAs('d:\myfile2.xlsx');
>;> %退出Excel并删除服务器
>> app.Quit;
>> app.delete;

设置效果如图1-4所示。

Document Image

图1-4 在工作表中通过设置格式新建一个表格