Foxtable(狐表) → 用户栏目 → 专家坐堂 → 分组统计报表-多组如何生成


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

主题：分组统计报表-多组如何生成
帅哥哟，离线，有人找我吗？
lxhmax
 小大  1楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：三尾狐 帖子：636 积分：5699 威望：0 精华：0 注册：2012/8/2 19:04:00 		分组统计报表-多组如何生成  发帖心情 Post By：2022/1/12 3:24:00 [只看该作者]

 下载信息  [文件大小：   下载次数： ]
图片点击可在新窗口打开查看点击浏览该文件:生成订单.xlsx

 下载信息  [文件大小：   下载次数： ]
图片点击可在新窗口打开查看点击浏览该文件:模板.xlsx

 下载信息  [文件大小：   下载次数： ]
图片点击可在新窗口打开查看点击浏览该文件:原始数据.xls


请问下老师,如何生成右表这样的统计表?


图片点击可在新窗口打开查看此主题相关图片如下：微信截图_20220112032326.png
图片点击可在新窗口打开查看

[此贴子已经被作者于2022/1/12 3:26:57编辑过]
 回到顶部
帅哥，在线噢！
有点蓝
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：110790 积分：563882 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2022/1/12 9:11:00 [只看该作者]

第2行和第6行自己隐藏一下
 下载信息  [文件大小：   下载次数： ]
图片点击可在新窗口打开查看点击浏览该文件:模板.xlsx
 回到顶部
帅哥哟，离线，有人找我吗？
lxhmax
 小大  3楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：三尾狐 帖子：636 积分：5699 威望：0 精华：0 注册：2012/8/2 19:04:00 		  发帖心情 Post By：2022/1/24 18:49:00 [只看该作者]

   Dim zj As Double = Tables("对账单明细").Compute("Sum(小计)")
    Dim Book As New XLS.Book("D:\模板.xlsx")
    Dim Sheet As XLS.Sheet = Book.Sheets(0)
    Book.Marks.Add("总金额",CUMoney(zj))
    Book.Marks.Add("委托单位1","To:" & r("委托单位"))
    Book.Marks.Add("委托单位2",r("委托单位"))
    Book.Marks.Add("标题",Format(r("委托日期"),"MMM") & "对账单") '十二月
    Book.Build() '生成细节区
    Book.Save("D:\生成对账单.xlsx")'保存工作簿

老师,为什么我用这个方式生成excel报表的时候会不稳定,有时候生成的报表单元格全部被拆分掉了,就是那些合并的单元格没了

图片点击可在新窗口打开查看此主题相关图片如下：微信图片编辑_20220124184836.jpg
图片点击可在新窗口打开查看
 回到顶部
帅哥，在线噢！
有点蓝
 小大  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：110790 积分：563882 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2022/1/24 20:36:00 [只看该作者]

不能在细节区使用合并单元格

 回到顶部
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.05469 秒, 6 次数据查询