Application.ApplyReportLayoutTemplate メソッド (Project)

  • [アーティクル]

指定したレポート テンプレートをアクティブなレポートに適用します。

構文

式。 ApplyReportLayoutTemplate(TemplateId)

expressionApplication オブジェクトを 表す変数。

パラメーター

名前 必須 / オプション データ型 説明
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 のサポートおよびフィードバックを参照してください。