vba - 如何遍历数据透视表中的每一列并识别表中的前 2-3 个数字？

Question

我有一个工作表，我想突出显示每列中的前两个数值。

我在想这样的事情

Sub like_this()

   Dim rng As Range

   For Each rng In Range(1, Columns.Count).End(xlToLeft).Column

        'highlight top two values in yellow 

   Next rng

End Sub

我将如何遍历这两列中的单元格以找到前两个值？我知道条件格式可以做到这一点，但是当我有数百个列时，我没有时间为每个列中的前 2 个单独的语句，这就是我建议使用 VBA 循环的原因。

标签： vba

Answer 1

尼克，我认为您可以使用条件格式来完成此操作。选择整个表格（不是标题），然后使用下面屏幕截图中的公式。在您的选择中设置左上角单元格的公式（在我的屏幕截图中为单元格 A1）。

然后，当然，将其设置为将填充格式化为黄色。