Excel-Diagramme per VBA-Makro aus einer Arbeitsmappe entfernen

10. August 2011
Martin Althaus Von Martin Althaus, Excel, Office ...

Um alle Diagrammblätter aus einer Arbeitsmappe zu entfernen, setzen Sie ein VBA-Makro ein

Wollen Sie wirklich ein Diagrammblatt entfernen?

Wollen Sie wirklich ein Diagrammblatt entfernen?

Diagramme können Sie in Excel entweder als Objekte innerhalb einer Tabelle anlegen oder als eigene Blätter der Arbeitsmappe, die nur ein Diagramm enthalten. Diese Diagrammblätter löschen Sie wie gewöhnliche Tabellenblätter über die Funktion ENTFERNEN, nachdem Sie das Diagrammblatt im Blattregister mit der rechten Maustaste angeklickt haben.

Aber wie löschen Sie Diagrammblätter der Makro? Das ist dann vor allem praktisch, wenn Sie eine große Anzahl von Diagrammblättern entfernen möchten. Setzen Sie das folgende Makro ein:

Sub EntferneDiagrammblaetter()
Application.DisplayAlerts = False
ActiveWorkbook.Charts.Delete
Application.DisplayAlerts = True
End Sub

Das Makro entfernt ohne jede weitere Rückfrage alle Diagrammblätter aus der aktuellen Arbeitsmappe. Diagramme, die als Objekte in Tabellen gespeichert sind, werden in der Arbeitsmappe belassen.

Falls Sie eine Sicherheitsabfrage vor dem Löschen der Blätter auslösen möchten, entfernen Sie die beiden Zeilen aus dem Makro, die mit Application.DisplayAlerts beginnen. Dann fragt Excel vor dem Löschen der Blätter nach, ob das Entfernen wirklich gewünscht ist, wie Sie in der folgenden Abbildung erkennen können:

Wollen Sie wirklich ein Diagrammblatt entfernen?

Werden Sie mit unseren Tipps zum Excel-Profi!

Jetzt gratis per E-Mail

DDV Ehrencodex E-Mail-Marketing
  • Wir benötigen Ihre E-Mail-Adresse für die Zusendung des Newsletters.
  • Wir geben Ihre E-Mail-Adresse garantiert nicht an Dritte weiter.
  • Jederzeit abbestellbar durch einen Link im Newsletter.

Unsere Datenschutzgarantie:

Wir benötigen Ihre E-Mail-Adresse für die Zusendung des Newsletters. Wir geben Ihre E-Mail-Adresse garantiert nicht an Dritte weiter. Jederzeit abbestellbar durch einen Link im Newsletter.

Weitere Artikel zum Thema

Newsletter

Jetzt kostenlose Excel-Hilfe anfordern!

  • die besten Tipps
  • völlig kostenlos
  • jederzeit abbestellbar
DDV Ehrencodex E-Mail-Marketing
  • Wir benötigen Ihre E-Mail-Adresse für die Zusendung des Newsletters.
  • Wir geben Ihre E-Mail-Adresse garantiert nicht an Dritte weiter.
  • Jederzeit abbestellbar durch einen Link im Newsletter.

Unsere Datenschutzgarantie:

Wir benötigen Ihre E-Mail-Adresse für die Zusendung des Newsletters. Wir geben Ihre E-Mail-Adresse garantiert nicht an Dritte weiter. Jederzeit abbestellbar durch einen Link im Newsletter.

Unsere Experten

Rudolf Ring twittert für @Computerwissen

Die von Ihnen eingegebene E-Mail Adresse ist nicht korrekt. Bitte korrgieren Sie Ihre Eingabe und klicken Sie auf "OK":

Bitte wählen Sie mindestens einen Newsletter aus und klicken Sie auf "OK"