如何在excel中仅选择隐藏的单元格?

时间:2017-03-13 14:50:38

标签: excel-vba vba excel

我创建了一个代码,使用 .hidden = True 来隐藏一些行,我不需要显示它们来进行一些检查,但是之后我想再次显示所有数据,所以我做了这个代码:

Sub show_hidden_cells()
Dim line As Range
Dim rng As Range
Set rng = Range("Tb_Data[Date]")

For Each line In rng
    If line.SpecialCells(xlCellTypeVisible) = False Then
        line.EntireRow.Hidden = False
    End If
Next line
End Sub

我的数据有50.000行,我的电脑不是很快,所以我不想检查每个单元格是否可见,而不是我只想选择隐藏的单元格。

EDIT。 感谢@Rory和@Flephal帮助我的代码现在是:

Sub show_hidden_cells()
Dim rng As Range
Set rng = Range("Tb_Data[Date]")
rng.EntireRow = False
End Sub

0 个答案:

没有答案