1、打开Excel文件,设置表单控件按钮并明确要隐藏列的数据范围。

2、同时按下ALT+F11键,在VBA代码书写界面写下VBA代码,如下。

3、保存后,返回Excel SHEET表内,将表单按钮指定到宏。

4、点击按钮,直接运行宏代码,运行后的效果如下,空列被隐藏了起来。

5、对VBA代码的解释,隐藏区域内的空列。Sub 运行代艨位雅剖码()Dim Cel As RangeFor E锾攒揉敫ach Cel In Worksheets("数据").Range("A1:Z1") If Cel = "" Then Cel.EntireColumn.Hidden = True Else Cel.EntireColumn.Hidden = False End IfNextEnd Sub-------------------------------------------------------1.Sub后为宏的名称,也为指定的名称2.将Cel属性定义为范围3.在数据工作表A1:Z1范围内逐个的查找4.For next,如果单元格为空,则所在整列隐藏,如果不为空,则整列不隐藏。5.If then else end if语句6.End sub结束宏7.EntireColumn整列 EntireColumn整行 Hidden隐藏8.Then 和Else的语句必须在下一行
