如何使用VBA在Excel中逐列插入空白栏

1、打开一个演示表格，下面操作将会在每列后面插入空白栏；

3、定义变量保存最大列数（maxcol = ActiveSheet.UsedRange.Columns.Count）；

5、在循环体内插入动态移动语句（Columns(i).Insert xlShiftToRight, xlFormatFromRightOrBelow）；