Méthode Reports.Add (Project)

Ajoute un rapport personnalisé à la collection Rapports .

Syntaxe

expression. Ajouter(nom)

expression Variable qui représente un objet 'Reports'.

Paramètres

Valeur renvoyée

Report

Objet de rapport personnalisé qui est 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 Formes , telles que AddChart et AddTable.

Exemples

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

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

Pour supprimer un état, vous devez passer à un autre affichage, 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

Objet Rapports Objetsde rapport Formes d’objets

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.