>>>That is what I understand, but I can format only the rows with [Total] not the numbers :o)
>>
>>What can you do and how? E.g. show some code.
>
>#define xlLastCell 11
>#define xlCellValue 1
>#define xlEqual 3
>
>LOCAL oExcel AS Excel.Application
>oExcel = CREATEOBJECT([Excel.Application])
>
>oExcel.Workbooks.Open([d:\book1.xls])
>oExcel.Visible = .t.
>oExcel.Range([A1],;
> oExcel.Selection.SpecialCells(xlLastCell)).Select
>oExcel.Selection.FormatConditions.Delete
>oExcel.Selection.FormatConditions.Add(xlCellValue, xlEqual,"Total")
>With oExcel.Selection.FormatConditions(1).Font
> .Bold = 1
> .Italic = 0
> .Strikethrough = 0
>EndWith
>
>But I couldnt made it works with whole selection and IF the cell contains [Total] not just equal to it.
I see. I was assuming I need to use formula and tried with SEARCH function, but could not make it to work either.
Anyway, I have two other questions:
1) Is it possible to add new sheets to already created file? I don't see this option doing it interactively.
2) If I need to show information from different tables, what is the best way: two separate sheets? Or combine information into one cursor?
How would you do it?
If it's not broken, fix it until it is.
My Blog