将特定页码分配给 vba 中的 ms 访问报告

Posted 2023-05-06

【中文标题】将特定页码分配给 vba 中的 ms 访问报告

【英文标题】：Assign specific page numbers to ms access report in vba

【发布时间】：2015-10-30 17:05:39

【问题描述】：

我在 ms 访问中有报告，并且我的数据库中的每个报告都有特定的启动页码，我想将特定的起始页号作为其第一页码进行报告，并在其中 +1 用于其他页面。我该如何实现它我尝试在 VBA 中重置页码但我无法成功。

【参考方案1】：

如果每个报告都有一个修复起始页码，您可以简单地将显示页码的文本框从

="Page " & [Page]

到

="Page " & [Page] + 19

对于应该从第 20 页开始的报告。

如果您需要 VBA 来确定起始编号，请使用公共函数，例如

Public Function RepPageStart(RepName As String) As Long

    Select Case RepName
        Case "Report A": RepPageStart = 19
        ' etc
    End Select
    ' or instead Select Case read the number from a table ...

End Function

在报告中：

="Page " & [Page] + RepPageStart([Name])

[Name] 返回报告名称。