with loSheet.range(m.lcRange).Interior .ColorIndex = 33 && Blue Color .pattern = xlSolid .PatternColorIndex = xlAutomatic endwith endif ** Made the Totals row in bold and Green highlight loExcel.range([A1], loExcel.selection.SpecialCells(xlLastCell)).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 endwithMy question is, how should I unselect everything before saving, e.g. nothing should be selected?