如何使用VBA删除表格中所有空白列呢？下面我来操作演示一下，希望对大家有用！
工具/原料
联想ThinkPadX13
Windows7或10
Excel2016
方法/步骤
1、如图表格中带有很多空白列，下面操作将使用VBA代码删除；
2、按组合按键【Alt+F11】调出VBA编辑器，插入宏取名为【删除所有空白列】；
3、在模块中插入代码获取最大使用列数（maxcol=ActiveSheet.Use蟠校盯昂dRange.Columns.Count）；
4、通过循环语句依次从尾部遍历列（Fori=maxcolTo1Step-1Next)；
5、在循环中插入语句，逐行判断列是否为空白，如果是就删除该行（IfWorksheet掂迎豢畦Function.CountA(Columns(i))=扉钛笆哇0ThenColumns(i).Delete），然后执行宏命令即可。
