Свойство Report.Index (Project)

Статья
04/07/2023

Возвращает индекс настраиваемого отчета в коллекции Reports . Только для чтения, Long.

Синтаксис

expression. Индекс

Выражение Переменная, представляющая объект Report.

Пример

В следующем примере перечислены индекс и имя каждого настраиваемого отчета в проекте.

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

Значение свойства

INT32

См. также

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

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

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

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