#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. RETURNCan you seperate out more of you code and I can try and run it?