Método Application.ReportPrint (Project)
Obsoleto no Project. Imprime um relatório.
Sintaxe
expression. ReportPrint( _Name_, _FromPage_, _ToPage_, _PageBreaks_, _Draft_, _Copies_, _FromDate_, _ToDate_, _Preview_, _Color_ )
expressão Uma variável que representa um Aplicativo objeto.
Parâmetros
| Nome | Obrigatório/Opcional | Tipo de dados | Descrição |
|---|---|---|---|
| Name | Opcional | String | O nome do relatório a ser impresso. |
| Frompage | Opcional | Integer | Um número que especifica a primeira página a ser impressa. |
| Topage | Opcional | Integer | Um número que especifica a última página a ser impressa. |
| PageBreaks | Opcional | Boolean | True se Project usa quebras de página manuais ao imprimir. O valor padrão é True. |
| Draft | Opcional | Boolean | True se Project imprime o relatório no modo de rascunho. O valor padrão é False. |
| Copies | Opcional | Integer | Um número que especifica o número de cópias a serem impressas. O valor padrão é 1. |
| FromDate | Opcional | Variant | Um número ou sequência de caracteres que especifica a primeira data a ser impressa. O valor padrão é a data de início do projeto. |
| ToDate | Opcional | Variant | Um número ou sequência de caracteres que especifica a última data a ser impressa. O valor padrão é a data de término do projeto. |
| Preview | Opcional | Boolean | True se Project permite a visualização do modo de exibição ativo em vez de imprimi-lo. O valor padrão é False. |
| Color | Opcional | Boolean | True se Project imprime o relatório em cores. O valor padrão é False. |
Valor de retorno
Boolean
Comentários
No Project, o método ReportPrint retorna o erro 1100, "o método não está disponível nesta situação". Em Project, usando o método ReportPrint sem argumentos exibe a caixa de diálogo Relatórios personalizados.
Exemplo
O exemplo a seguir cria um projeto consolidado, imprime um relatório e fecha o projeto consolidado sem salvá-lo.
Sub ConsolidatedReport()
ConsolidateProjects Filenames:="project1.mpp" & ListSeparator & "project2.mpp"
ReportPrint Name:="Project Summary"
FileClose Save:=pjDoNotSave
End Sub
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.