这篇文章用于将录制的宏记录下来，以便自己学习vba和查找以前的宏
1.插入新的空白列
这里我选择了在第 J 列上右键选择插入列，插入后，新的列成为第 J 列
如下图：
Sub 插入新的一列()
‘
‘ 插入新的一列 宏
‘ 用于记录插入新一列的宏
‘
‘
Columns("J:J").Select
Selection.Insert Shift:=xlToRight, CopyOrigin:=xlFormatFromLeftOrAbove
‘ 到这里插入已经结束了
‘ 接下来的三行，操作为：选择J1单元格，输入字符串“测试”，再选择J2单元格，结束
Range("J1").Select
ActiveCell.FormulaR1C1 = "测试"
Range("J2").Select
End Sub
原文：http://www.cnblogs.com/luruiyuan/p/5931210.html