Propriedade Project.Reports (Project)

Obtém a coleção de relatórios personalizados no projeto. Relatórios Só de Leitura.

Sintaxe

expression. Reports

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

Exemplo

O objeto Relatórios é a coleção de relatórios personalizados num projeto. Não inclui os relatórios incorporados, como Descrição Geral do Projeto, Tarefas Críticas ou Relatório de Marcos. Utilize a propriedade Project.Reports para obter o objeto coleção Relatórios , tal como no exemplo seguinte:

Sub ListCustomReports()
    Dim oReport As Report
    Dim msg As String
    Dim msgBoxTitle As String
    msg = ""
    msgBoxTitle = "Custom reports in '" & ActiveProject.Name & "'"
    
    For Each oReport In ActiveProject.Reports
        msg = msg & oReport.Index & ": " & oReport.Name & vbCrLf
    Next oReport
        
    If ActiveProject.Reports.Count > 0 Then
        MsgBox Prompt:=msg, Title:=msgBoxTitle
    Else
        MsgBox Prompt:="This project contains no custom reports.", _
            Title:=msgBoxTitle
    End If
End Sub

Valor de propriedade

RELATÓRIOS

Confira também

Objeto Project

Objeto Relatórios

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.