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

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

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

左から、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をダウンロード

Comments

[投稿情報: くまぷー]

たいしたものは思いつきませんでした。
表：{=SUM(N(LEFT(C4,ROW(1:7))=LEFT(C6,ROW(1:7))))+1}
48文字

裏：{=7-SUM(N(RIGHT(C4,COLUMN(A1:G1))=RIGHT(C6,COLUMN(A1:G1))))}
60文字

[投稿情報: む印]

被ってると思いますが考えたやつ全部出します。

おもて問
37{=COUNT(FIND(LEFT(C4,ROW(1:9)),C6),)}
以前minmaxさんに教えてもらった COUNT(,)=2 で
一文字減らせましたｄ^^
http://kumapooh.justblog.jp/blog/2008/03/post-c9ee.html#comment-9166762

40{=MAX(FIND(RIGHT(C4,ROW(1:7)),C6&C4)-7)}
42{=MATCH(1,FIND(LEFT(1&C4,ROW(1:7)),1&C6))}
43{=SUM(COUNTIF(C6,LEFT(C4,ROW(1:7))&"*"),1)}
43{=COUNT(MATCH(LEFT(C4,ROW(1:7))&"*",C6,),)}
44=LOOKUP(9,FIND(RIGHT(C4&1,ROW(1:7)),C6&1))-1
48{=SUM(N(LEFT(C4,ROW(1:9))=LEFT(C6,ROW(1:9))),1)}
48{=MATCH(1,N(FIND(MID(C4,ROW(1:7),1),C6&C4)>7),)}
51{=MATCH(0,N(LEFT(C4,ROW(1:7))=LEFT(C6,ROW(1:7))),)}
51{=MIN(LEN(SUBSTITUTE(C6&1,RIGHT(C4&1,ROW(1:7)),)))}
51{=MATCH(1,COUNTIF(C6,REPLACE(C4,ROW(1:7),1,"?")),)}
54{=SUM(--EXACT(LEFT(C4,ROW(1:9)),LEFT(C6,ROW(1:9))),1)}
56{=SUM(N(REPLACE(C4,1,ROW(1:7),LEFT(C6,ROW(1:7)))=C4),1)}

うら問（表問の関数を置換えただけですが・・・）
42{=COUNT(FINDB(LEFTB(C4,COLUMN(1:1)),C6),)}
43=7-COUNT(FINDB(RIGHT(C4,{1,2,3,4,5,6}),C6))
43{=COUNT(SEARCH(LEFTB(C4,COLUMN(1:1)),C6),)}
45{=MAX(SEARCH(RIGHT(C4,COLUMN(1:1)),C6&C4))-7 }
48=SUM(7,-COUNTIF(C6,"*"&RIGHT(C4,{1,2,3,4,5,6})))
49=LOOKUP(9,SEARCH(RIGHT(C6&0,COLUMN(1:1)),C4&0))-1

一つの関数で117
=("い"=LEFT(C6))+("いろ"=LEFT(C6,2))+("いろは"=LEFT(C6,3))+("いろはに"=LEFT(C6,4))
+("いろはにほ"=LEFT(C6,5))+("いろはにほへ"=LEFT(C6,6))+1
・・・お粗末m(__)m

[投稿情報: minmax]

>一文字減らせましたｄ^^
表３７裏４２は、ほぼ想像どおりでした。
くまぷーさんの循環は考え方一緒ですが私のはもっとずる。
くまぷーさんの何となくもう少しへらせないかなあ～

[投稿情報: ジョー3]

＞以前minmaxさんに教えてもらった

＞COUNT(,)=2 で

＞一文字減らせましたｄ^^

へへーーー、、、
minmaxさん
kirさん
む印さん・・・・

よくやりますねーーー

[投稿情報: ますたあ]

相変わらずのアイディア欠乏症です。^^;

1回答えが出せたらそれっきりアイディアが...。

おもて
{=MATCH(1,N(MID(C4,ROW(1:7),1)<>MID(C6,ROW(1:7),1)),)}
の54文字でした。

うら
｛=MATCH(1,N(CODE(RIGHT(C4,8-{1;2;3;4;5;6;7}))<>CODE(RIGHT(C6,8-{1;2;3;4;5;6;7}))),)}
の84文字でした。

うらもんは解けないかと最初思われましたが
ここに参加しているおかげですね。
おもてもんの改良版ではありますが式が浮かびました。(^^ゞ

[投稿情報: む印]

くまぷーさんの循環技、
いつ見ても見事ですねー！

ますたあさんのうら84
ここまで出来てたらCtrl+Shift+Enterしなくてもいいですねｄ

[投稿情報: くまぷー]

>くまぷーさんの循環は考え方一緒ですが私のはもっとずる。

どんな？
ちょっと見たい・・・
送ってくれれば展示しますよ～

[投稿情報: くまぷー]

＞くまぷーさんの循環技、
＞いつ見ても見事ですねー！

む印さんに褒めてもらうと
とてもうれしい　（￣＾￣）

[投稿情報: ますたあ]

む印さん、コメントありがとうございます。

＞ここまで出来てたらCtrl+Shift+Enterしなくてもいいですねｄ
ほんとだ～～。^^;;;

そっか、確かにしっかりと作りこんであるからな～～。^^;
また一つ勉強になりました。

[投稿情報: くまぷー]

む印さん、数えてみたら表だけで１２もあるんですね～
よく色々思いつくな～m(__)m

[投稿情報: y sakuda]

Countで引数省略するのは思いつかなかったですねーー
38は当然同じです。
後いくつかつくりましたが、どうも全部む印さんとこに出てますね。
これからくまぷーさんの循環技鑑賞します＾＾

[投稿情報: くまぷー]

ますたあさん、こんばんは！

＞どうも全部む印さんとこに出てますね。

ますたあさんのCODE関数ですか。
オンリーワンですね～
む印さんのところにもありません。

[投稿情報: y sakuda]

しかし、む印さんも良く色んなの思いつきますねーー
CountIFのこんな使い方全く考えなかったし、MatchのとLookupのもしばらく意味が分からなかった＾＾；

[投稿情報: かず]

いやはや、色々考え付くもんですね。
結局私は、表57文字しか思い付きませんでした。

｛=MAX((MID(C4,ROW(A:A),1)<>MID(C6,ROW(A:A),1))*ROW(A:A))｝

[投稿情報: minmax]

＞送ってくれれば展示しますよ～
送るほどのものではありません。
恥ずかしながら、
単純にくまぷーさんのエンジン部分に絞っているだけです。
=(LEFT(C4,E6)=LEFT(C6,E6))+E6
（文字数２９）
で、F2してからEnterしないと正しく表示しないってことです。

ちなみに、くまぷーさんの循環ちょっと短くして、
=IF(C6>0,(LEFT(C4,E6)=LEFT(C6,E6))+E6)
こんなのでもいいのかな。

[投稿情報: y sakuda]

自分で言うのもなんですが、今回作ったアドイン、皆さんの試して、整理するのに結構便利＾＾
もっと早く作れば良かったｗ

[投稿情報: む印]

＞=(LEFT(C4,E6)=LEFT(C6,E6))+E6
へー、minさんよくこんな循環おもいつくなぁ～
頭の中どんな構造してるんだろ？
すごい・・・ｄ

[投稿情報: y sakuda]

>へー、minさんよくこんな循環おもいつくなぁ～
×２
>頭の中どんな構造してるんだろ？
まあ、普通じゃないｗ

[投稿情報: minmax]

え、、
そんなにほめられるような代物ではないと思いますが。。。

[投稿情報: くまぷー]

>へー、minさんよくこんな循環おもいつくなぁ～
×3

勉強になります。

◇＼(o・Ｑ・o)／◇　降参です～

[投稿情報: くまぷー]

きのうはジョー３さんが
静かだったな～
体調でも崩しているんだろうか？

[投稿情報: ジョー3]

＞静かだったな～
早く寝ちゃった。
で、春の大掃除（朝）＆
昼間で出かけて、・・・・・

の、まえに・・・・ちょっと気になって来ちゃった。

1関数：お遊び２つ、、短縮は心がけない
left だけ・・・正誤を切り取って比べた１４６
=(LEFT(C4,1)=LEFT(C6,1))+(LEFT(C4,2)=LEFT(C6,2))+(LEFT(C4,3)=LEFT(C6,3))+(LEFT(C4,4)=LEFT(C6,4))+(LEFT(C4,5)=LEFT(C6,5))+(LEFT(C4,6)=LEFT(C6,6))+1

findだけ１３７
=(FIND("い",C6&C4)<7)+(FIND("いろ",C6&C4)<7)+(FIND("いろは",C6&C4)<7)+(FIND("いろはに",C6&C4)<7)+(FIND("いろはにほ",C6&C4)<7)+(FIND("いろはにほへ",C6&C4)<7)+1

どっちも長かった。・・・・・

[投稿情報: ますたあ]

＞ますたあさんのCODE関数ですか。
＞オンリーワンですね～
くまぷーさんにそうに言ってもらえると
ちょっとうれしいですね。(^^ゞ

[投稿情報: supermab]

表：140文字

=IF(MID(C4,1,1)<>"い",1,
IF(MID(C4,2,1)<>"ろ",2,
IF(MID(C4,3,1)<>"は",3,
IF(MID(C4,4,1)<>"に",4,
IF(MID(C4,5,1)<>"ほ",5,
IF(MID(C4,6,1)<>"へ",6,7))))))

裏：55文字

{=SUM(N(RIGHT(C4,COLUMN(A:G))<>RIGHT(C6,COLUMN(A:G))))}

あとのはみんなかぶってました。
しっかし、
FIND(LEFT(C4,ROW(1:7)),C6) !
一つのカッコでC4とC6を・・・
やりたかったのに、できませんでした。

[投稿情報: supermab]

くまぷーさんの循環版を
拝見しました。

チェックボタンがなくっていて
びびった・・・・

んー、なるほどｰ。
さすがじゃ・・・（感心）

[投稿情報: y sakuda]

>チェックボタンがなくっていて
>びびった・・・・
私は逆にチェックボックス等で起動するというのはやったことがないです。
通常、どこかのセルの値の変化でキックする方法を取ります。
今回は循環はやりませんでしたが、やってたら、C6の値をどこかに残して、その変化でキックすると思います。

[投稿情報: supermab]

>通常、どこかのセルの値の変化でキックする方法を取ります。

ありゃま！
そっちが普通なんですね　＾＾；

[投稿情報: minmax]

ジョー３さんのFINDだけ137
もう少し短くできそうなきが…
今は出来ないけど…

[投稿情報: ジョー3]

>表：140文字

わかりやすーーい・・・・
文字は長くても，思考が短い。

[投稿情報: ジョー3]

＞もう少し短くできそうなきが…
私も気がするが･･･苦手ーーー
短縮は、，，まかせるーーー。
（こういう俺を、からやきという）

[投稿情報: ジョー3]

それにしても、、、
む印さん、、、たくさん・・・・
ｓａｋｕｄａさん、、結局は先頭集団＝いつもすげー
その他の皆さんも、個性あふれる・・・・

遊んで頂いてありがとうございました。

・・・・
あ、、、まだ出てくるか･･･もね、、

で、実は4部作でした。
1文字だけ間違いパターン（今回）
の他に、3っつあります。

めざせ１００回のために・・・分けました。
またそのうちに・・・・・
出題が、足りなくなった頃にお願いします。

遊んで頂いて（進行形）
重ねて感謝でございます。・・・・

[投稿情報: くまぷー]

>めざせ１００回のために・・・分けました。

力強い言葉・・・
１００回ということは２年続くということ・・・m(__)m

[投稿情報: くまぷー]

supermabさん、どもです。

＞んー、なるほどｰ。
＞さすがじゃ・・・（感心）

では、これはどうでしょう？

http://www.geocities.jp/kuma_pooh1958/sub1.html

Excel PokerⅡとPoker Slotがお勧めかな～(^^ゞ

[投稿情報: minmax]

家に一旦帰ってきました。
＞短縮は、，，まかせるーーー。
ってことで、頭にあったことをやってみました。
ジョー３さんの
＞findだけ１３７
を１６文字縮めて
121文字
=FIND(8,FIND("い",C6&C4)&FIND("いろ",C6&C4)&FIND("いろは",C6&C4)&FIND("いろはに",C6&C4)&FIND("いろはにほ",C6&C4)&FIND("いろはにほへ",C6&C4)&8)

123文字
=8-FIND(1,FIND("いろはにほへ",C6&C4)&FIND("いろはにほ",C6&C4)&FIND("いろはに",C6&C4)&FIND("いろは",C6&C4)&FIND("いろ",C6&C4)&FIND("い",C6&C4)&1)

でした。
む印さんの１１７には勝てなかったみたい。

[投稿情報: ジョー3]

＞１６文字縮めて
＞121文字

すごい、、うひゃーーー・・・・
かなわんなーーー

[投稿情報: minmax]

＞かなわんなーーー
調子にのって
MATCHだけ使って７２文字
=MATCH(1,MATCH({"*","い*","いろ*","いろは*","いろはに*","いろはにほ*","いろはにほへ*"},C6,0))
でした。

[投稿情報: minmax]

７１文字
１文字無駄だった。。。
=MATCH(1,MATCH({"*","い*","いろ*","いろは*","いろはに*","いろはにほ*","いろはにほへ*"},C6,))

[投稿情報: ジョー3]

＞　　=MATCH(1,MATCH({"*","い*","いろ*","いろは*","いろはに*","いろはにほ*","いろはにほへ*"},C6,))

これもいいかも・・・・・・だいぶ・・・・
私の頭には、ちょと・・・辛いけど・・・
やっと分かったら、面白かった。

1関数って、・・・・すごいかもーーー

[投稿情報: minmax]

＞やっと分かったら、面白かった。
MATCHってエラーを無視してくれるのね。
よく分かっていなかった＾＾

[投稿情報: ますたあ]

supermab さんの表140文字ですが
写し間違えていますよ。

式中の参照先はC6セルですよね。(^^)

[投稿情報: supermab]

>思考が短い。

脳の思考も・・・
短いw

>では、これはどうでしょう？

うーわっ！
Poker Slot　のラスベガスみたいな雰囲気がすんげーーー。
マクロではないのが、またすんげーーー。
新しい世界を発見。

>式中の参照先はC6セルですよね。(^^)

ありゃ！ほんま。失礼しやした。
sakudaさんのマクロで文字数数えて・・・判定マクロで判定して・・・死んで・・・
直して、・・・再度判定してOKだったので、文字数マクロもう一回やらないで
C4のままのやつ、コピペしちゃいました ＾＾；

[投稿情報: y sakuda]

>そっちが普通なんですね　＾＾；
いえ、私がやらないというだけで、どっちが普通かは知りません＾＾；
というか、循環参照積極的に使うのふつうじゃないですｗｗｗ

[投稿情報: からくち]

既にだいたい出揃っていますね

と言うことで急遽まだ使われていない（見落としてなければ）
関数をあえて使った式を

ＩＳＥＲＲ編
{=MAX(ISERR(FIND(MID(C4,ROW(1:7),1),C6))*ROW(1:7))}

ＦＲＥＱＵＥＮＣＹ編
=MATCH(0,FREQUENCY(FIND(MID(C6,ROW(1:7),1),C4&C6),ROW(1:7)),)

ついでにもう１つ
阿保らしい程の
超お遊び編
{=INT(LEN(56727559639320-SUM((CODE(RIGHT(C6,ROW(1:7)))-9232)
*10^((7-ROW(1:7))*2)))/2)}

[投稿情報: む印]

私は今回、からくちさんの物まねで
LOOKUP関数使ってみたけど
やはり何処かギコチない・・・

＞ＦＲＥＱＵＥＮＣＹ編
この使い方も勉強せねば・・・

＞超お遊び編
「あろほにほへと」
・・・んん？、解らんなぁ～

ところで今回も登場した循環技ですが、
私はズルとは思えなかった・・・
むしろ素晴らしい関数テクニックだと感じました！
・・・なので解答の部門を分けるというのはどうでしょうか？
「一般部門」「循環部門」「ズル部門」
というように・・・

[投稿情報: ジョー3]

＞・・・なので解答の部門を分けるというのはどうでしょうか？
＞「一般部門」「循環部門」「ズル部門」
いいかも、ついでに、1関数のみ部門も
・・・・夢広がりすぎ?・・・
でも、好きなところだけ、応募すればいいかも、

＞私は今回、からくちさんの物まねで
＞LOOKUP関数使ってみたけど
まだ真似できてないジョー。

＞＞ＦＲＥＱＵＥＮＣＹ編
＞この使い方も勉強せねば・・・×２

[投稿情報: y sakuda]

ISERR,ISNAを使ったやつは私もいくつか試しましたが、短縮には繋がらなかったので放棄しました。
内ひとつは、からくちさんのと事実上同じです。
{=SUM(ISERR(FIND(MID(C4,ROW(1:7),1),C6))*ROW(1:7))}
{=MAX((1-ISNA(MATCH(LEFT(C6,ROW(1:7))&"*",C4:C4,0)))*ROW(1:7))+1}

Frequencyは相変わらず、使えるという発想にも至らないですねーー

[投稿情報: y sakuda]

ところで、次はむ印さんの出題でしたっけ？
今日でるのかな？

[投稿情報: くまぷー]

>今日でるのかな？

明日ということで・・・

[投稿情報: y sakuda]

>明日ということで・・・
了解です＾＾