列中的RANK表示行数未知

Question

我刚开始使用VBA编程。 我想问你如何添加一个排名函数来计算整列数据的排名。 我在B列中有数据，我想在A列中对其进行排名。

现在我可以为1行（A2）做到这一点，但我希望宏继续，直到B列中有一个空行，我不想在查询中键入严格的范围，因为有可能，更多将来会添加行。

拜托，你能帮助我吗？ 你是最棒的！提前谢谢

Answer 1

考虑：

Sub dural()
  Dim N As Long
  N = Cells(Rows.Count, "B").End(xlUp).Row
  Range("A2:A" & N).Formula = "=rank(B2,B$2:B" & N & ")"
End Sub