Foxtable(狐表)用户栏目专家坐堂 → 请问后一单元格内容自动填充为前一个单元格内容


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

主题:请问后一单元格内容自动填充为前一个单元格内容

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


加好友 发短信
等级:婴狐 帖子:4 积分:85 威望:0 精华:0 注册:2016/8/4 22:10:00
请问后一单元格内容自动填充为前一个单元格内容  发帖心情 Post By:2016/8/4 22:49:00 [只看该作者]


图片点击可在新窗口打开查看此主题相关图片如下:qq图片20160804224418.png
图片点击可在新窗口打开查看
材料单价列的内容自动引用材料成本列的内容,并且材料成本列的内容发生变动以后,材料单价列的内容自动随之发生改变

请问如何实现啊?


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


加好友 发短信
等级:二尾狐 帖子:574 积分:4252 威望:0 精华:0 注册:2015/5/13 8:32:00
  发帖心情 Post By:2016/8/4 23:52:00 [只看该作者]

 'DataColChanged 事件
If e.DataCol.Name ="材料成本" Then
    e.DataRow("材料单价") = e.DataRow("材料成本")
End If

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


加好友 发短信
等级:婴狐 帖子:4 积分:85 威望:0 精华:0 注册:2016/8/4 22:10:00
  发帖心情 Post By:2016/8/5 7:58:00 [只看该作者]

不行,显示不出来

材料成本是表达式列,是否跟这个有关系?


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


加好友 发短信
等级:狐神 帖子:5015 积分:25363 威望:0 精华:0 注册:2015/8/18 9:21:00
  发帖心情 Post By:2016/8/5 8:34:00 [只看该作者]



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


加好友 发短信
等级:狐神 帖子:5015 积分:25363 威望:0 精华:0 注册:2015/8/18 9:21:00
  发帖心情 Post By:2016/8/5 8:37:00 [只看该作者]

如果单价是表达式就在表达式编辑器里填上:[材料成本]

如果用代码,这样
Select Case e.DataCol.Name
    Case "参与计算材料成本相关列1","参与计算材料成本相关列2"
        e.DataRow("材料单价") = e.DataRow("材料成本")
End Select

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


加好友 发短信
等级:婴狐 帖子:4 积分:85 威望:0 精华:0 注册:2016/8/4 22:10:00
  发帖心情 Post By:2016/8/5 8:38:00 [只看该作者]

材料成本是表达式列,材料单价是数据列

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


加好友 发短信
等级:婴狐 帖子:4 积分:85 威望:0 精华:0 注册:2016/8/4 22:10:00
  发帖心情 Post By:2016/8/5 8:39:00 [只看该作者]

材料成本是表达式列,材料单价是数据列

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


加好友 发短信
等级:狐神 帖子:5015 积分:25363 威望:0 精华:0 注册:2015/8/18 9:21:00
  发帖心情 Post By:2016/8/5 8:41:00 [只看该作者]

看5楼代码

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


加好友 发短信
等级:狐神 帖子:5015 积分:25363 威望:0 精华:0 注册:2015/8/18 9:21:00
  发帖心情 Post By:2016/8/5 8:43:00 [只看该作者]

Select Case e.DataCol.Name
    Case "参与计算材料成本相关列1","参与计算材料成本相关列2"
        e.DataRow("材料单价") = 按照计算材料成本的表达式用法用代码重新计算材料单价
End Select

 回到顶部