ある列のセルに特定の文字が入っていたら他のセルに決まった文字を入れる

マクロか関数である列のセルに特定の文字が入っていたら他のセルに決まった文字を入れるということをしたいのですができるでしょうか。具体的にいうと下の表でA列の項目に①宿泊費が入っていたらB列の備考欄にA②車両費はB③人件費はC,それ(①～③)以外はなにの文字が入っていてもDというふうにしたいのです。
よろしくお願いいたします。

No.2 ベストアンサー 回答者： tom04 回答日時： 2015/03/07 12:28

こんにちは！

A列2行目からデータがあるとします。
今回の場合は3条件だけ（他の場合は「D」を表示）というコトですので
B2セルに
=IF(A2="","",IFERROR(INDEX({"A","B","C"},MATCH(A2,{"宿泊費","車両費","人件費"},0)),"D"))
という数式を入れフィルハンドルで下へコピー！
これで大丈夫だと思います。

※　条件が多い場合は↓の画像のように別Sheetに対応表を作成しておくのが簡単だと思います。
Sheet1のB2セルに
=IF(A2="","",IF(COUNTIF(Sheet2!A:A,A2),VLOOKUP(A2,Sheet2!A:B,2,0),"D"))
という数式を入れフィルハンドルで下へコピー！
これで条件がいくら増えても対応できると思います。m(_ _)m

この回答へのお礼

早速の対応ありがとうございます。
出来ました。助かりました。

お礼日時：2015/03/07 13:12

No.1 回答者： ヘナ吉 回答日時： 2015/03/07 12:20

リストを別の場所に作っておき

VLOOKUPを使う
https://support.microsoft.com/kb/952197/ja

リストなど作りたくない場合は
CHOOSEを使う
http://exinfo.biz/func/func_choose.shtml

個人的にはA列の「測量費」なども直接入力するのではなく、コードなどを入力して表示させるようにすれば、「測量日」などの誤入力も防げますし、備考も一度に表示されるようにできますから、VLOOKUP関数をおすすめします。

この回答へのお礼

早速の対応ありがとうございます。
参考になりました。

お礼日時：2015/03/07 13:14