Excel Maniacs

関数で出来ますか～？ 第１５問 A⇔200 解答例

解答式
■関数のみ（エラー表示）の６７文字
=VLOOKUP(B5,{"B",100;"A",200;"AB",300;100,"B";200,"A";300,"AB"},2,)

■条件付書式は使用し、表示形式は使用しない場合
６４文字
=IF(B5>"",MATCH(B5,{"b","a","ab"})*100,MID("ABB",3/B5%,B5%/3+1))
５４文字
=IF(B5＞"",SEARCH(B5,"BAAB")/1%,TEXT(B5%-2,"A!B;!B;A"))

■条件付書式と表示形式を使用、見た目重視の３６文字
=IF(N(B5),B5%-2,SEARCH(B5,"BAAB")&0)

+++ 書式の設定 +++++++++++++++++++++++++++++++++
基本のセル書式でフォントカラーを白にしておき
-----------------------------------------------
＜条件付書式＞
数式が：=IF(B5＞"",SEARCH(B5,"AB　"&B5)＜3,LEN(B5%)*B5%＜4)
でフォントカラーを黒に設定
-----------------------------------------------
＜表示形式＞
ユーザー定義：　"AB";"B";"A";@!0
++++++++++++++++++++++++++++++++++++++++++++++++


その他、色々あると思いますが、個人的にはCODE関数使った解答が
ウマくできなかったので、出てきたらいいなぁーと思っていますｄ

　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　（む印さん談）

関数で出来ますか～？ 第15問 A⇔200

今回の出題者はむ印さんです。　お題は「A⇔200」・・・・

●あるポイントカード会員は3ヶ月間の買物状況により下記のようにボーナスポイントが加算される

タイプ	ﾎﾞｰﾅｽﾎﾟｲﾝﾄ加算条件（3ヶ月間の買物状況）					ﾎﾞｰﾅｽポイント
A	10万円以上お買上の方					200
B	金額に関係なく、50日以上来店し、お買上頂いた方					100
AB	Aタイプ・Bタイプ両方の条件を満たす方					300

そこで、ちょっとしたお遊びを・・・

問題： セルD5に、セルB5で＜タイプ＞「A」「B」「AB」を入力すると対応する＜ボーナスポイント＞「200」「100」「300」を
逆に＜ボーナスポイント＞を入力すると＜タイプ＞を表示する式を考えて欲しい。
但し、つぎの条件を満たすこと。
1: 式で参照できるセルはB5のみとする。
2: セルB5の表示形式は「標準」とし、入力規則の「日本語入力」以外は設定禁止。
3: セルD5の表示形式及び条件付書式等は設定自由とする。
4: セルB5に入力できるのは「A」「B」「AB」又は「200」「100」「300」の6種のみで
それ以外が入力された場合、若しくは未入力の場合はD5セルは無表示とする。（B5が「BA」⇒D5セルの表示なし）
尚、入力文字は半角英数で、大文字・小文字は問わないものとする。
5: D5セルに表示する数字のType形式は数値・文字列を問わない。
6: 名前定義禁止。

参考ファイル：Q15_2009.lzhをダウンロード

***********************************************************************

尚、解答発表は4/25（土）の８：００です。それまでは直接数式を

書き込むこと・ポイントとなる関数名を書き込むことはご遠慮ください。

***********************************************************************

関数で出来ますか～？ 第１４問 文書校正 解答例

最初のヤツが・・・なくなった。

自分の脳をたどってみました。

左から、1個目、2個目・・・合わないところを探した。

でも、それだと、ROWを3回も使う。

からくちさんが、30台と、おっしゃるまでは、本気で短くしようとは思わなかった。

で、・・・・・

ってことで、自分の脳の動きを無視して・・・・・

３８：　{=COUNT(FIND(LEFT(C4,ROW(1:7)),C6))+1}

い　　はあるかな・・・・

いろ　　はあるかな・・・・

いろは　　はあるかなーー・・・・

・・・と、・・・脳の動き的には、無駄がありそうだけど、

エクセル的には、短いんですねーーー

その他も、皆さんと、きっと同じと思うので・・・・

もう一つだけまず・・・・・

かぶらないかもしれない、お遊びだけ・・・・

68文字：{=MAX((REPLACE(C4,ROW(1:7),1,1)=REPLACE(C6,ROW(1:7),1,1))*ROW(1:7))}

うらもんは・・・・

やはりおなじかなーーー

{=7-COUNT(FINDB(RIGHT(C4,COLUMN(A:G)),C6))}

むりやり・・・禁じ手をすり抜けただけの・・・・半ズル。

なんか、きちんと見てないかも、，，

　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　（ジョー３さん談）

:::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::

minmaxさんが興味があると言ってくれたので、調子に乗って

くまぷーの循環版を晒します。(^^ゞ

kumapoohQ14.lzhをダウンロード