Application.ApplyReportLayoutTemplate 方法 (Project)

將指定的報表範本套用至作用中的報表。

語法

expression。 ApplyReportLayoutTemplate (TemplateId)

expression 代表 Application 物件的變數。

參數

名稱	必要/選用	資料類型	描述
TemplateId	選用	PjReportLayoutTemplateId	指定報告類型;可以是下列其中一個常數： pjReportLayoutComparison、 pjReportLayoutTitleAndChart、 pjReportLayoutTitleAndTable 或 pjReportLayoutTitleOnly。
TemplateId	選用	PJREPORTLAYOUTTEMPLATEID

傳回值

布林值

註解

針對現有的報表， 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 支援與意見反應。