Méthode Report.Delete (Project)

Supprime le rapport.

Syntaxe

expression. Supprimer

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

Valeur renvoyée

Nothing

Exemple

L’exemple suivant détermine si un rapport nommé Rapport 1 existe et, dans l’affirmative, supprime le rapport. Si le rapport est actif, passez à un autre affichage avant de le supprimer ; sinon, Project affiche l’erreur d’exécution 1004 : le tableau « Rapport 1 » est en cours d’utilisation et ne peut pas être copié ou supprimé.

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 Report

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.