- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- 分组统计报表-多组如何生成 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=174347)
-- 发布时间：2022/1/12 3:24:00
-- 分组统计报表-多组如何生成
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:生成订单.xlsx |
请问下老师,如何生成右表这样的统计表?
此主题相关图片如下：微信截图_20220112032326.png
[此贴子已经被作者于2022/1/12 3:26:57编辑过]
-- 发布时间：2022/1/12 9:11:00
--
第2行和第6行自己隐藏一下
| 下载信息 [文件大小： 下载次数： ] | |
| 点击浏览该文件:模板.xlsx |
-- 发布时间：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
-- 发布时间：2022/1/24 20:36:00
--
不能在细节区使用合并单元格