Compartilhar via


Método Application.ApplyReport (Project)

Apresenta o relatório especificado.

Sintaxe

expression. ApplyReport (Nome,AplicarTo)

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.
Aplicar A Opcional Variant O parâmetro ApplyTo não é utilizado no Project.
Name Opcional Variant
Aplicar A Opcional Variant

Valor de retorno

Boolean

Comentários

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

Exemplo

O exemplo seguinte verifica se existe um relatório; Se for o caso, o exemplo apresenta 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.