Método Application.ApplyReport (Project)

Exibe o relatório especificado.

Sintaxe

expression. ApplyReport(Name,ApplyTo)

expressão Uma variável que representa um Aplicativo objeto.

Parâmetros

Nome	Obrigatório/Opcional	Tipo de dados	Descrição
Name	Obrigatório	String	O nome do relatório.
Applyto	Opcional	Variantes	O parâmetro ApplyTo não é usado no Project.
Name	Opcional	Variantes
Applyto	Opcional	Variantes

Valor de retorno

Boolean

Comentários

O método ApplyReport pode ser aplicado a relatórios personalizados e a relatórios internos, como Visão Geral do Projeto.

Exemplo

O exemplo a seguir verifica se existe um relatório; se assim for, o exemplo exibe o relatório e, em seguida, amplia o relatório para 80% do tamanho original.

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

Confira também

Método Report.Apply

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.