标题：求满足条件改变字体的方法

产品有50个，当其中一个或几个产品存量小于等于1000个时，存量或产品名称字体变成红色，要怎么实现。

首先在菜单的数据表功能区，执行：自定义样式命令

设置  小余1000   字体为红色

 

 

在表属性里找到 I绘制---DrawCell

把代码粘贴进去就可以了

 

 

If e.Col.Name = "数量" Then
          If e.Row("数量") < 1000 Then
            e.Style = "小余1000"
        End If
   End If