更新时间2019-04-20 17:21:53
Sub 插入空行() For i = 1 To 10 Rows((i * 3) & ":" & (i * 3 + 1)).Select Selection.Insert Shift:=xlDown Next iEnd Sub
就你写的这插入空行,Selection.Insert Shift:=xlDown这语句用法不是很明白, 能分别再帮解答一下吗,谢谢了。
Rows((i * 3) & ":" & (i * 3 + 1)).Select - 选择了两行;
Selection.Insert Shift:=xlDown - 在选定Selection处[向下xlDown]插入Insert,插入的行数即为上一语句选定的"两行";