次の方法で共有


Reports.Add メソッド (Project)

カスタム レポートを Reports コレクションに追加 します

構文

Add(Name)

'Reports' オブジェクトを表す変数。

パラメーター

名前 必須 / オプション データ型 説明
名前 必須 String レポートの名前。
名前 必須 String

戻り値

Report

追加されるカスタム レポート オブジェクト。

注釈

新しいレポートは空です。テーブルやグラフなどの図形は含まれません。 レポートに図形を追加するには、AddChartAddTable などの Shapes オブジェクトのメソッドを使用できます。

次の例では、 レポート 1 という名前の空のレポートを追加し、レポートを表示します。

Sub AddReport()
    ActiveProject.Reports.Add "Report 1"
End Sub

レポートを削除するには、次の例のように別のビューに変更する必要があります。

Sub DeleteAReport()
    Dim reportName As String
    
    reportName = "Report 1"
    
    If ActiveProject.Reports.IsPresent(reportName) Then
        ' To delete the active report, change to another view.
        ViewApplyEx Name:="&Gantt Chart"
        
        ActiveProject.Reports(reportName).Delete
    Else
        MsgBox Prompt:="No report name: " & reportName, Title:="Report delete error"
    End If
End Sub

関連項目

Reports オブジェクトレポート オブジェクト図形

サポートとフィードバック

Office VBA またはこの説明書に関するご質問やフィードバックがありますか? サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。