胡椒は小粒で・・・：中禅寺湖シリーズⅡ【解答】

問題はこちらを参照。

【´･ω･`】:悪児さん、忘れちゃったのかな？解答の原稿がこないので・・・

　　　　　　代理で解答発表するしかないかと思っていたら１９時44分に

　　　　　　来たよ。

　　　　　　・・・ということでくまぷーのは削除して・・・

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

「コ」解答です。
アップ用にも書いたとおり、
今回は完全に観客化していました。(^^)ゞ

　　　　　　　　　　　　　　悪児

－－－－－－－－－－－－－－－－－－－－－－－－－－－
出題時に用意していた解答です。

中級
三四郎49
=If(Max(Rows(A1:A$6),Abs(5.6-Col(A1))+0.6)=5,"*")

Excel50
=LEFT("*",MAX(ROWS(1:$6),ABS(5.6-COLUMN())+0.6)=5)

上級
三四郎61
=If(Max(Ip(Rows(A1:A$6)/2),Abs(3.1-Col(B1) DIV 2)+0.1)=2,"*")
Excel67
=IF(MAX(INT(ROWS(1:$6)/2),ABS(3.1-INT(COLUMN(B1)/2))+0.1)=2,"*","")

今回は、あまりのショックで、
立ち直れないまま、完全に観客化していました。(^^;)(^^;)

Comments

[投稿情報: y sakuda]

Areasは衝撃的でしたーー
初級が何が初級かという大フィーバーでしたねーー

私は、いずれも従来手法にこだわってみました。
中級49
=LEFT("*",MAX(ROWS(1:$6),MOD(COLUMN()-2,10)-3)=5)

同じ手法を上級にも適用し
上級57
=LEFT("*",OR(MAX(ROWS(1:$6),MOD(COLUMN()-3,10)-2)={5,4}))

これは、Excelの負の数を正の数でMODを取った時の動きを利用してます。

[投稿情報: くまぷー]

今回はジョー３さんのAreasにノックアウトされてしまった・・・_|￣|○

次回はAreasが使えないような出題にしてやろう・・・Ψ(｀∀´)Ψウケケケ

Excel中級：７６文字

=LEFT("*",AND(MAX(ROWS(1:$6),COLUMNS(A:$F))=5,OR(ROW()={2,10},COLUMN()=10)))

Excel上級：９９文字

=LEFT("*",AND(OR(MAX(ROWS(1:$6),COLUMNS(A:$F))={4,5}),COLUMN()<>2,OR(ROW()={2,3,9,10},COLUMN()>8)))

[投稿情報: えくせるバカ]

===いつもので======

中級編
４９文字は
=REPT("コ",MAX(RIGHT(COLUMN(I1)),(ROW()-6)^2-8)=8)

上級編
５４文字は
=MID(" 子",MAX(MOD(COLUMN()-3,10),ABS(ROW()-6)+3)/2,1)

***＜Kirさん方式＞****************

　中級編
　４５文字は
　=REPT("コ",ISREF((B2:J2,B2:B9,B10:J10) $K$11))

　上級編
　４４文字は
　=REPT("子",ISREF((B2:I3,B2:C9,B9:I10) $K$11))

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

でした！

[投稿情報: y sakuda]

えくせるバカさんの中級49私のと全く発想が違う。
なんで、Right(Column(I1)）なのかと思った^^;
私のは上級も同じ手法ですが、これまた
全く違う発想ですね。（まだ理解してない）
ただ、1文字少なく53になっていて上手く動かないのですが、良く分かってないので直せません。正しいのをお願いしまーーす。

[投稿情報: ジョー３]

sakudaさん、すごいです。
kirさん＋えくせるバカさん、すごいです。
悪児さん、きっちーさん、くまぷーさん、、
がたの、知識にもかないません。
最近、登場した方々もすごいし、、、

かずさんも、年取ったって言いながら、
油断もあったもんではない。。

でも、、
ＡＲＥＡＳ、使えば、、
ジョー3や、そのほかの初心者も、、、
対抗出来るかも、、、って、ことで、、

ＡＲＥＡＳは、、
ジョー3と、これから参加する方の、、
専用にしましょう・・・・特許。。
ってなわけにはいかないかなーーー
・・・・・

[投稿情報: くまぷー]

>正しいのをお願いしまーーす。

" 子"の「子」の前のスペースが
ひとつ消えてしまったものと思われます。(^^ゞ

[投稿情報: かず]

AreasもISERRも相対性理論も、σ^^;じゃとても、思いつきません。

中級　=REPT("湖",1-ISERR($K$10 (B1:J1,B2:B8,B9:J9)))
上級　=REPT("湖",1-ISERR($K$10 (B1:J2,B3:C7,B8:J9)))

この方法の凄いところは、どこのセルで始めても同じ模様になるんですね。

[投稿情報: ジョー３]

かずさんの式も、いつも、洗練されて、、
美しいなーーー・・・・・・

アーーー、、腕自慢も、、そろそろだしなーーー、、、

[投稿情報: y sakuda]

くまぷーさんどうもです。
そう言えば前もブランクが消えるパターンありましたね。鈍くてすんません^^;
それにしても、えくせるバカさんの上級は黒魔術風だな・・・・
分かったような分からないような・・・・・

[投稿情報: きっちー]

中級　三四郎４５文字
=If(Max(Rows(A1:F$6),Col(I1) MOD 10-3)=5,"コ")

中級　三四郎４８文字
=If(IsErr($J$1::B3:I9)-IsErr($J$1::A2:I10),"コ")

まにあわずやっつけで、

上級　三四郎５０文字
=If(Odd(Max(Rows(A2:F$6),Col(I2) MOD 11-2))=5,"子")

重複演算子の数の違いで三四郎が不利でしたね。

[投稿情報: えくせるバカ]

あらら
またスペース一個消えてますね！
"（空白）（空白）子"です。

私も４９はテッキリy sakudaさんと
同じではと思ってたんですが
いろいろあるもんですね！!(^^)!

[投稿情報: きっちー]

また間違えた

中級　三四郎４８文字
Ａ１１に入力して　Ａ１からＫ１１までコピペ
=If(IsErr($J$1::B3:I9)-IsErr($J$1::A2:I10),"コ")

[投稿情報: きっちー]

＞またスペース一個消えてますね！

全角で入力して下さい。(^^)

[投稿情報: えくせるバカ]

＞全角で入力して下さい。(^^)
ハイ！
以後気をつけます/（＾＾；）

[投稿情報: y sakuda]

きっちーさんの
>中級　三四郎４５文字
>=If(Max(Rows(A1:F$6),Col(I1) MOD 10-3)=5,"コ")

のエンジン私のExcel49と事実上同じですねーー
一見違うのになんか親近感感じて、しばらく睨んでました^^

[投稿情報: きっちー]

初級でオーバーヒート気味で、
上級に手を付けたとたんパンクしました。(=,,=ゞ ｼｮﾎﾞｼｮﾎﾞ

[投稿情報: えくせるバカ]

＞えくせるバカさんの上級は黒魔術風だな・・・・
そうですかねぇ～
ＭＩＤ使うのにｽﾍﾟｰｽ文字削りたかったので1/2にしただけなんですー！！

[投稿情報: きっちー]

＞エンジン私のExcel49と事実上同じですねーー

あっ、ホントだ。(･_･)

[投稿情報: えくせるバカ]

しかし、
ジョー３さんのＡＲＥＡＳに端を発して、
Kirさんにより油をそそがれた感がある
今回の問題は、とてもスリリングで、
私自身、久しぶりにエキサイトしました。
それにしても、その技を
すぐに自分のものにして進化させる
きっちーさんにも、いつもながら
驚かされっぱなしでした！！！

[投稿情報: y sakuda]

>ＭＩＤ使うのにｽﾍﾟｰｽ文字削りたかったので1/2にしただけなんですー！！
ああ、なるほど。
私は中級、最初はMOD5にこだわっていて、大分たってから、倍の10にすればよいのに気づきました^^
で　"/2"　が消える代わりに5⇒10で一文字減

[投稿情報: ジョー３]

あーーーあーーー

楽して、、勝とうと思ったけど、、、
駄目だなーーー、、
後半、だれて、・・・・
・・・・・・みんなについていけなかった。

かといって、、・・・もう・・・隠し武器も、、
ないしなーーー。。。

・・・・・・・・
・・・・・・・・・
・・・・・・・・・・・

[投稿情報: 悪児]

>楽して、、勝とうと思ったけど、、、
>駄目だなーーー、、

やっぱり、
あそこで、発表しないでいれば、
大楽勝して、
今頃大騒ぎになっていたのに・・・(^^)(^^)

[投稿情報: ジョー３]

＞今頃大騒ぎになっていたのに・・・(^^)(^^)
あはは、、、今度その手で、、、
ん、、、、、、、、
、、、もう、、隠し武器は、、、
なーーんにも、ないのだよ、、、、

って、、腕自慢で、、、なんか、、
出したいなーーー、

[投稿情報: くまぷー]

＞あそこで、発表しないでいれば、

でも、なかなかそれは難しい・・・
もしも誰かに先に言われてしまったら・・・と考えると・・・

きっとおいらも言ってしまう・・・

[投稿情報: ジョー３]

＞先に言われてしまったら・・・と考えると・・・

ふふふ、、、それよりねーーーー

失ったものより、、得るものの方が多い。

あそこで言わないと、、知ることの出来ないことが、、

あまりにも多かった、、、てこと。

皆さんとこうしていることは、、宝物です。

[投稿情報: えくせるバカ]

y sakudaさんやくまぷーさんの
ROWS(1:$6)はいいですね！

私の上級解答式でこれを使うと
=MID("　　子",MAX(MOD(COLUMN()-3,10),ROWS(1:$6)+2)/2,1)
５２文字と２文字削れました。

三人寄れば文殊の知恵ってとこですね＾＾

[投稿情報: えくせるバカ]

私は、ここにくるまでは式の短さより
シートの使い勝手を考えるのが好きでしたが、
ここで色々と勉強させてもらいながら
鍛えられているおかげで、
昔は作業セルをいっぱい使って
四苦八苦しながら作っていたシートも、
今ではかなり簡素に仕上げられるようになってきて、
式を短くすることの重要性を再認識できました。

＞皆さんとこうしていることは、、宝物です。
全く同感です！
改めまして、
　「これからもどうぞよろしく！！」

[投稿情報: y sakuda]

えくせるバカさんの上級、エンジン部分は私の中級49、上級57と基本的に変わらないのですが、端数の出る行からの値をそなままMidに使うアイデアでずいぶん減ってますね。
私は中級49を作って眺めていたら、そのまま上級に応用できるのではと思いつき、ORを加えてみたら出来ちゃった。
しかも、それ以前の上級が80台だったのに60を切っちゃったので、「このあたりが限界」と満足しちゃいました^^;

[投稿情報: きっちー]

どんな図形でも出来てしまうあの武器のセル操作は、CBUみたいな感じ。
WMDみたいな数学関数には及ばないにしてもね。

（英字は伏せ字のままでよろしく）(^^)

[投稿情報: えくせるバカ]

満足すると止まっちゃいますよね！

ところで、もう寝ようと布団にはいって
思いついちゃったので

中級４８文字
=REPT("コ",MAX(RIGHT(COLUMN(I1))-3,ROWS(1:$6))=5)

上級５１文字
=MID("　　子",MAX(ROWS(1:$6)+2,RIGHT(COLUMN(H1)))/2,1)

ｙ sakudaさんの式とのいいとこ採りです！

[投稿情報: y sakuda]

48の51・・・・・
良く思いつきますね--
つくづく感心します。
＞名は体を表わす・・・・・・

[投稿情報: ジョー３]

ここ2,3日：
１）呑みながらの答えあわせだったので、、

２）ＡＲＥＡＳ一本で回答計画だったので
　（チョットお祭り気分＝AREAS祭り）
他の方法は、きちんと見れてませんでした。

他の方法の回答は、今晩呑まないで
見てみようと思っています。

なんか、結果的には、、
大変お騒がせいたしました。
の、気分でもある。
でも、、書き込み数も、多かったから、、
良しとしていただきますね、

[投稿情報: ジョー３]

くまぷーさんが、、
＞次回はAreasが使えないような
＞出題にしてやろう・・・Ψ(｀∀´)Ψウケケケ

と,言ったので、、
逆に、ＡＲＥＡＳの得意な
（＝他の関数だと大変そうな）
図形を、お昼休みに作ってみました。
どうでしょう！！

http://blog.livedoor.jp/jyo33/archives/51250316.html

[投稿情報: えくせるバカ]

ジョー３さんの模様拝見しました！
Areasならこそ…デスよね(^-^)b
あと、名前定義で事前に範囲名付けとけば楽に好きな文字や模様も描けますね！
そのうちAreas模様コンテストができそう…

[投稿情報: ジョー３]

>名前定義で事前に範囲名付けとけば・・・・

これはもう、ちょっとなれると、、関数的な発想は要らない・・・
（は、言い過ぎとして、）
お絵かきセンスの方が・・・必要なのかも、、

[投稿情報: えくせるバカ]

それにしてもジョー３さんはいつも凄い技をあみだすが、
今回のは万能なダケに強烈です…
ただ、斜めものは辛そう…

[投稿情報: ジョー３]

>ただ、斜めものは辛そう…
つらいつらい・・・だから、
以前の問題前には、、出すのが・・・
本気になれなかった。

で、悪児さんが、いやーーー、ほんと、
ぴったりの問題を出してくれた。
＆
もしかして、、と思ったら、、偶然、、
一発で、、決まった（作成途中のこと)

まあ、万能なら、嫌われるから、、
ちょうどいいと思います。

[投稿情報: y sakuda]

しかし、この問題初級、中級はともかく、上級は結構複雑になり、ColumnとRow一組ではすまないのではないかと思っていたのですが、やはり、一組じゃないと勝負にならなかった・・・・
やっぱりちょいと怖い世界かも＾＾；

[投稿情報: ジョー３]

>やはり、一組じゃないと勝負にならなかった・・・・

うっふふふ、、、

で、一個ずつしか・・・・・さすが、みなさん、、

[投稿情報: くまぷー]

>逆に、ＡＲＥＡＳの得意な
>（＝他の関数だと大変そうな）
>図形を、お昼休みに作ってみました。
>どうでしょう！！

拝見しました。面白い！
・・・ということで、またまたリンクさせて頂きました。

http://kumapooh2007.hp.infoseek.co.jp/