以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  汇总打印  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=129442)

--  作者:lfz123
--  发布时间:2018/12/28 15:23:00
--  汇总打印
请教:在汇总模式下,设置了预览打印,怎样合并打印合计行啊?
--  作者:有点甜
--  发布时间:2018/12/28 15:38:00
--  

没看懂你的意思。你是想只打印统计的行?

 

那建议你用分组统计 http://www.foxtable.com/webhelp/scr/0158.htm

 


--  作者:lfz123
--  发布时间:2018/12/28 16:08:00
--  回复:(有点甜)没看懂你的意思。你是想只打印统计的...
我截屏给您看看,我表格做了汇总,合计行是合并的.,打印预览时就不是合并着了,我希望打印时汇总行也是合并的,这样小计的内容也能显示完整

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

图片点击可在新窗口打开查看此主题相关图片如下:汇总打印合并.png
图片点击可在新窗口打开查看


--  作者:有点甜
--  发布时间:2018/12/28 17:21:00
--  

参考

 

Dim doc As PrintDoc = e.Form.GernatePrintDoc()
For Each c As object In Doc.Body.Children
    If Typeof c Is prt.RenderTable Then
        For i As Integer = 0 To c.Rows.count-1
            If c.cells(i,1).text Like "*计" Then
                c.cells(i,1).SpanCols = 5
            End If
        Next
    End If
Next
doc.Preview()