需要隔列或隔行插入空列空行的情况似乎很少见，但是今天办公室的妹子突然问起。 我说：“按住ctrl隔列或者隔行选然后插入啊。” “麻烦！”她是一脸不屑。 “首行或者首列插入数值排序啊。”我无奈。 “插入多行多列岂不是要弄很多，烦！”妹子一向是很懒的。 “好吧，写个VBA吧。”我无奈。 于是就有了下面这个VBA的诞生。
工具/原料
1
硬件：电脑
2
软件：Office Excel（这里用的是Office Excel2013版）
方法/步骤
1
先来说插入列的问题，可以看到有20列，想要隔列插入空列，即1234...变成1 2 3 4...，前两种方法给妹子鄙视了，现在就只能用VBA了。
2
打开Excel后按Alt+F11，打开VBA编辑窗口，在sheet1（sheet1）处双击以打开代码编辑窗口，然后再该窗口输入代码。
3
这个是控制插入列的代码（我在这里给加点注释，直接复制也没有关系）：Sub 插入空列()For i = 1 To 20 '20即插入20列Cells(1, 2 * i).Select '(1,2*i)即在第1行，2*i列处插入Selection.EntireColumn.Insert 'EntireColumn 列Next iEnd Sub
4
现在运行一下（看到一个绿色的小三角没有，就是它，按它）来看一下效果，可以看到1234...变成1 2 3 4...，表示可以了，如果需要插入多列的话修改一下上图用红框框注的几个值就可以了。不难，自己研究了。
5
这个是控制插入行的代码（我在这里就不加注释了）：Sub 插入空行()For i = 1 To 10Cells(2 * i, 1).SelectSelection.EntireRow.InsertNext iEnd Sub
6
现在运行一下来看一下效果，可以看到第一列的1234...变成1 2 3 4...，，如果需要插入多行的话修改一下值就可以了，这里也不多解释了。
注意事项
1
隔行插入列或行的方法不止一种，但是vba这种只需修改下值几乎通用。
2
如果要插入的不多，建议使用简介里的那两种方法
上一篇：WPS表格如何隔行插入空行
下一篇：WPS如何一键隔行插入空白行列