以文本方式查看主题

-  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=33564)

--  作者:yifan3429
--  发布时间:2013/5/21 0:01:00
--  状态显示


图片点击可在新窗口打开查看此主题相关图片如下:360桌面截图20130520235852.jpg
图片点击可在新窗口打开查看
我想根据我的逻辑列选择状态栏发生不同的状态显示 

这个代码要怎样写

弱白求码!

[此贴子已经被作者于2013-5-21 0:01:57编辑过]

--  作者:智友软件工作室
--  发布时间:2013/5/21 0:07:00
--  
datacolchanged表事件,看帮助后会有启发!
--  作者:有点甜
--  发布时间:2013/5/21 6:26:00
--  

用表达式列也可以的。

 

iif(设计完成 Is Null And 洽谈完成 Is NUll, "洽谈中",IIf(设计完成 Is Null, "设计中","设计完成"))


--  作者:yifan3429
--  发布时间:2013/5/21 11:32:00
--  
以下是引用智友软件工作室在2013-5-21 0:07:00的发言:
datacolchanged表事件,看帮助后会有启发!

 

If e.DataCol.Name = "报价申请" Then

    If e.DataRow("报价申请") = True

        e.DataRow("申请日期") = Today()

e.DataRow("状态") = "申请完毕"

    Else

        e.DataRow("申请日期") = Nothing

e.DataRow("状态") = "未申请报价"


    End If

End If

 

 

 

 

 

我用上述代码完成了我想锁定此单元格   要怎么设计代码

解锁用解锁行可以吗


--  作者:Bin
--  发布时间:2013/5/21 11:41:00
--  
e.DataRow("申请日期").Locked=True
--  作者:yifan3429
--  发布时间:2013/5/21 11:51:00
--  
以下是引用yifan3429在2013-5-21 11:32:00的发言:

 

If e.DataCol.Name = "报价申请" Then

    If e.DataRow("报价申请") = True

        e.DataRow("申请日期") = Today()

e.DataRow("状态") = "申请完毕"

    Else

        e.DataRow("申请日期") = Nothing

e.DataRow("状态") = "未申请报价"


    End If

End If

 

 

 

 

 

我用上述代码完成了我想锁定此单元格   要怎么设计代码

解锁用解锁行可以吗

对于颜色还是没有理解用法    

 我想勾选上单元格的为绿色、代码怎样写

教程位置

 

谢谢


--  作者:Bin
--  发布时间:2013/5/21 11:52:00
--  
单元格样式设置 http://www.foxtable.com/help/topics/0656.htm
--  作者:yifan3429
--  发布时间:2013/5/21 13:23:00
--  
以下是引用Bin在2013-5-21 11:52:00的发言:
单元格样式设置 http://www.foxtable.com/help/topics/0656.htm

根据这个帮助做了  不是整行 就是整列   或是全表    就是不能指定到单元格  

 

If e.Row("完成") = True
    e.Style = "OK"
End If
With Tables("总表").Current \'引用当前行
    If .IsNull("报价申请") = False Then 
        e.Style = "进度" 
    End If
End With


图片点击可在新窗口打开查看此主题相关图片如下:qq截图20130521132059.jpg
图片点击可在新窗口打开查看

 我只想逻辑列的单元格被选中的显示绿色

 

求教啊

[此贴子已经被作者于2013-5-21 13:24:38编辑过]

--  作者:Bin
--  发布时间:2013/5/21 14:14:00
--  

[此贴子已经被作者于2013-5-21 14:34:26编辑过]

--  作者:狐狸爸爸
--  发布时间:2013/5/21 14:29:00
--  

你要判断列名,样式才会针对某个单元格:

 

if e.Col.name = “某列" Then

    if e.row("某列") = “某值" then

       e.style = "某样式"

    End if

End If