Project) (Reports.Add 方法

新增自訂報表至 [報表 ] 集合。

語法

運算式。新增 (名稱)

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

參數

傳回值

Report

新增的自訂報表物件。

註解

新的報表是空的;不包含表格或圖表等任何圖形。 若要將圖形新增至報表，您可以使用 Shapes 物件中的方法，例如 AddChart 和 AddTable。

範例

下列範例會新增名為 「報表 1」的空白報表，並顯示該報表。

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

若要刪除報表，您必須變更為不同的檢視，如下列範例所示：

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

另請參閱

報表物件報表物件圖形

支援和意見反應

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