Zum Hauptinhalt springen

Wie lösche ich ein Arbeitsblatt in VBA Excel mit Namen ohne Bestätigung

Das Löschen eines Arbeitsblatts in Excel VBA mit Namen ohne Bestätigung ist eine nützliche Operation, mit der Sie ein bestimmtes Arbeitsblatt in einer Excel-Tabelle mithilfe von VBA-Makros löschen können, ohne dass Sie das Löschen bestätigen müssen. Dies kann sehr nützlich sein, wenn Sie den Löschvorgang von Arbeitsblättern in Ihrer Excel-Tabelle automatisieren möchten.

Wenn Sie ein Arbeitsblatt in Excel löschen, wird standardmäßig ein Dialogfeld angezeigt, in dem Sie aufgefordert werden, das Löschen zu bestätigen. Mit VBA können Sie dieses Fenster jedoch umgehen und das Arbeitsblatt ohne Bestätigung mit dem Namen löschen. Dazu müssen Sie speziellen VBA-Code verwenden, der die Deinstallation ohne weitere Fragen durchführt.

Beachten Sie, dass das Löschen eines Blattes mit Namen ohne Bestätigung gefährlich sein kann, da das Blatt unwiederbringlich gelöscht wird. Daher wird empfohlen, eine Kopie Ihrer Excel-Tabelle zu speichern, bevor Sie diese Funktion verwenden.

Wie lösche ich ein Arbeitsblatt in VBA Excel

In VBA (Visual Basic for Applications) müssen Sie den folgenden Code verwenden, um ein Arbeitsblatt in Excel mit Namen ohne Bestätigung zu löschen:

Sub УдалитьЛист()Dim Лист As Worksheet' Указываем имя листа, который нужно удалитьSet Лист = Worksheets("ИмяЛиста")' Удаляем лист без подтвержденияApplication.DisplayAlerts = FalseЛист.DeleteApplication.DisplayAlerts = TrueEnd Sub

In diesem Code wird eine Prozedur (Sub) mit dem Namen "Liste löschen" erstellt. Innerhalb der Prozedur wird eine Arbeitsblattvariable vom Typ Worksheet deklariert, die einen Verweis auf das zu löschende Arbeitsblatt enthält. Verwenden Sie dann die Worksheets-Eigenschaft ("Name"), um den Namen des zu löschenden Arbeitsblatts anzugeben und der Arbeitsblattvariablen zuzuweisen.

Anschließend wird das Arbeitsblatt mit der Delete-Methode des Arbeitsblattobjekts ohne Bestätigung gelöscht. Legen Sie die DisplayAlerts-Eigenschaft vor dem Löschen auf "False" fest, um die Anzeige möglicher Warnungen oder Bestätigungsmeldungen zum Löschen des Blatts zu deaktivieren. Nach dem Löschen des Arbeitsblatts wird der Wert der DisplayAlerts-Eigenschaft auf den ursprünglichen Status "True" zurückgesetzt.

Wenn Sie diesen Code verwenden, wird das zu löschende Arbeitsblatt ohne zusätzliche Bestätigungen oder Warnungen gelöscht, wodurch das Löschen des Arbeitsblatts in VBA Excel vereinfacht wird.

Methoden zum Entfernen eines Blatts

Es gibt mehrere Methoden zum Löschen eines Arbeitsblatts in VBA Excel, ohne die Aktion zu bestätigen. Sie alle ermöglichen es Ihnen, ein Blatt nach seinem Namen zu löschen.

1. Delete-Methode

Der einfachste Weg, ein Blatt zu löschen, ist die Verwendung der Methode Delete. Diese Methode löscht das Arbeitsblatt, ohne die Aktion zu bestätigen, und verschiebt den Zeiger auf das benachbarte Arbeitsblatt.

Worksheets("Имя листа").Delete

2. Move-Methode

Wenn Sie die Arbeitsblattdaten speichern oder vor dem Löschen an eine andere Position verschieben möchten, können Sie die Methode verwenden Move. Diese Methode verschiebt das Blatt an die angegebene Position oder an die Stelle eines anderen Blatts und löscht es dann, ohne die Aktion zu bestätigen.

Worksheets("Имя листа").Move Before:=Worksheets("Другой лист")

3. Visible-Eigenschaft

Eine alternative Möglichkeit, ein Blatt zu löschen, besteht darin, es von der Seite der Arbeitsmappe auszublenden. Sie können dies tun, indem Sie den Wert der Eigenschaft ändern Visible blatt pro Wert xlSheetVeryHidden. Nachdem Sie das Blatt ausgeblendet haben, können Sie das Blatt mit der Methode löschen Delete.

Worksheets("Имя листа").Visible = xlSheetVeryHiddenWorksheets("Имя листа").Delete

Das Löschen eines Arbeitsblatts mit diesen Methoden erfolgt ohne Bestätigung und wirkt sich nicht auf die übrigen Arbeitsblätter in der Arbeitsmappe aus.

So löschen Sie ein Blatt nach Namen

In VBA Excel können Sie ein Arbeitsblatt mit seinem Namen löschen, ohne dass eine Bestätigung erforderlich ist. Dazu können Sie den folgenden Code verwenden:

Sub УдалитьЛистПоИмени(ByVal ИмяЛиста As String)Dim Лист As WorksheetFor Each Лист In WorksheetsIf Лист.Name = ИмяЛиста ThenApplication.DisplayAlerts = FalseЛист.DeleteApplication.DisplayAlerts = TrueExit ForEnd IfNext ЛистEnd Sub

Dieser Code durchläuft alle Arbeitsblätter in der Arbeitsmappe und vergleicht jeden Arbeitsblattnamen mit dem angegebenen Namen. Wenn der Name übereinstimmt, wird die Delete-Methode verwendet, um das Blatt zu löschen. Die Variable Application.DisplayAlerts wird verwendet, um die Bestätigung zum Löschen eines Blatts zu deaktivieren.

УдалитьЛистПоИмени "Лист1"

In diesem Beispiel wird ein Blatt mit dem Namen "Tabelle1" ohne Bestätigung gelöscht.