Método Reports.Add (Projeto)

Adiciona um relatório personalizado à coleção Reports .

Sintaxe

mais simples. Adicionar(nome)

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

Parâmetros

Valor de retorno

Report

O objeto de relatório personalizado que é adicionado.

Comentários

O novo relatório está vazio; Ele não contém formas, como tabelas ou gráficos. Para adicionar formas ao relatório, você pode usar métodos no objeto Formas como AddChart e AddTable.

Exemplos

O exemplo a seguir adiciona um relatório vazio denominado Relatório 1 e exibe o relatório.

Sub AddReport()
    ActiveProject.Reports.Add "Report 1"
End Sub

Para excluir um relatório, você deve alterar para um modo de exibição diferente, como no exemplo a seguir:

Sub DeleteAReport()
    Dim reportName As String
    
    reportName = "Report 1"
    
    If ActiveProject.Reports.IsPresent(reportName) Then
        ' To delete the active report, change to another view.
        ViewApplyEx Name:="&Gantt Chart"
        
        ActiveProject.Reports(reportName).Delete
    Else
        MsgBox Prompt:="No report name: " & reportName, Title:="Report delete error"
    End If
End Sub

Confira também

Objeto RelatóriosFormas de Objeto de Relatório

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.