Foxtable(狐表)用户栏目专家坐堂 → 状态显示


  共有6747人关注过本帖树形打印复制链接

主题:状态显示

帅哥哟,离线,有人找我吗?
yifan3429
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:九尾狐 帖子:2482 积分:22932 威望:0 精华:0 注册:2011/3/29 17:14:00
状态显示  发帖心情 Post By:2013/5/21 0:01:00 [只看该作者]


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

这个代码要怎样写

弱白求码!

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

 回到顶部
帅哥哟,离线,有人找我吗?
智友软件工作室
  2楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:四尾狐 帖子:912 积分:7445 威望:0 精华:0 注册:2013/2/25 13:10:00
  发帖心情 Post By:2013/5/21 0:07:00 [只看该作者]

datacolchanged表事件,看帮助后会有启发!

 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2013/5/21 6:26:00 [只看该作者]

用表达式列也可以的。

 

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


 回到顶部
帅哥哟,离线,有人找我吗?
yifan3429
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:九尾狐 帖子:2482 积分:22932 威望:0 精华:0 注册:2011/3/29 17:14:00
  发帖心情 Post By: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
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:35433 积分:178530 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2013/5/21 11:41:00 [只看该作者]

e.DataRow("申请日期").Locked=True

 回到顶部
帅哥哟,离线,有人找我吗?
yifan3429
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:九尾狐 帖子:2482 积分:22932 威望:0 精华:0 注册:2011/3/29 17:14:00
  发帖心情 Post By: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
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:35433 积分:178530 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2013/5/21 11:52:00 [只看该作者]


 回到顶部
帅哥哟,离线,有人找我吗?
yifan3429
  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:九尾狐 帖子:2482 积分:22932 威望:0 精华:0 注册:2011/3/29 17:14:00
  发帖心情 Post By: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
  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:35433 积分:178530 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2013/5/21 14:14:00 [只看该作者]


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

 回到顶部
帅哥哟,离线,有人找我吗?
狐狸爸爸
  10楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:管理员 帖子:47497 积分:251403 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2013/5/21 14:29:00 [只看该作者]

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

 

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

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

       e.style = "某样式"

    End if

End If


 回到顶部