Propriété Report.Index (Project)

Obtient l’index d’un rapport personnalisé dans la collection Reports . Long (en lecture seule).

Syntaxe

expression. Index

Expression Variable qui représente un objet « Report ».

Exemple

L’exemple suivant répertorie l’index et le nom de chaque rapport personnalisé dans un projet.

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

Valeur de la propriété

INT32

Voir aussi

Report ObjectReports

Assistance et commentaires

Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.