excel怎样每隔一行插入一个新行

关于excel怎样每隔一行插入一个新行的问题

在工作表的代码窗口中粘贴以下代码后关闭该窗口，然后执行该宏即可将第1至10行的每一行下面都插入一空行。如需插入更多行数，可将代码中的“10”酌情更改。
Sub caruhang()
For myh = 10 To 1 Step -1
Range(“a” & myh).Offset(1, 0).Insert
Next
End Sub