如何使用VBA在Excel中隔列变色效果

1、下面操作将演示表格实现隔列变色效果；

2、按组合按键【Alt+F11】调出VBA编辑器，插入宏取名为【隔列变色】；

3、通过循环语句依次遍历所有列（For i = 1 To Columns.Count Next)；

4、在循环体内插入语句，改变偶数列颜色（If i Mod 2 = 0 Then Columns(i).Interior.ColorIndex = 40）;

5、执行宏【隔列变化】就会得到图一效果。