title | ms.service | ms.assetid | ms.date | ms.localizationpriority |
---|---|---|---|---|
Report.Apply method (Project) |
project-server |
4461da82-5bd6-2d9b-0d39-35875c2cee36 |
06/08/2017 |
medium |
Changes the view to display the report.
expression.Apply
expression A variable that represents a 'Report' object.
Nothing
The following example determines whether a report named Report 1 exists, and if so, displays the report.
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
[!includeSupport and feedback]