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
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.