Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Alle Diagramme löschen

Forumthread: Alle Diagramme löschen

Alle Diagramme löschen
17.04.2002 08:11:20
Michael
Moin zusammen,

ich möchte alle Diagramme auf einem Blatt (Blattname: "Datenausgabe") löschen und habe dafür den folgenden Code vorgesehen:

Dim EingefuegtesDiagramm As ChartObject
For Each EingefuegtesDiagramm In ThisWorkbook.Worksheets("Datenausgabe").ChartObjects
EingefuegtesDiagramm.Delete
Next EingefuegtesDiagramm

Leider sind nach der Ausführung immer noch alle Diagramme da ... wo ist der Fehler?

Danke schön.
Gruß, Michael

Anzeige

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Re: Alle Diagramme löschen
17.04.2002 08:42:05
Michael
... das Problem hat sich gerade durch Worksheets("Datenausgabe").ChartObjects.Delete erledigt. Das war aber auch zu leicht!
Anzeige
;
Anzeige

Infobox / Tutorial

Alle Diagramme auf einem Blatt in Excel löschen


Schritt-für-Schritt-Anleitung

Um alle Diagramme auf einem Excel-Blatt zu löschen, kannst du die folgende einfache VBA-Methode verwenden. Diese Methode funktioniert in Excel 2016 und neueren Versionen.

  1. Öffne Excel und drücke ALT + F11, um den VBA-Editor zu starten.

  2. Füge ein neues Modul hinzu, indem du im Menü auf Einfügen und dann auf Modul klickst.

  3. Kopiere den folgenden VBA-Code in das Modul:

    Sub AlleDiagrammeLoeschen()
       Worksheets("Datenausgabe").ChartObjects.Delete
    End Sub
  4. Schließe den VBA-Editor und kehre zu Excel zurück.

  5. Führe das Makro aus, indem du ALT + F8 drückst, das Makro auswählst und auf Ausführen klickst.

Diese Methode löscht alle Diagramme auf dem angegebenen Blatt mit dem Namen "Datenausgabe".


Häufige Fehler und Lösungen

  • Diagramme bleiben bestehen: Wenn nach der Ausführung des Codes Diagramme weiterhin angezeigt werden, überprüfe den Blattnamen. Stelle sicher, dass er exakt mit "Datenausgabe" übereinstimmt, einschließlich Groß- und Kleinschreibung.

  • Fehlermeldungen: Wenn du eine Fehlermeldung erhältst, könnte es daran liegen, dass die Makros in deiner Excel-Version deaktiviert sind. Aktiviere die Makros unter Datei > Optionen > Trust Center > Einstellungen für das Trust Center > Makroeinstellungen.


Alternative Methoden

Falls du kein VBA verwenden möchtest, kannst du alle Grafiken manuell löschen:

  1. Gehe zu dem Blatt, wo die Diagramme sind.
  2. Drücke Strg + A, um alle Objekte auszuwählen.
  3. Halte die Strg-Taste gedrückt und klicke auf die Diagramme, die du nicht löschen möchtest.
  4. Drücke die Entf-Taste, um die ausgewählten Diagramme zu löschen.

Praktische Beispiele

Wenn du mehrere Blätter hast und die Diagramme auf allen Blättern löschen möchtest, kannst du den folgenden VBA-Code verwenden:

Sub AlleDiagrammeAufAllenBlaetternLoeschen()
    Dim ws As Worksheet
    For Each ws In ThisWorkbook.Worksheets
        ws.ChartObjects.Delete
    Next ws
End Sub

Dieser Code löscht alle Diagramme in allen Arbeitsblättern deiner Arbeitsmappe.


Tipps für Profis

  • Verwende die Undo-Funktion (Strg + Z), um das Löschen rückgängig zu machen, falls du versehentlich ein Diagramm entfernt hast, das du behalten möchtest.
  • Du kannst auch spezifische Diagramme löschen, indem du deren Namen oder Indizes im VBA-Code angibst.

FAQ: Häufige Fragen

1. Was passiert, wenn ich das Makro ausführe? Alle Diagramme auf dem angegebenen Arbeitsblatt werden gelöscht, und diese Aktion kann nicht rückgängig gemacht werden, es sei denn, du verwendest die Undo-Funktion.

2. Kann ich Diagramme auf mehreren Blättern gleichzeitig löschen? Ja, du kannst den bereitgestellten VBA-Code für mehrere Blätter verwenden, um alle Grafiken auf einmal zu löschen.

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige