Foxtable(狐表)用户栏目专家坐堂 → 合并单元格问题


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

主题:合并单元格问题

美女呀,离线,留言给我吧!
小骨头ror
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:44 积分:474 威望:0 精华:0 注册:2017/11/9 11:33:00
合并单元格问题  发帖心情 Post By:2018/7/6 11:27:00 [只看该作者]


图片点击可在新窗口打开查看此主题相关图片如下:n4@8~tv`k7f80$62i6t3xa.png
图片点击可在新窗口打开查看



Tables("月度考核填报_Table1").SetColVisibleWidth("考核项目|80|考核指标|200|目标值|600|指标完成情况|200|单项权重|60|自我评定完成分值|60|病假天数|60|病假扣分|60|事假天数|60|加班天数")
DataTables("月度考核填报_Table1").DataCols.Add("扣分合计", Gettype(Double), "[病假天数] * (-2) +[事假天数]*(-5)")
DataTables("月度考核填报_Table1").Datacols.Add("合计分数", Gettype(Double),"sum(自我评定完成分值)+sum(扣分合计)")

表是sqltable表  想把合计分数这栏搞得好看点 没有这么多重复项   怎么搞定

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


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

参考,设置合并模式

 

http://www.foxtable.com/webhelp/scr/1373.htm

 


 回到顶部
美女呀,离线,留言给我吧!
小骨头ror
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:44 积分:474 威望:0 精华:0 注册:2017/11/9 11:33:00
  发帖心情 Post By:2018/7/6 13:26:00 [只看该作者]


Tables("月度考核填报_Table1").SetColVisibleWidth("考核项目|80|考核指标|200|目标值|600|指标完成情况|200|单项权重|60|自我评定完成分值|60|病假天数|60|病假扣分|60|事假天数|60|加班天数")
DataTables("月度考核填报_Table1").DataCols.Add("扣分合计", Gettype(Double), "[病假天数] * (-2) +[事假天数]*(-5)")
DataTables("月度考核填报_Table1").Datacols.Add("合计分数", Gettype(Double),"-10+sum(自我评定完成分值)+sum(扣分合计)")

With Tables("月度考核填报_Table1")
    .MergeMode = MergeModeEnum.Standard '标准合并模式
    .MergeCols.Clear() '清除原来的合并列
    .MergeCols.Add("合计分数") '加入要合并的列
    .MergeSort = "合计分数" '设置合并模式下的排序方式
    .AllowMerge = True '启用合并模式
End With


图片点击可在新窗口打开查看此主题相关图片如下:_}5_r~v1{13xwho0$b(mh2s.png
图片点击可在新窗口打开查看


没有作用 是不是因为用datacol.add添加的所以没作用

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


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

 

With Tables("月度考核填报_Table1")
    .MergeMode = MergeModeEnum.Free
    .MergeCols.Clear() '清除原来的合并列
    .MergeCols.Add("合计分数") '加入要合并的列
    .MergeSort = "合计分数" '设置合并模式下的排序方式
    .AllowMerge = True '启用合并模式
End With


 回到顶部