Método Report.Delete (Project)

Elimina el informe.

Sintaxis

expresión. Borrar

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

Valor devuelto

Nothing

Ejemplo

En el ejemplo siguiente se determina si existe un informe denominado Informe 1 y, si es así, se elimina el informe. Si el informe está activo, cambie a otra vista antes de eliminarlo; De lo contrario, Project muestra el error en tiempo de ejecución 1004: La tabla "Informe 1" está en uso y no se puede copiar ni eliminar.

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

Objeto Report

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.