So Entfernen Sie Die Vba-Zeile

Inhaltsverzeichnis:

So Entfernen Sie Die Vba-Zeile
So Entfernen Sie Die Vba-Zeile

Video: So Entfernen Sie Die Vba-Zeile

Video: So Entfernen Sie Die Vba-Zeile
Video: 0005. Excel VBA: Doppelte Zeilen entfernen 2024, Kann
Anonim

Das Löschen einer VBA-Zeile ist ein Standardverfahren und wird häufig von Entwicklern verwendet. Für weniger erfahrene Benutzer kann dieser Vorgang jedoch einige Schwierigkeiten bereiten.

So entfernen Sie die vba-Zeile
So entfernen Sie die vba-Zeile

Anweisungen

Schritt 1

Stellen Sie sicher, dass Sie die Syntax für den Befehl delete line verstehen, indem Sie den Befehl Delete verwenden. Für die Zeile, die die aktive Zelle enthält, sieht der Befehl also wie ActiveCell. EntireRow. Delete aus, und die Notwendigkeit, eine Reihe von Zeilen zu löschen, ändert ihn in Zeilen ("first_line_number: last_line_number"). Löschen (für Excel).

Schritt 2

Verwenden Sie eine ähnliche Syntax für den Befehl zum Löschen ausgewählter Zeilen in VBA, jedoch mit erweiterten Optionen. Definieren Sie dazu zunächst die gewünschte Aktion: Private Sub Zeile löschen_Klick () Geben Sie die gewünschte Anwendung Dim ea As Excel. Application an und wählen Sie die gewünschte Arbeitsmappe Dim ewb As Excel. Workbook aus. Geben Sie dann die zu bearbeitende Seite des Dim ews As Excel. Worksheet-Dokuments an.

Schritt 3

Überspringen Sie eine Zeile und geben Sie Set XLAp = CreateObject (Class: = "Excel. Application") ein. Legen Sie die genaue Platzierung in der folgenden Zeile fest: Set XLWb = XLAp. Workbooks. Öffnen ("drive_name: 1.xls") Verwenden Sie den folgenden Wert: Set XLWs = XLWb. ActiveSheet.

Schritt 4

Überspringen Sie eine weitere Zeile und geben Sie den Wert des ausgewählten Jobs ein: XLWs. Rows (1). Löschen Speichern Sie das bearbeitete Dokument: XLWb. Save. Beenden Sie die Open-Source-Anwendung: XLAp. Quit.

Schritt 5

Überspringen Sie die nächste Zeile und ersetzen Sie die Variablen durch Speicherobjekte: Set XLWs = Nothing Wiederholen Sie den gleichen Befehl für jede geöffnete Variable: Set XLWb = Nothing und zuletzt die letzte: Set XLAp = Nothing Beenden Sie den Befehl mit dem Standard-End Sub.

Schritt 6

Verwenden Sie Makros, um komplexere Operationen durchzuführen, um unnötige Zeilen in einem Dokument zu löschen. Erstellen Sie dazu eine neue Excel-Arbeitsmappe und geben Sie die erforderlichen Werte ein. Öffnen Sie das Menü "Service" der oberen Symbolleiste des Programmfensters und wählen Sie den Punkt "Makro". Wählen Sie den Unterpunkt "Visual Basic Editor" und erweitern Sie das Menü "Einfügen". Wählen Sie den Punkt "Modul" und fügen Sie das erstellte Dokument ein. Kehren Sie zum Menü "Extras" zurück und gehen Sie erneut zum Punkt "Makro". Verwenden Sie den Unterpunkt "Makros" und geben Sie das neu erstellte an. Führen Sie das Makro aus, indem Sie auf die Schaltfläche Ausführen klicken.

Empfohlen: