根据单元格值隐藏/取消隐藏行

根据单元格值隐藏/取消隐藏行

根据单元格值 = true 或 false,我有条件地将行格式化为黑色。这意味着我需要向下滚动才能找到未变黑的行集。我希望所有包含数据的行都保持未展开并保持隐藏,并且仅在单元格值 = true 时展开。有没有办法取消隐藏少数行,在单元格值 = true 时选择行,并在单元格值 = false 时压缩/隐藏 - 而无需使用宏;或者如果需要,可以使用任何宏代码建议。这将放弃滚动。

答案1

需要宏。代码写起来并不难。

编辑#1

这是一个小示例宏。它假设列AA1通过A100包含 True 或 False。如果值为 False,则隐藏该行,否则使该行可见:

Sub HideOrShowRows()
    Dim A As Range
    Set A = Range("A1:A100")
    A.EntireRow.Hidden = False
    For i = 1 To 100
        If Cells(i, 1).Value <> "" And Cells(i, 1).Value = False Then
            Cells(i, 1).EntireRow.Hidden = True
        End If
    Next i
End Sub

相关内容