如何在excel表中为负值更改颜色使用delphi编程？

Question

使用条件格式？

oXL.FormatConditions.Add(xlCellValue,xlGreater,0);
oXL.FormatConditions[1].Font.color = clred;

Answer 1

oXL.Sheets['Sheet_name'].Range['A1:Z1'].FormatConditions.Add(xlCellValue,xlLess,0);
oXL.Sheets['Sheet_name'].Range['A1:Z1'].FormatConditions[1].Font.Color := clRed;

A1的范围：Z1是任何负值，那些是红色变换......