次の方法で共有


Report.Apply メソッド (Project)

レポートを表示するようにビューを変更します。

構文

適用

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

戻り値

Nothing

次の例では、 レポート 1 という名前のレポートが存在するかどうかを決定し、存在する場合はレポートを表示します。

Sub ShowAReport()
    Dim reportName As String
    
    reportName = "Report 1"
    
    If ActiveProject.Reports.IsPresent(reportName) Then
        ActiveProject.Reports(reportName).Apply
    Else
        MsgBox Prompt:="No report name: " & reportName, Title:="Report apply error"
    End If
End Sub

関連項目

Report オブジェクト

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

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