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

Question

我有ms访问报告，并且我的数据库中的每个报告都有特定的启动页码我希望将该特定的起始编号作为其第一个页面编号报告，并为其他页面指定+1。我怎样才能实现它我尝试在VBA中重新设置页码，但我无法成功。

Answer 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]会返回报告名称。