Foxtable(狐表)用户栏目专家坐堂 → excel不给力,FOXTABLE如何给力?


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

主题:excel不给力,FOXTABLE如何给力?

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


加好友 发短信
等级:管理员 帖子:47448 积分:251054 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2011/10/23 11:25:00 [只看该作者]

你看仔细了,汇总表的分享结余并没有错。

不过汇总表加一个合计行更为合理:

 

 

 

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目156.zip


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


加好友 发短信
等级:幼狐 帖子:189 积分:2370 威望:0 精华:1 注册:2008/9/26 22:35:00
  发帖心情 Post By:2011/10/23 12:21:00 [只看该作者]

狐爸,“汇总表”的“项目”能否自动根据。。。。“总表”里发生过的“项目”。。。罗列出来呢?!。。。。


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


加好友 发短信
等级:管理员 帖子:47448 积分:251054 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2011/10/23 12:23:00 [只看该作者]

当然可以,好好学习,帮助有现成答案。

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


加好友 发短信
等级:幼狐 帖子:189 积分:2370 威望:0 精华:1 注册:2008/9/26 22:35:00
  发帖心情 Post By:2011/10/23 12:39:00 [只看该作者]

想起了。。。。用项目属性的MainTableChanged事件。。。可以解决。。

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


加好友 发短信
等级:五尾狐 帖子:1128 积分:11029 威望:0 精华:2 注册:2008/9/1 10:45:00
  发帖心情 Post By:2011/10/23 12:49:00 [只看该作者]

狐表确实很给力,可这网速太不给力。

 

白瞎我单位这10兆光纤了。


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


加好友 发短信
等级:三尾狐 帖子:778 积分:7463 威望:0 精华:0 注册:2009/9/7 10:55:00
  发帖心情 Post By:2011/10/23 17:26:00 [只看该作者]

但与实际不符,在汇总表中差旅费的结余是380,而在差旅费的关联表中的结余却是1350,这是不对的。

总表里的数字相当于是现金结余数。但要开支差旅费必须差旅费有结余才能开支,不能占用会议费结余的。也就是专款专用。

 

这个问题如何解决?


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

图片点击可在新窗口打开查看此主题相关图片如下:22.jpg
图片点击可在新窗口打开查看
[此贴子已经被作者于2011-10-23 17:26:31编辑过]

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


加好友 发短信
等级:三尾狐 帖子:778 积分:7463 威望:0 精华:0 注册:2009/9/7 10:55:00
  发帖心情 Post By:2011/10/23 21:52:00 [只看该作者]

希望能解决这个问题。

看来还是要设置四张表了,俩张表无法满足这样的要求。

 

有没有更合适的办法?


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


加好友 发短信
等级:七尾狐 帖子:1695 积分:10725 威望:0 精华:0 注册:2009/10/25 16:45:00
  发帖心情 Post By:2011/10/23 23:33:00 [只看该作者]

你可以自己稍微改造一下呀,不然怎么进步呢?

 

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目156.table


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


加好友 发短信 一级勋章 三级勋章 二级勋章
等级:超级版主 帖子:6318 积分:33945 威望:0 精华:10 注册:2008/8/31 20:56:00
  发帖心情 Post By:2011/10/23 23:45:00 [只看该作者]

如果是每一个项目的结余,可以这样:


Select Case e.DataCol.Name
    Case "收入","支出"
        Dim dr As DataRow
        Dim drs As List(of DataRow)
        dr = e.DataTable.Find("[项目] = '" & e.DataRow("项目") & "' And [_SortKey] < " & e.DataRow("_SortKey"), "[_SortKey] Desc") '找出上一行
        If dr Is Nothing Then '如果没有找到上一行,说明本行就是第一行
            e.DataRow("结余") = e.DataRow("收入") - e.DataRow("支出")
            dr = e.DataRow
        End If
        drs = e.DataTable.Select("[项目] = '" & e.DataRow("项目") & "' And [_SortKey] >= " & dr("_SortKey"), "[_SortKey]")
        For i As Integer = 1 To drs.Count - 1 '重算余下行的结余
            drs(i)("结余") = drs(i-1)("结余") + drs(i)("收入") - drs(i)("支出")
        Next    
End Select

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


加好友 发短信 一级勋章
等级:超级版主 帖子:7235 积分:40556 威望:0 精华:16 注册:2008/8/31 23:23:00
  发帖心情 Post By:2011/10/24 8:35:00 [只看该作者]

楼主绕了半天,不还是要分项结余吗?

 回到顶部
总数 20 上一页 1 2