Sub 行を削除する()

Rows(1).Delete

Rows("2:3").Delete '複数行は"で囲む

End Sub

注意点は、行削除の後は全行が一行上がるため、1行と2行3行を削除しても2と5が残ります。 そのため、行削除処理をする際は、For i = 1 to 5 step -1 などを使い、下から削除するのが定石です。