次の方法で共有


Report.Index プロパティ (Project)

Reports コレクション内のカスタム レポートのインデックスを取得 します 。 取得のみ可能な Long 値です。

構文

インデックス

'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 のサポートおよびフィードバックを参照してください。