Worksheets("Tabelle1").Cells.Delete
Sub CleanSheet()
Dim wks As Worksheet
Set wks = Worksheets("Tabelle1")
With wks
'Inhalte und Formate der Zellen löschen
.Cells.Clear
'Spaltenbreiten zurücksetzen
.Columns.ColumnWidth = .StandardWidth
'Zeilenhöhen zurücksetzen
.Rows.AutoFit
End With
End Sub
ThisWorkbook.Worksheets("Auswertung").Cells.Clear
ThisWorkbook.Worksheets("Auswertung").Activate
ActiveSheet.UsedRange.Clear
Um ein Excel-VBA-Tabellenblatt zurückzusetzen und alle Inhalte sowie Formatierungen zu löschen, kannst Du die folgenden Schritte befolgen:
Öffne die Excel-Datei und drücke ALT + F11, um den VBA-Editor zu öffnen.
Füge ein neues Modul hinzu:
Einfügen und wähle Modul.Gib den folgenden Code ein, um das Tabellenblatt zu leeren:
Sub CleanSheet()
Dim wks As Worksheet
Set wks = Worksheets("Tabelle1") ' Passe den Namen an
With wks
' Inhalte und Formate der Zellen löschen
.Cells.Clear
' Spaltenbreiten zurücksetzen
.Columns.ColumnWidth = .StandardWidth
' Zeilenhöhen zurücksetzen
.Rows.AutoFit
End With
End SubSchließe den VBA-Editor und gehe zurück zu Excel.
Führe das Makro aus: Gehe zu Entwicklertools > Makros, wähle CleanSheet aus und klicke auf Ausführen.
Fehler: Makro wird nicht ausgeführt
Datei > Optionen > Trust Center > Einstellungen für das Trust Center und aktiviere Makros.Fehler: Tabelle wird nicht geleert
Worksheets("Tabelle1") korrekt ist.Eine andere Methode, um ein Excel-Tabellenblatt zurückzusetzen, ist die Verwendung von ClearContents und ClearFormats:
Sub ResetSheet()
Dim wks As Worksheet
Set wks = Worksheets("Tabelle1") ' Passe den Namen an
With wks
.Cells.ClearContents ' Nur Inhalte löschen
.Cells.ClearFormats ' Nur Formatierungen löschen
End With
End SubDiese Methode ist nützlich, wenn Du nur die Inhalte oder nur die Formatierungen zurücksetzen möchtest.
Wenn Du ein zusätzliches Tabellenblatt leeren möchtest, kannst Du den folgenden Code verwenden:
Sub ClearAnotherSheet()
ThisWorkbook.Worksheets("Auswertung").Cells.Clear
End SubVerwende ActiveSheet.UsedRange.Clear, wenn Du nur den genutzten Bereich der Tabelle leeren möchtest:
Sub ClearUsedRange()
ActiveSheet.UsedRange.Clear
End SubOn Error Resume Next, um Fehler zu ignorieren und das Makro fortzusetzen, aber sei vorsichtig, da dies auch unerwünschte Nebenwirkungen haben kann.1. Wie kann ich die Zellen in Excel benennen und die Benennung rückgängig machen?
Du kannst Zellen in Excel benennen, indem Du den Namen in das Namensfeld oben links neben der Formelzeile eingibst. Um die Benennung rückgängig zu machen, gehe zu Formeln > Namens-Manager und lösche den entsprechenden Namen.
2. Gibt es einen Unterschied zwischen Clear und Delete in VBA?
Ja, Clear entfernt den Inhalt und die Formatierungen der Zellen, während Delete die Zellen selbst entfernt und die Struktur des Arbeitsblattes verändert. Verwende Clear, wenn Du das Tabellenblatt leeren, aber die Struktur beibehalten möchtest.