エクセルの関数に関する質問です。

カラムA　カラムB
300　　　C
300　　　D
300　　　C
400　　　C
400　　　C
400　　　C

上記のようにカラムAには数値が、
カラムBには英字が書かれています。
カラムBに、Dが入っていた場合、
カラムAが同じ所の全てに1と書きたいのです。
つまり、下記のようになります。

3 C 1
3 D 1
3 C 1
4 F 0
5 F 1
5 D 1
7 F 0
6 G 0
6 H 0
6 A 0
6 G 0
9 G 1
9 F 1
9 D 1

2列目がDになっていて、
1列目と3列目は、Cですが、
数値が一緒なので、1列目から3列目まで1
となっています。
1以外は0と記入してください。
Dは複数あります。
このように制御する関数を作って頂けないでしょうか。

一番良い回答にはイルカ賞を進呈させて頂きます。
よろしくお願いいたします。