Project) (報表物件

發行項
04/07/2023

代表 Project 中可包含 Office Art 物件的報表，例如 Shape、 ReportTable或 Chart。 Report物件是Reports集合的成員。

註解

注意事項

未實作 Report 物件的宏錄製。也就是說，當您在 Project 中錄製巨集並手動加入報表或編輯報表時，不會記錄新增和編輯報表的步驟。

範例

若要建立報表，請使用 Reports.Add 方法。例如，下列命令會建立名為「我的新報表」的報表。

ActiveProject.Reports.Add "My New Report"

當您執行命令時，Project 會建立報表，然後將檢視變更為 [報表工具] 底下的功能區 [設計] 索引標籤。使用功能區上的設計工具專案，將影像、圖形、圖表、表格或文字方塊新增至報表。或者，您可以使用 Shape、 ShapeRange、 Chart和 ReportTable 物件的成員，以程式設計方式新增和編輯報表中的專案。

圖 1： Creating a report in Project

在 Project 中建立報表若要刪除報表，您必須先關閉使用中報表檢視。例如，在功能區的 [設計] 索引標籤上，于 [檢視] 群組的 [報表] 下拉式功能表中選擇不同的報表。然後，在功能區的 [報表] 群組中，選擇 [管理] 下拉式功能表中的 [召集人]。在 [ 召集人 ] 對話方塊中，選擇 [ 報表] 索引標籤，在專案窗格中選取 [ 我的新增報 表]，然後選擇 [ 刪除]。

若要以程式設計方式刪除使用中報表，請執行下列宏。

Sub DeleteTheReport()
    Dim i As Integer
    Dim reportName As String
    
    reportName = "My New Report"
    
    ' To delete the active report, change to another view.
    ViewApplyEx Name:="&Gantt Chart"
    
    ActiveProject.Reports(reportName).Delete
End Sub