Slet alt på mange rækker med VBA i Excel

I denne guide viser jeg dig VBA koden til hvordan du kan slette mange rækker på én gang. Det anvendes ofte i et program, hvor du skal nulstille rækkerne for at fylde dem med data igen.
Nedenstående kode sletter alle data f.eks. fra række 8 og ned til og med række 1000.

Rows("8:1000").Clear

Hvis du vil slette rækkerne skal du i stedet anvende følgende kode:
Rows(“8:1000”).Delete
Det kan også være anvendeligt at der bare slettes ned til nederste række der er data på. Her kan det være anvendeligt  at kende nummeret på den sidste række der findes med data på. Her kan du anvende:

Range("A" & Rows.Count).End(xlUp).Row

Du kan derfor udvide ovenstående kode til:

Rows("8:" & Range("A" & Rows.Count).End(xlUp).Row).Delete

Denne kode sletter alle rækker fra række 8 og ned til den sidste række med data.