Office中国论坛/Access中国论坛

标题: 如何让一张报表每页只打印三条记录？ [打印本页]

作者: jynj 时间: 2008-2-22 12:46
标题: 如何让一张报表每页只打印三条记录？
如何让一张报表每页只打印三条记录？代码如何写？

作者: 443898868 时间: 2008-2-22 12:52
标题: 我也很想知道
有没有人知道，我急需，而且我还想请帮忙：
可以在一张A4纸上打印2张报表，而且每张报表只打5行

作者: t小宝 时间: 2008-2-22 14:19
第一个方法,不用代码：调高报表页面页脚的高度直至只显示3条记录。
第二个方法，在报表主体的格式化事件中使用代码：

Private Sub 主体_Format(Cancel As Integer, FormatCount As Integer)
Static row As Long
If Me.Section(acDetail).ForceNewPage = 1 Then
Me.Section(acDetail).ForceNewPage = 0
Else
If row Mod 3 = 0 Then
Me.Section(acDetail).ForceNewPage = 1
row = 0
End If
End If
row = row + 1
End Sub

复制代码

作者: jynj 时间: 2008-2-22 16:18
你真是高手,我马上试试

作者: jynj 时间: 2008-2-22 16:58
两种方法确实都可实现,但汇总总是在最后一页才汇总,不能每页都汇总

作者: t小宝 时间: 2008-2-22 17:01
在页面页脚上汇总每页

作者: jynj 时间: 2008-2-22 20:49
请教一下，如果有个“数量”的字段，在报表的“页面页脚”汇总可以写成
=sum([数量])
如果在分页的“页面页脚“中汇总应如何写这个求和？

作者: goodboy040 时间: 2008-2-22 22:41
谢谢分享。。。。。。。。。。。。。。。。

作者: t小宝 时间: 2008-2-22 22:49
分页的“页面页脚“是什么?

作者: jynj 时间: 2008-2-23 00:16
每一页的下面，如何求本页某字段的总计

作者: jynj 时间: 2008-2-23 20:41
晕死，难度好大啊，在子表报里设了每页显示三条记录，到主报表里调子表报，结果第二页没有表头，只有记录。如果设主报表里的子报表的格式-可以扩大为“否”，那么只显示一页
不知错在哪里[attach]28571[/attach]

[ 本帖最后由 jynj 于 2008-2-23 20:49 编辑 ]

作者: t小宝 时间: 2008-2-23 22:41
例子没见有第二页?

作者: jynj 时间: 2008-2-23 23:35
子表有第二页，主报表没有第二页

作者: t小宝 时间: 2008-2-24 21:26
还真是个问题！！

作者: t小宝 时间: 2008-2-25 16:59
好人做到底，帮你做个例子，很简单的，不用代码，但源表要加一个字段

作者: jynj 时间: 2008-2-26 16:38
谢谢，你的例子是个很好的思路，只要加一些代码，使不打印的为o,打印为1、2、3 ，这样确定了每页要打印的记录，并且通过分组能够汇总。非常感激你的帮助！
这个问题困扰我很久了，不过我现在已经解决了。
由于是联机开票，多台电脑一起使用分别打印，为防止每台电脑上需打印的ID号混乱
我采取的方法是每台电脑单独记录本机上未打印的ID号，每达到3个ID号就将这三个ID号记录一个数组，将数组记录到全局变量然后传递给表单，这样表单不仅能汇总，每页也最多只打印三条记录了。
为了表单的美观，如果只有一条或两条记录需打印时，第三条记录的位置如何补空行的问题。我解决的方法是在主报表上直接划好表格线，将子报表上的汇总用白色隐藏，然后将其数值传送到主报表的汇总栏上。

[ 本帖最后由 jynj 于 2008-2-26 16:39 编辑 ]

作者: llj 时间: 2008-2-28 00:16
谢谢分享，回复一下是应该的。

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)