Report.Delete Method (Project)

Deletes the report.


expression. Delete

expression A variable that represents a 'Report' object.

Return value



The following example determines whether a report named Report 1 exists, and if so, deletes the report. If the report is active, change to another view before you delete it; otherwise, Project shows run-time error 1004: The table "Report 1" is in use and cannot be copied or deleted.

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"
        MsgBox Prompt:="No report name: " &; reportName, Title:="Report delete error"
    End If
End Sub

See also

Report Object