Delphi控制Excel的重要属性和方法

法

2004-09-16 10:21 出处：CSDN 作者：费亚 责任编辑：linjixiong

在本页浏览全文

在delphi中对单元格(集)，区域，工作表等所有对象的操作都是要Variant来实现的。

自己的程序中选定区域赋给Range:

Var range,sheet:Variant; Range:= olecon.OleObject.application.Range['A1:C3']; 或者：

Sheet:= olecon.OleObject.application.Activesheet; Range:= olecon.OleObject.application.Range[sheet.cells[1,1],sheet.cells[3,3]]; 对上面的Range合并单元格：

Range.merge; Range. FormulaR1C1:=’合并区’；//合并后写入文本 注意以后要读合并的单元格里面的文本就是读合并区域的左上角的那个单元格的文本

在excel表中选定区域赋给range：

range:=excel_grid1.OleObject.application.selection; 拆分单元格：

Range.unmerge; 合并后设定单元格（集）的格式：

Range.HorizontalAlignment:= xlCenter;// 文本水平居中方式 Range.VerticalAlignment:= xlCenter//文本垂直居中方式 Range.WrapText:=true;//文本自动换行 Range.Borders.LineStyle:=1//加边框 Range.Interior.ColorIndex:=39;//填充颜色为淡紫色 Range.Font.name:=’ 隶书’;//字体 Range.Font.Color:=clBlue;//字体颜色