閱讀英文

共用方式為


Project) (Reports 物件

包含 Report 物件的集合,其中每個報表都是自訂報表。

範例

Reports物件是專案中自訂報表的集合。 其中不包含內建報表,例如 專案概觀重大工作里程碑報表。 使用 Project.Reports 屬性來取得 Reports 集合物件,如下列範例所示:

Sub ListCustomReports()
    Dim oReport As Report
    Dim msg As String
    Dim msgBoxTitle As String
    msg = ""
    msgBoxTitle = "Custom reports in '" & ActiveProject.Name & "'"
    
    For Each oReport In ActiveProject.Reports
        msg = msg & oReport.Index & ": " & oReport.Name & vbCrLf
    Next oReport
        
    If ActiveProject.Reports.Count > 0 Then
        MsgBox Prompt:=msg, Title:=msgBoxTitle
    Else
        MsgBox Prompt:="This project contains no custom reports.", _
            Title:=msgBoxTitle
    End If
End Sub

方法

名稱
Add
Copy
IsPresent

屬性

另請參閱

Report 物件

Project.Reports 屬性

支援和意見反應

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