Método Report.Apply (Project)

Altera a vista para apresentar o relatório.

Sintaxe

expressão. Aplicar

expressão Uma variável que representa um objeto "Relatório".

Valor de retorno

Nothing

Exemplo

O exemplo seguinte determina se existe um relatório com o nome Relatório 1 e, em caso afirmativo, apresenta 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

Objeto Report

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.