以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  [求助]库存数量超过上下限单元格背景绘制  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=41990)

--  作者:ZHX241806
--  发布时间:2013/11/1 6:48:00
--  [求助]库存数量超过上下限单元格背景绘制
我有一个商品库存表(表中自定义样式1为红色,自定义样式2为黄色),表中有产品编号列X,库存数量列A,库存上限列B,库存下限列C,当库存商品的数量列A大于库存上限列B时,数量列A的单元格背景为红色;当库存数量列A小于库存下限列C时,库存数量列A的单元格背景为黄色(即A>B,A背景为红色;A<C,A背景为黄色),请求高手帮忙,代码如何写,谢谢!!!
--  作者:逛逛
--  发布时间:2013/11/1 7:58:00
--  

帮助里 搜

DrawCell


--  作者:Bin
--  发布时间:2013/11/1 8:33:00
--  
http://www.foxtable.com/help/topics/0656.htm
--  作者:ZHX241806
--  发布时间:2013/11/1 19:39:00
--  

看过帮助,但因不懂代码编写,再加上帮助里指的具体数字,所以照样子没有做成功,请求帮忙写一个代码,谢谢!!!


--  作者:有点甜
--  发布时间:2013/11/1 19:40:00
--  
 上例子,不然别人怎么知道要怎么帮你写代码。
--  作者:ZHX241806
--  发布时间:2013/11/1 19:57:00
--  
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:库存上下限.table


--  作者:ZHX241806
--  发布时间:2013/11/1 19:58:00
--  
项目已上传请帮忙.谢谢!!!
--  作者:有点甜
--  发布时间:2013/11/1 20:08:00
--  
 代码如下

If e.Col.Name = "库存数量" Then
    If e.Row("库存数量") > e.Row("库存上限") Then
        e.Style = "样式1"
    Else If e.Row("库存数量") < e.Row("库存下限") Then
        e.Style = "样式2"        
    End If
End If

--  作者:ZHX241806
--  发布时间:2013/11/1 20:19:00
--  
太好了,如果商品名称的背景也一起跟着变化,请问怎么写代码,谢谢!!!
--  作者:有点甜
--  发布时间:2013/11/1 20:21:00
--  
 If e.Col.Name = "库存数量" OrElse e.Col.Name = "商品名称" Then
    If e.Row("库存数量") > e.Row("库存上限") Then
        e.Style = "样式1"
    Else If e.Row("库存数量") < e.Row("库存下限") Then
        e.Style = "样式2"        
    End If
End If