Table of contents
TOC
Réduire la table des matières
Développer la table des matières

Chart.Delete, méthode (projet)Chart.Delete Method (Project)

office 365 dev account|Dernière mise à jour: 14/03/2018
|
2 Collaborateurs

Supprime un graphique dans un état actif.Deletes a chart on an active report.

SyntaxeSyntax

expression. Supprimerexpression. Delete

expression Variable qui représente un objet graphique .expression A variable that represents a Chart object.

Valeur renvoyéeReturn value

VarianteVariant

ExempleExample

L’exemple suivant affiche un rapport et supprime tous les graphiques dans l’état.The following example displays a report, and then deletes all charts on the report.

Sub DeleteCharts()
    Dim chartReport As Report
    Dim chartShape As Shape
    Dim reportName As String

    ' Display a report.
    reportName = "Chart Report 1"
    Set chartReport = ActiveProject.Reports(reportName)
    chartReport.Apply

    ' Delete every chart on the report.
    For Each chartShape In chartReport.Shapes
        If chartShape.Type = msoChart Then
            Debug.Print "Deleting chart: '" &; chartShape.Name _
                &; "' from report: " &; reportName
            chartShape.Delete
        End If
    Next chartShape
End Sub

Voir aussiSee also

Autres ressourcesOther resources

Chart, objetReport.Delete méthodeChart ObjectReport.Delete Method

© 2018 Microsoft