在Delphi5中如何设置Excel某个Cell的字体,字型?(20分)

  • 主题发起人 主题发起人 zgyingmu
  • 开始时间 开始时间
ar
VExcel:Variant;
begin
VExcel:=CreateOleObject('Excel.Application');
VExcel.Visible:=TRUE;
VExcel.WorkBooks.Add;
VExcel.ActiveSheet.Cells[1,1].Font.Size:=24;
VExcel.ActiveSheet.Cells[1,1].Font.Bold:=TRUE;
VExcel.ActiveSheet.Cells[1,1].Value:='TEST';
end;
要想得到详细说明可以看Excel帮助的Excel VB参考。

 
exsheet:texcelworksheet;
exsheet.cells.item[2,1].font.name:='楷体';//2表示行号表示列
...
 
exsheet.cells.item[2,1].font.color:=clRed;

:)
 
多人接受答案了。
 
后退
顶部