Excel (一般機能)

Excelの一般機能に関するフォーラムです。
  • 解決済みのトピックにはコメントできません。
このトピックは解決済みです。
質問

 
(Windows 7 Home Premium : Excel 2010)
条件付き書式の設定
投稿日時: 21/09/12 00:57:27
投稿者: shimoichimabu

下記のデータで、条件付き書式を用いて、有と@〜Iの文字列を含むセルを塗りつぶしたいです。
 
有  塗りつぶし
AM@ 塗りつぶし
JJ
KK
PMA 塗りつぶし
pp
B  塗りつぶし
C0.5 塗りつぶし

D  塗りつぶし

I  塗りつぶし
 
一応、下記の数式で無理やりできたのですが、いかにも冗長です。
 
=OR(D$4="有",ISNUMBER(FIND("@",A$1))+ISNUMBER(FIND("A",A$1))+ISNUMBER(FIND("B",A$1))+ISNUMBER(FIND("C",A$1))+ISNUMBER(FIND("D",A$1))+ISNUMBER(FIND("E",A$1))+ISNUMBER(FIND("F",A$1))+ISNUMBER(FIND("G",A$1))+ISNUMBER(FIND("H",A$1))+ISNUMBER(FIND("I",A$1))=1)
 
なんか、配列式(??"@,A,B,・・・I"??、LOOKUP関数?)などを使えば、もっとスマートにできそうですか、もし、あれば御助言下さい。

回答
投稿日時: 21/09/12 08:18:31
投稿者: んなっと

=(A1="有")+SUM(1*ISNUMBER(FIND(MID("@ABCDEFGHI",ROW($1:$10),1),A1)))

投稿日時: 21/09/13 09:13:05
投稿者: shimoichimabu

んなっと さん回答ありがとうございます。。
 
早速、この式を使ってみました。
希望通りの結果でした。
ROW($1:$10)を使われ、配列式になっていました。
本当にスッキリし、スマートな式になっています。
ありがとうございました。