首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > 开发语言 > VBA >

初学VBA,遇到麻烦,很简单,请各位指导下,多谢

2012-02-16 
初学VBA,遇到麻烦,很简单,请各位指导下,谢谢!我想实现隔几行插入几行空行的功能,直接如下可行:Sub inputro

初学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

热点排行