【问题标题】:Renumbering pages numbers after each group in a Microsoft Access report在 Microsoft Access 报告中的每个组之后重新编号页码
【发布时间】:2020-07-06 20:54:48
【问题描述】:

我有一个 MS 报告,在我的分组上有页眉和页脚。它有 70 页,有 14 个不同大小的组。前三组 - 第 1 组有三 (3) 页,第 2 组有五 (5) 页,第三组有九 (9) 页。我希望这些页面像这样编号(添加一个空格以便更容易查看组)1,2,3,1,2,3,4,5,1,2,3,4,5,6,7,8, 9 - 使每组的第一页从编号 1 重新开始。

当我将以下代码添加到分组的页脚时:

Private Sub GroupFooter0_Format(Cancel As Integer, FormatCount As Integer)
   'this fires 1 page early
   Me.Page = 1
End Sub

它提前触发一页并给出以下 1,2,1, 2,3,4,1, 2,3,4,5,6,7,8,9,10,1。

我愿意接受任何想法和/或解决方案。

【问题讨论】:

  • 将其分解为每个组的 3 个不同的报告调用可能更容易。您可以根据查询生成报告。您进行 3 次查询,每组一个。然后,您使用每个查询作为源打印 3 个报告运行。现在您有了三个基于组的报告,并且页码正确。
  • 感谢您的初步想法-我会找到更具可扩展性的东西。是的,在联系 Over Stack 之前,我已经看到了这个 Microsoft 链接,但它并没有解决我的问题。再次感谢您指出。

标签: vba ms-access ms-access-2016 ms-access-reports


【解决方案1】:

这是一个相当普遍的问题。代码太多,无法发布。看看这个链接http://access.mvps.org/access/reports/rpt0013.htm 它使用数组来重置编号。

【讨论】:

  • 感谢您提供此链接,我以前从未见过。我确实添加了代码,但出现了一个新问题。我将为这个问题提出一个新问题。再次感谢您!
猜你喜欢
  • 2013-12-24
  • 1970-01-01
  • 1970-01-01
  • 1970-01-01
  • 1970-01-01
  • 2017-03-22
  • 2013-10-08
  • 1970-01-01
  • 1970-01-01
相关资源
最近更新 更多