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
名稱 |
---|
Application |
數目 |
項目 |
Parent |
有關於 Office VBA 或這份文件的問題或意見反應嗎? 如需取得支援服務並提供意見反應的相關指導,請參閱 Office VBA 支援與意見反應。