excel - 每第n行插入19行的宏？

Question

我想每 58 行插入 19 行。这个宏插入一行，我似乎无法让它插入 19。

Sub Insert58()
    Dim rng As Range

    Set rng = Range("A3")
    While rng.Value <> ""
        rng.Offset(58).EntireRow.Insert
        Set rng = rng.Offset(59)
    Wend
End Sub

Answer 1

使用rng.Offset(58).resize(19).EntireRow.Insert