Método Reports.Add (Project)

Agrega un informe personalizado a la colección Reports .

Sintaxis

expresión. Add(Name)

expresión Variable que representa un objeto "Reports".

Parameters

Nombre	Obligatorio/opcional	Tipo de datos	Descripción
Name	Obligatorio	String	Nombre del informe.
Name	Obligatorio	String

Valor devuelto

Report

Objeto de informe personalizado que se agrega.

Observaciones

El nuevo informe está vacío; no contiene ninguna forma, como tablas o gráficos. Para agregar formas al informe, puede usar métodos en el objeto Shapes , como AddChart y AddTable.

Ejemplos

En el ejemplo siguiente se agrega un informe vacío denominado Informe 1 y se muestra el informe.

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

Para eliminar un informe, debe cambiar a una vista diferente, como en el ejemplo siguiente:

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

Vea también

Formas de objeto de informe deobjetos de informes de informes

Soporte técnico y comentarios

¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.