Report.Delete 方法 (專案)

刪除報告。

語法

表情。刪除

詞 一個代表「報告」物件的變數。

傳回值

Nothing

範例

以下範例判斷是否存在名為 Report 1 的報告，若存在，則刪除該報告。 如果報告仍在活動中，刪除前請切換到其他檢視;否則，專案顯示執行時錯誤 1004：資料 表「Report 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 支援與意見反應。