Application.ApplyReportLayoutTemplate метод (Project)

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

Синтаксис

выражение. ApplyReportLayoutTemplate (Идентификатор шаблона)

выражение: переменная, представляющая объект Application.

Параметры

Имя	Обязательный или необязательный	Тип данных	Описание
Идентификатор шаблона	Необязательный	PjReportLayoutTemplateId	Определяет тип отчета. может быть одной из следующих констант: pjReportLayoutComparison, pjReportLayoutTitleAndChart, pjReportLayoutTitleAndTable или pjReportLayoutTitleOnly.
Идентификатор шаблона	Необязательный	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 и обратная связь.