如果单元格区域 E1:E10 的条件格式一的公式指定的是“小于 5”,则本示例将对其进行更改。

With Activeworkbook.Worksheets(1).Range("e1:e10").FormatConditions(1)

    If .Operator = etLess And .Formula1 = "5" Then

        .Modify etCellValue, etBetween, "5", "15"

    End If

End With