Вот сделал макрос, как бы всё это перевести на VFP
Т.е. я сделал таблицу в VFP, где встречается слово "Итого", теперь эту таблицу копирую в Excel, открываю Excel, и где это слово встречается, надо провести подчёркивание....(толщина-Weight и цвет-ColorIndex, не надо, только сама линия)

Selection.FormatConditions.Delete
Selection.FormatConditions.Add Type:=xlExpression, Formula1:= _
"=R19C1=""Итого"""
With Selection.FormatConditions(1).Borders(xlTop)
.LineStyle = xlContinuous
.Weight = xlThin
.ColorIndex = xlAutomatic
End With

Да читал я это...
могу перевести
with oExcel
.cells(1,1).FormatConditions.Delete
.cells(1,1).FormatConditions(1).BORDERS(1).linestyle = 1

endwith
Но что за парматер .FormatConditions(1) не понятно
и главное как эту строчку перевести
FormatConditions.Add Type:=xlExpression, Formula1:= _
"=R19C1=""Итого"""
Поэтому и спрашивал, а не посылать по сцылке.... в которых приводятся простейшие примеры перевода...

спасибо...пшёл за пывом, чтоб смысл был понятен...

Всё равно немного не понятно...,
Дошёл до
loexcel.cells(5,6).FormatConditions.delete
loexcel.cells(5,6).FormatConditions.Add(2,,"=ЕСЛИ(R5C7=4;1;0)").Interior.Color = 255
Окрашивает, а если
loexcel.cells(5,6).FormatConditions.delete
loexcel.cells(5,6).FormatConditions.Add(2,,"=IIF(R5C7=4;1;0)").Interior.Color = 255
не окрашивает
Вот и возникают вопросы
1.как сделать, чтоб в формуле не было формул на кирилице
2. как убрать R5C7, чтоб можно было написать cells(i,j), чтоб ввести диапазон...