如何隐藏行或列，一行VBA代码实现，Excel操作技巧

No.1

隐藏操作在Excel操作当中，在鼠标右键里有快捷方式。

使用起来比较简单。

本节将介绍如何通过vba代码实现。

因为在程序处理数据的过程中，会用到隐藏功能。

比如某些统计过程当中，有些数据不希望出现，我们可以暂时隐藏起来 。

当然了，隐藏就是不被看到，并不是删除，这一点要分清楚。

隐藏不会把数据抹掉，而是不被看到的意思。

隐藏也有反操作，取消隐藏，也是同样的代码，设置一下参数就可以。

下面介绍下隐藏的属性Hidden:

No.2

Hidden有两个参数值，一个是True，一个是False。

很明显，True表示隐藏，False表示取消隐藏。

如下代码：

Rows(3).Hidden=True'隐藏第3行

Columns('C').Hidden=True'隐藏第C列

如下示例：

示例中四个按钮，分别执行隐藏或显示年龄为空的行。

隐藏或显示选择框里的列。

其实，这个属性应用相对简单。

关键在于，程序中应用，如何选择出要隐藏的行或列。

如下代码，具体讲解：

No.3

隐藏行：

Private Sub HiddenRows()Dim R As RangeSet R = ThisWorkbook.ActiveSheet.Range('A3').CurrentRegionDim xR As RangeFor Each xR In R If xR.Column = 3 Then '判断是年龄列 If VBA.Len(xR.Value) = 0 Then xR.EntireRow.Hidden = True End If End IfNext xREnd Sub

隐藏列：

Private Sub HiddenColumns()Dim xChr As StringxChr = Me.ComboBox1.ValueThisWorkbook.ActiveSheet.Columns(xChr).Hidden = TrueEnd Sub

隐藏和显示就这样设置，很简单。

赞 (0)

相关推荐