Hinzufügen einer Versatzzeile zu einem bestimmten Bereich. Excel VBA

Ich habe eine Variable, die am Anfang auf einen bestimmten Bereich eingestellt ist.

Ich möchte eine Schleifenanweisung haben, die die nächste Zeile ab dem Ende des angegebenen Bereichs entfernt und zu diesem Bereich hinzufügt.

dh:

myRows = Range(1:10)

    For Each cell in myRows

       If cell.Value > 2048 Then

           myRows = myRows + myRows.Offset(1, 0) ---This is where i need help---

Grundsätzlich, wie kann ich den Bereich jedes Mal, wenn die Schleife läuft, automatisch erhöhen?

Bearbeiten:

Auch wie würde ich die Vorderseite des Sortiments ergänzen. Sowie Nehmen Sie von der Rückseite des Bereichs.

dh

Bereich (1:10) ist ausgeblendet Bereich (11:20) ist ausgeblendet

Ich möchte dem nicht ausgeblendeten Bereich einen hinzufügen, der den ausgeblendeten Bereich verliert.

Bereich (1:11) ist ausgeblendet Bereich (12:20) ist ausgeblendet

Antworten auf die Frage(2)

Ihre Antwort auf die Frage