回 帖 发 新 帖 刷新版面

主题:vfp 控制 Excel 条件格式

    Selection.FormatConditions.Delete
    Selection.FormatConditions.Add Type:=xlCellValue, Operator:=xlNotEqual, _
        Formula1:="0"
    Selection.FormatConditions(1).Interior.ColorIndex = 3

如何在 VFP 中 执行上述条件格式代码  请各位大侠指教!

回复列表 (共2个回复)

沙发

我也想知道VFP如何设置excel条件格式

板凳

[quote]应用于 FormatConditions 对象的 Add 方法。

添加新的条件格式。返回 FormatCondition 对象,该对象代表新添加的条件格式。

expression.Add(Type, Operator, Formula1, Formula2)
expression      必需。该表达式返回一个 FormatConditions 对象。

Type      XlFormatConditionType 类型,必需。指定条件格式是基于单元格值还是基于表达式。

XlFormatConditionType 可为以下 XlFormatConditionType 常量之一。 
xlCellValue 基于单元格值的条件格式。 
xlExpression 基于表达式的条件格式。 

Operator      Variant 类型,可选。条件格式运算符。可为以下 XlFormatConditionOperator 常量之一:xlBetween、xlEqual、xlGreater、xlGreaterEqual、xlLess、xlLessEqual、xlNotBetween 或 xlNotEqual。如果 Type 为 xlExpression,则忽略 Operator 参数。

Formula1      Variant 类型,可选。与条件格式相关的表达式或数值。可为常量、字符串、单元格引用或公式。

Formula2      Variant 类型,可选。当 Operator 为 xlBetween 或 xlNotBetween 时,为与条件格式第二部分相关的表达式或数值(否则,则忽略本参数)。可为常量、字符串、单元格引用或公式。

说明
对单个区域定义的条件格式不能超过三个。可用 Modify 方法修改现有的条件格式,或在添加新条件格式前用 Delete 方法删除现有的条件格式。[/quote]



?xlCellValue, xlNotEqual,"0"
 1             4            0


    Selection.FormatConditions.Delete
    Selection.FormatConditions.Add(1,4,"0")
    Selection.FormatConditions(1).Interior.ColorIndex = 3

我来回复

您尚未登录,请登录后再回复。点此登录或注册