Méthode Application.ApplyReportLayoutTemplate (Project)

Applique le modèle de rapport spécifié au rapport actif.

Syntaxe

expression. ApplyReportLayoutTemplate (TemplateId)

expressionUne variable qui représente un objetApplication.

Paramètres

Nom	Requis/Facultatif	Type de données	Description
TemplateId	Facultatif	PjReportLayoutTemplateId	Spécifie le type de rapport ; peut être l’une des constantes suivantes : pjReportLayoutComparison, pjReportLayoutTitleAndChart, pjReportLayoutTitleAndTable ou pjReportLayoutTitleOnly.
TemplateId	Facultatif	PJREPORTLAYOUTTEMPLATEID

Valeur renvoyée

Boolean

Remarques

Pour un rapport existant, la méthode ApplyReportLayoutTemplate ajoute les éléments de rapport spécifiés au-dessus d’autres formes du rapport. Par exemple, si le rapport intégré Vue d’ensemble du coût des tâches est actif, l’instruction ApplyReportLayoutTemplate pjReportLayoutTitleAndChart ajoute une nouvelle zone de texte avec le titre du rapport et un nouveau graphique par défaut au rapport.

Exemple

L’exemple suivant crée un rapport qui contient une zone de texte de titre et un tableau de base, puis centre verticalement le texte dans les cellules du tableau.

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

Voir aussi

Objet Application

Report ObjectPjReportLayoutTemplateId, énumération

Assistance et commentaires

Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.