excel 能不能一次把整个Sheet设为某号大小的字

[wugangcn]

delphi操作excel
excel中的字体大小设为9号字
excel.ActiveSheet.Columns[i].Font.size:=9;
excel.ActiveSheet.Rows[i].Font.size:=9;
这样是一列一列，一行一行循环很不爽，能不能一次把整个Sheet设为某号大小的字

[李_军]

excel.ActiveSheet.Cells.Select;
excel.ActiveSheet.Selection.Font.size:=9

[wugangcn]

method 'selection' not supported by automation object
运行出现意外

[wugangcn]

excel.ActiveSheet.Cells.Select;
这句不成功，如果输入excel.ActiveSheet.Cells.后面没有select这个属性。运行就出现上面的问题。