Project) (Report.Delete 方法

刪除報表。

語法

運算式。刪除

運算式 代表 'Report' 物件的變數。

傳回值

Nothing

範例

下列範例會判斷名為 「報表 1 」的報表是否存在，如有，會刪除該報表。 如果報表處於作用中狀態，請先變更為其他檢視再將其刪除;否則，Project 會顯示執行階段錯誤 1004：「 報表 1」 正在使用中，無法複製或刪除。

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

另請參閱

Report 物件

支援和意見反應

有關於 Office VBA 或這份文件的問題或意見反應嗎？ 如需取得支援服務並提供意見反應的相關指導，請參閱 Office VBA 支援與意見反應。