答案1
试试这个代码。它将循环遍历 A2:A25(如果该范围可以更改,请告诉我,我可以使其更灵活),并隐藏该范围内任何空单元格的行。据我所知,没有一种简单的方法可以隐藏单个单元格,这对我来说没有意义。如果您有一个数据表,则至少在视觉上,没有任何东西与它应该出现的行重合。
Sub Hide_Rows()
Dim i As Integer
For i = 25 To 2 Step -1
If Range("A" & i) = "" Then
Rows(i).Hidden = True
End If
Next i
End Sub
答案2
例如,您可以使用特殊单元格。
Sub Button1_Click()
Range("A2:A25").SpecialCells(xlCellTypeBlanks).EntireRow.Hidden = True
End Sub
您可以隐藏整行,但不能仅隐藏某一列中的一个单元格。