Объект Reports (Project)
Содержит коллекцию объектов 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 |
Count |
Item |
Parent |
Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.