Mehere Elemente automatisch auswählen

Hallo Experten,

ich bräuchte mal wieder einen Tipp von euch.

Meine Situation ist folgende:
Ich habe einige sehr lange Spalten mit Daten. Einige Zeilen (bspw. 90.000 von 150.000) sollen aussortiert werden.

Eine Abfrage die detektiert, welche Zeilen (-nummern) gelöscht werden sollen, habe ich bereits. Anschließend wird die jeweilige Zeile einzeln gelöscht.

Nun mein Problem:
Es dauert ewig jede einzelne Zeile zu löschen.

Meine Idee:
Zu löschende Zeilen auf einmal selektieren und löschen.

Ist das ein gangbarer Weg die Zeit zu verkürzen? Wenn ja, wie kann ich eine weitere Zeile selektieren, ohne die vorher selektierte Zeile zu DE-selektieren?

Danke und viele Grüße
Jaydotkay

Sub delEmptyRows()
    Dim rngCells As Range, cell As Range, rngCombined As Range, sheet As Worksheet
    Set sheet = Worksheets(1)
    Set rngCells = sheet.Range("A1", sheet.Range("A65535").End(xlUp))  
    For Each cell In rngCells
        If cell.Value = "" Then  
            If rngCombined Is Nothing Then
                Set rngCombined = cell.EntireRow
            End If
            Set rngCombined = Union(rngCombined, cell.EntireRow)
        End If
    Next
    If Not rngCombined Is Nothing Then
        rngCombined.Delete
    End If
End Sub