In Microsoft Excel können Sie ein Arbeitsblatt zu entfernen mit der rechten Maustaste auf das Register und wählen Sie " Löschen" aus dem Kontextmenü. Ein kleines Fenster werden Sie aufgefordert, den Vorgang zu bestätigen . Dies verhindert das versehentliche Löschungen . Wenn man durch die Sicherheitsabfrage kann lästig sein , aber wenn Sie versuchen, viele Blätter zu entfernen . Glücklicherweise können Sie auch Löschen von Arbeitsblättern mit VBA . Excel VBA kommt mit einem " Platten "-Funktion , die Sie verwenden können, um zu erstellen , umbenennen, verschieben und löschen Arbeitsblätter . Mit ein paar mehr Zeilen Code , können Sie umgehen die Bestätigung Fenster und entfernen Sie Arbeitsblätter schneller. Anleitung
1
Starten Sie Microsoft Excel. Drücken Sie "Strg" plus " O ", wählen Sie Ihre Arbeitsmappe aus der Liste aus und klicken Sie auf " Öffnen".
2
Presse "Alt" Stecker "F8 ", um die "Makros " Fenster zu öffnen. Geben Sie " RemoveSheets " im " Macro Name " ein und klicken Sie auf " Erstellen". Dies öffnet den Visual Basic-Editor (VBE ) .
3
Geben Sie folgenden Code in der VBE .
Sub RemoveSheets ()
wSheets = Array ( " SHEET1 ", " Tabelle2 ", " Tabelle3 " )
Application.DisplayAlerts = False
Für n = 0 To UBound ( wSheets )
On Error Resume Next
Sheets ( wSheets ( n)). löschen
Next n
Application.DisplayAlerts = True End Sub
4
Ersetzen Sie " Tabelle1 ", " Tabelle2 " und " Tabelle3 " mit den Namen der Arbeitsblätter , die Sie löschen möchten . Um einen anderen Namen zur Liste hinzuzufügen , geben Sie ein Komma und fügen Sie den Namen des Blattes vor der schließenden Klammer der Array -Funktion. Achten Sie darauf, ihn in Anführungszeichen setzen .
5
Presse "Alt" plus " Q ", um den VBE schließen.
6
Presse "Alt" plus " F8 ", um öffnen Sie die " Makros" Fenster wieder . Wählen Sie " RemoveSheets " aus der Liste , klicken Sie dann auf "Ausführen".