Метод Application.ApplyReportLayoutTemplate (Project)

Статья
04/07/2023

Применяет указанный шаблон отчета к активному отчету.

Синтаксис

выражение. ApplyReportLayoutTemplate(TemplateId)

выражение: переменная, представляющая объект 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 и обратная связь.