excel - Excel VBA 仅显示范围内具有空白单元格的行

Question

我有一个我已经建立的 excel 工作簿，我正在努力改进它。我有显示特定数据的自定义视图。我需要工作表来查看 n-x 列，并且只显示具有空白单元格的行。

我已经尝试过使用 chkcol 数组的开始行、结束行，但这不起作用。

对于我对 nx 列的特定视图，如果所有单元格都已填写，我不需要再看到它，所以我希望它隐藏在该视图中。

标签： excelvba

Answer 1

我不知道你在做什么行，但这将完成你所有的使用范围。我没有测试它。

Sub SubName()

Dim aCell As Range, WS As Worksheet
    Set WS = ActiveSheet

    For Each aCell In Intersect(WS.UsedRange, WS.Range("n:n")).Cells
        If Application.WorksheetFunction.CountBlank(Intersect(WS.Range("N:X"), aCell.EntireRow)) = 0 Then
            aCell.EntireRow.Hidden = True
        Else
            aCell.EntireRow.Hidden = False
        End If
    Next aCell

End Sub