エクセルの関数・マクロについて

質問

エクセルにて
下記のような事例を、関数やマクロを使用し、
実行することが可能でしょうか？
また可能であれば方法をご教授ください！

例）セル内文字列に
1.「 送料無料 」と「 手数料無 」が含まれている場合
　　→文末に「 AA 」を表示
2.「 送料無料 」が含まれており、「 手数料有 」が含まれていない場合
　　→文末に「 Aa 」を表示
3.「 送料無料 」が含まれておらず、「 手数料有 」が含まれている場合
　　→文末に「 aA 」を表示
4.「 送料無料 」と「 手数料無 」が含まれていない場合
　　→文末に「 aa 」を表示

複数文字列の置換えなどは可能なのですが、上記の事例のように
特定の文字が含まれていれば・・・する、また含まれていなければ・・・する
などの実行方法が知りたいです。

よろしくお願いいたします。

回答No.1

aokii · ベストアンサー

A1セルに文章が有り、B1セルに、文末に指定の文字を追加して表示する場合の例ですが、全自動だと解りにくいので、1～4の条件を別々に判定した場合の例として、以下の式を使ってみてください。全自動するには、1～4の式の最後の””に次の条件式を記入します。

1.「 送料無料 」と「 手数料無 」が含まれている場合→文末に「 AA 」を表示
=IF(AND(COUNTIF($A1,"*送料無料*"),COUNTIF($A1,"*手数料無*")),$A1&"AA","")

2.「 送料無料 」が含まれており、「 手数料有 」が含まれていない場合→文末に「 Aa 」を表示
=IF(AND(COUNTIF($A1,"*送料無料*"),NOT(COUNTIF($A1,"*手数料有*"))),$A1&"Aa","")

3.「 送料無料 」が含まれておらず、「 手数料有 」が含まれている場合→文末に「 aA 」を表示
=IF(AND(NOT(COUNTIF($A1,"*送料無料*")),COUNTIF($A1,"*手数料有*")),$A1&"aA","")

4.「 送料無料 」と「 手数料無 」が含まれていない場合→文末に「 aa 」を表示
=IF(AND(NOT(COUNTIF($A1,"*送料無料*")),NOT(COUNTIF($A1,"*手数料無*"))),$A1&"aa","")

お礼

ありがとうございます！参考にさせていただきます！