Partager via


Reports.Add, méthode (Project)

Ajoute un rapport personnalisé à la collection Reports .

Syntaxe

expression. Add(Name)

expression Variable qui représente un objet « Reports ».

Paramètres

Nom Requis/Facultatif Type de données Description
Name Obligatoire String Nom du rapport.
Name Obligatoire String

Valeur renvoyée

Report

Objet de rapport personnalisé ajouté.

Remarques

Le nouveau rapport est vide ; il ne contient pas de formes telles que des tableaux ou des graphiques. Pour ajouter des formes au rapport, vous pouvez utiliser des méthodes dans l’objet Shapes , telles que AddChart et AddTable.

Exemples

L’exemple suivant ajoute un rapport vide nommé Report 1 et affiche le rapport.

Sub AddReport()
    ActiveProject.Reports.Add "Report 1"
End Sub

Pour supprimer un rapport, vous devez passer à une autre vue, comme dans l’exemple suivant :

Sub DeleteAReport()
    Dim reportName As String
    
    reportName = "Report 1"
    
    If ActiveProject.Reports.IsPresent(reportName) Then
        ' To delete the active report, change to another view.
        ViewApplyEx Name:="&Gantt Chart"
        
        ActiveProject.Reports(reportName).Delete
    Else
        MsgBox Prompt:="No report name: " & reportName, Title:="Report delete error"
    End If
End Sub

Voir aussi

Formesde l’objet Rapports

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.