>> Unfortunately it didn't work for Excel 2007, I still don't see the green highlight. It works OK for Excel 2003.

I only have Excel 2007, this is my entire code and when I type "TOTAL" in any cell in Column A I get the highlight (checked down to cell A60487 then got bored :-) )

#INCLUDE excel9.h

loExcel=CREATEOBJECT("Excel.Application")
loExcel.Workbooks.ADD()
loPage=loExcel.Workbooks(1).Worksheets(1)
loExcel.Columns("A:A").SELECT
loExcel.SELECTION.FormatConditions.DELETE
loExcel.SELECTION.FormatConditions.ADD(xlExpression,, '=UPPER(Left($A1,5))="TOTAL"')

WITH loExcel.SELECTION.FormatConditions(1)
.FONT.Bold = .T.
 .Interior.ColorIndex = 4
ENDWITH
loExcel.Visible=.T.

RETURN

Can you seperate out more of you code and I can try and run it?

Gary.