Método Report.Apply (Project)
Altera a exibição para exibir o relatório.
Sintaxe
expressão. Aplicar
Expressão Uma variável que representa um objeto 'Report'.
Valor de retorno
Nothing
Exemplo
O exemplo a seguir determina se existe um relatório chamado Relatório 1 e, se for o caso, exibe o relatório.
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
Confira também
Suporte e comentários
Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.