entirecolumn
在excel2007中制作报表时,经常会产生一些空白列,有什么方法能够将其隐藏起来吗?下面随seo实验室小编一起来看看吧。
excel2007隐藏空白列的步骤
打开Excel文件,设置表单控件按钮并明确要隐藏列的数据范围。
同时按下ALT+F11键,在VBA代码书写界面写下VBA代码,如下。
保存后,返回Excel SHEET表内,将表单按钮指定到宏。
点击按钮,直接运行宏代码,运行后的效果如下,空列被隐藏了起来。
对VBA代码的解释,隐藏区域内的空列。
Sub 运行代码()
Dim Cel As Range
For Each Cel In Worksheets("数据").Range("A1:Z1")
If Cel = "" Then
Cel.EntireColumn.hidden = True
Else
Cel.EntireColumn.Hidden = False
End If
Next
End 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的语句必须在下一行
Excel2007隐藏空白列相关文章:
1.Excel2007怎么隐藏无数据的空列
2.excel2007隐藏数据列的方法
3.Excel2007行与列如何隐藏