初学VBA,遇到麻烦,很简单,请各位指导下,谢谢!
我想实现隔几行插入几行空行的功能,直接如下可行:
Sub inputrows()
Range(a1:a3).Select
Selection.EntireRow.Insert
End Sub
但是想实现循环,实现动态,就不行了,问题出在行3:
行1:Sub inputrows()
行2:For i = 3 To 230 Step 4
行3:Range("a" & i&":a" & (i + 2)).Select
行4:Selection.EntireRow.Insert
行5:Next i
行6:End Sub
因初学,一直找不出原因,不知各位在初学时是否有遇到,请各位指导了,谢谢!
[解决办法]
在变量i及操作符&后加入空格,行3改为如下:
Range("a" & i & ":a" & (i + 2)).Select