代码之家  ›  专栏  ›  技术社区  ›  Elizabeth

MS Excel中按颜色的垂直过滤器

  •  0
  • Elizabeth  · 技术社区  · 6 年前

    有没有办法(不是隐藏)而是过滤excel中的列而不是行。

    enter image description here

    这是一个数据样本,它将继续。我需要能够说只过滤红色列-只显示红色列(也可能是绿色)来告诉我哪些数据需要在代码中修复以及数据是什么。

    隐藏和取消隐藏和转置需要时间和精力,有太多的工作,我不想花时间做。我需要能够打开它并迅速关闭过滤器,以确认如何更新其他值。

    我并不反对使用VBA或代码,但我需要这两种状态之间的快速过渡。

    1 回复  |  直到 6 年前
        1
  •  0
  •   datatoo    6 年前

    如果列的着色方式不变,请浏览自定义视图。

    这可能不是您想要的,但会隐藏颜色与活动单元格不匹配的每一列。再跑一次就会把一切都藏起来。如果您愿意,可以将列的范围调整为包含性较小的范围

    Dim rng As Range
    Dim color As String
    color = ActiveCell.Interior.color
     For Each rng In Range("A:IV").Columns
      If rng.Interior.color <> color And rng.EntireColumn.Hidden = False Then rng.EntireColumn.Hidden = True Else rng.EntireColumn.Hidden = False
     Next rng