[[20190311105338]]　『2行の内どちらかにAAAが含まれていたら、隣の値を』（佐藤）　ページの最後に飛ぶ

『2行の内どちらかにAAAが含まれていたら、隣の値を返す』（佐藤）

恐らくOfsetを使用するのだろうと思いつつ、どうやって応用すればよいかわからないので教えてください。
調べ方が悪く見つけられていないだけならすみません。

A　　　B　　　　C
AAA　　あああ　あああ
あああ AAA　　　あああ
いいい AAA　　　いいい
ううう AAA　　　ううう
えええ BBB　　　えええ
AAA 　いいい　いいい
おおお AAA　　　おおお
かかか BBB　　　かかか
ききき CCC　　　ききき

A列に発地、B列に着地が記入されています。
AAAが発着地のいずれかの場合はC列に相手先を
AAAが発着地ではない場合は発地をC列に表示したいです。
マクロでこのようなことは可能でしょうか。ご教授ください。

＜使用 Excel：Excel2016、使用 OS：Windows10 ＞

 5行目とかのＢＢＢはどのように判定するんですか？
 どこかにリストか何かあるんですか？
（稲葉） 2019/03/11(月) 11:17

AAAが発着地ではない場合は発地をC列に表示したいです

この部分が実現可能でしたらBBBの判定は必要ないと思っています
（佐藤） 2019/03/11(月) 11:24

C1=IF(A1="AAA",B1,A1)
（mm） 2019/03/11(月) 11:50

 ＞AAAが発着地ではない場合は発地をC列に表示したいです。 
 ここ見落としてました。
 すみません。　mmさんの回答で事足りると思います。
（稲葉） 2019/03/11(月) 11:58

For i = 0 To DicT.Count - 1

    Ws1.Cells(2 + i, 3) =if (Cells(2+i,1)="掛川工場",Cells(2+i,2),  Cells(2+i,1))

VBAだとifが使えないので上手くいかないのでもう少し調べてみます
（佐藤） 2019/03/11(月) 12:15

 VBAの場合、IIFで調べてみてください。
（稲葉） 2019/03/11(月) 12:19

Ws1.Cells(2 + i, 3) = IIf(Cells(2 + i, 1) = "掛川工場", Cells(2 + i, 2), Cells(2 + i, 1))
これで出来ました！よく考えれば簡単なことでしたね・・・ありがとうございました

（佐藤） 2019/03/11(月) 13:02

コメント返信：