vba不重复且不并列排名如何实现？

假如如图一共17列B：R数据，要在T：AJ得出B：R各自在这个区域如图T3：AJ3这样的排名结果，用VBA怎么写代码？

就没有人能回答一下吗？