Chart.Delete-Methode (Project)
Löscht ein Diagramm in einem aktiven Bericht.
Syntax
Ausdruck. Löschen
Ausdruck: Eine Variable, die ein Chart-Objekt darstellt.
Rückgabewert
Variant
Beispiel
Das folgende Beispiel zeigt einen Bericht an und löscht dann alle Diagramme im Bericht.
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
Siehe auch
Chart-ObjektReport.Delete-Methode
Support und Feedback
Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.
Feedback
https://aka.ms/ContentUserFeedback.
Bald verfügbar: Im Laufe des Jahres 2024 werden wir GitHub-Issues stufenweise als Feedbackmechanismus für Inhalte abbauen und durch ein neues Feedbacksystem ersetzen. Weitere Informationen finden Sie unterFeedback senden und anzeigen für