エクセル 一連のデータを任意の範囲で順位付けしたい

質問

エクセルで、一つの列に並べられたデータを、任意の範囲で順位付けがしたいです。
具体的に説明します。
下記の表のように、Ａ列に任意の文字、Ｂ列に数字があります。
A列　　 Ｂ列
AAA　　 15
AAA　　 19
BBB　　 3
BBB　　 8
BBB　　 9
BBB　　 4
BBB　　 1
DDD　　 20
DDD　　 21
DDD　　 19
この中で、Ａ列の文字が同じものについて、Ｂ列の数字の順位をＣ列に表現したいです。理想の結果としては、下記の表になります。
ランク関数を使えばよいのは分かりますが、任意の範囲を指定する方法が分からなく、かつデータ量が膨大（１００００行程度）であるため、悩んでいます。よろしくお願いします！
A列　　 Ｂ列　　 Ｃ列
AAA　　 15　　 2
AAA　　 19　　 1
BBB　　 3　　　 4
BBB　　 8　　 　 2
BBB　　 9　　 　 1
BBB　　 4　　 　 3
BBB　　 1　　 　 5
DDD　　 20　　 2
DDD　　 21　　 1
DDD　　 19　　 3

回答No.2

KURUMITO · ベストアンサー

シート1に元のデータがあるとして作業列としてＤ1セルには次の式を入力して下方にオートフィルドラッグします。なお、Ａ列では並び替えが行われておりお示しのように同じデータは連続した行に並んでいるとします。

=IF(A1="","",RANK(B1,INDIRECT("B"&MATCH(A1,A:A,0)&":B"&MATCH(A1,A:A,0)+COUNTIF(A:A,A1)-1)))

シート2のＡ1セルには次の式を入力します。

=IF(Sheet1!A1="","",Sheet1!A1)

Ｂ1セルには次の式を入力します。

=IF(A1="","",Sheet1!D1)

Ａ1セルとＢ1セルを選択してからそれらの式を下方にオートフィルドラッグします。

答えはすでにシート1に表示されていますが、単にシート2にその答えを貼り付けただけです。

お礼

おかげで問題が解決しました！！
大変ありがとうございました！！

回答No.1

edomin7777

=SUMPRODUCT(($A$1:$A$10=A1)*($B$1:$B$10>B1))+1

こんな感じでしょうか？

今はA1からB10までなので、適宜範囲を広げて下にコピーしてください。

お礼

おかげで問題が解決しました！！
大変ありがとうございました！！