Application.ApplyReportLayoutTemplate method (Project) (Método Application.ApplyReportLayoutTemplate [Project])
Aplica o modelo de relatório especificado ao relatório ativo.
Sintaxe
expression.
ApplyReportLayoutTemplate
(TemplateId)
expressão Uma variável que representa um Aplicativo objeto.
Parâmetros
Nome | Obrigatório/Opcional | Tipo de dados | Descrição |
---|---|---|---|
TemplateId | Opcional | PjReportLayoutTemplateId | Especifica o tipo de relatório; pode ser uma das seguintes constantes: pjReportLayoutComparison, pjReportLayoutTitleAndChart, pjReportLayoutTitleAndTable ou pjReportLayoutTitleOnly. |
TemplateId | Opcional | PJREPORTLAYOUTTEMPLATEID |
Valor de retorno
Boolean
Comentários
Para um relatório existente, o método ApplyReportLayoutTemplate adiciona os elementos de relatório especificados sobre outras formas no relatório. Por exemplo, se o relatório de Descrição Geral do Custo da Tarefa incorporado estiver ativo, a ApplyReportLayoutTemplate pjReportLayoutTitleAndChart
instrução adiciona uma nova caixa de texto com o título do relatório e um novo gráfico predefinido ao relatório.
Exemplo
O exemplo seguinte cria um relatório que contém uma caixa de texto de título e uma tabela básica e, em seguida, centra verticalmente o texto nas células da tabela.
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
Confira também
Enumeração PjReportLayoutTemplateId do Objeto de Relatório
Suporte e comentários
Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.