如何使用VBA在Excel中制作工资条

1、为了演示方便，制作如图的表格文件，下面的操作将复制工资头到各行数据前；

3、在宏代码内输入代码获取最大行数并赋值给变量（maxRow = ActiveSheet.UsedRange.Rows.Count）；

5、在循环体插入语句，在当前数据行前插入空白行（Rows(i).Insert）；

7、在循环体插入语句，选择空白行，并将工资头粘贴到空白行中（ActiveSheet.Rows(i).Select ActiveSheet.Paste）；