Access 2016 заголовок отчета VBA

Question

То, что я собираюсь спросить, я надеюсь, простой вопрос знаний.

Команда «CreateReport» в MS Access VBA создает пустой черновик отчета. Однако есть только верхний и нижний колонтитулы. Я хотел бы создать пустой черновик отчета, который также включает верхний и нижний колонтитулы отчета. Я мог бы добавить их вручную после создания нормального черновика отчета, но тогда это не то, что я хочу.

Есть ли способ сделать это?

Спасибо всем заранее.

Answer 1

Это работает:

Sub TestReportCreate()

    Dim rpt As Access.Report

    Set rpt = Application.CreateReport
    ' report is created minimized
    DoCmd.Restore
    ' toggle Header/Footer ON
    Application.RunCommand acCmdReportHdrFtr

    ' Do something with the header
    rpt.Section(acHeader).BackColor = RGB(255, 192, 192)

End Sub

, но использование параметра ReportTemplate может быть проще.

Answer 2

Я нашел выход. Я создал пустой отчет с добавленным вручную верхним и нижним колонтитулами и использовал его как черновик.