Объект Reports (Project)

Статья
04/07/2023

Содержит коллекцию объектов 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

Свойства

Имя
Application
Count
Item
Parent

См. также

Объект отчета

Свойство Project.Reports

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.

Поделиться через