excel - 隐藏空行的更快方法

Question

我试图隐藏 A 列中单元格值为空白(即空)的所有行。我试图使用以下代码:

Range("A7:A117").SpecialCells(xlCellTypeBlanks).EntireRow.Hidden = True

但是，A 列中的每个单元格都有一个 VLOOKUP公式和 xlCellTypeBlanks认为具有公式但没有值的单元格不为空白。

所以我尝试使用以下代码，但它非常慢。

For i = 17 To 117
  If ActiveSheet.Cells(i, 1) = "" Then
    ActiveSheet.Cells(i, 1).EntireRow.Hidden = True
End If

我该如何加快速度？

Answer 1

你为什么不试试 AutoFilter:

Range("A7:A117").AutoFilter 1, "<>", , , False