Application.ApplyReportLayoutTemplate メソッド (Project)

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

構文

expression。 ApplyReportLayoutTemplate (TemplateId)

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

パラメーター

戻り値

ブール型 (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 のサポートおよびフィードバックを参照してください。