Project) (Application.ApplyReportLayoutTemplate 方法

将指定的报告模板应用于活动报告。

语法

expression。 ApplyReportLayoutTemplate (TemplateId)

expression：表示 Application 对象的变量。

参数

名称 必需/可选 数据类型 说明
TemplateId 可选 PjReportLayoutTemplateId 指定报告的类型;可以是下列常量之一： pjReportLayoutComparison、 pjReportLayoutTitleAndChart、 pjReportLayoutTitleAndTable 或 pjReportLayoutTitleOnly。
TemplateId 可选 PJREPORTLAYOUTTEMPLATEID

返回值

Boolean

说明

对于现有报表， ApplyReportLayoutTemplate 方法将指定的报表元素添加到报表中的其他形状之上。 例如，如果内置的“任务成本概览”报表处于活动状态， ApplyReportLayoutTemplate pjReportLayoutTitleAndChart 语句将向报表中添加一个带有报表标题和新默认图表的新文本框。

示例

以下示例创建一个报表，其中包含标题文本框和一个基本表，然后将表格单元格中的文本垂直居中对齐。

Sub CreateTableReport()
    Dim theReport As Report
    Dim reportName As String
    Dim shp As Shape
    
    ' Add a report.
    reportName = "Table Report"
    Set theReport = ActiveProject.Reports.Add(reportName)
    
    ApplyReportLayoutTemplate TemplateId:=pjReportLayoutTitleAndTable
    
    For Each shp In theReport.Shapes
        If shp.HasTable Then
            shp.Select
            AlignTableCellVerticalCenter
        End If
    Next shp
End Sub

另请参阅

Application 对象

报表对象PjReportLayoutTemplateId 枚举

支持和反馈

有关于 Office VBA 或本文档的疑问或反馈？ 请参阅 Office VBA 支持和反馈，获取有关如何接收支持和提供反馈的指南。

  • Last updated on