Excel Maniacs

第197回 簡単すぎる問題

で、いいかな、、、

 

さいきん、難しすぎたから

 

1u

7d

3b

9w

p6

y2

 

とかが、セルB2からずーと入ってます。

では、問題です

 

C列に（となり）・・・・アルファベットを抜き出して下さい。

 

u

d

b

w

p

y

 

と、なればいいだけ、、、　　　　（ジョー３さん）

 

解答用参考ファイル：なし

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

尚、解答締め切りは０３／０９（日）の午後８時の予定です。

状況によっては 変更される可能性があります。

また、解答発表までは直接数式を書き込むこと・ポイントとなる関数名を

書き込むことはご遠慮ください。

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

第196回 文字の並べ替えⅢ 解答例

◆解答１３２は、D2に入力して、下にコピーしても、「0」しか表示されません、
◆H21まで式をコピーすると、正しい名前が表示されます
１３２{=INDEX($B:$B,MATCH(TEXT(SUM(N($B$2:$B$21<D$1))+ROW(),"[>"&21-COUNTIF(E$2:$I21,">*")&"]!0;0")*1,COUNTIF($B:$B,"<="&$B$1:$B22),))&""}
 
◆解答をもう一つ、
１３３{=IF(ROW(A1)>SUM(($B$2:$B21<D$1:E$1&"ん")*{-1,1}),"",INDEX($B:$B,MATCH(COUNTIF($C$2:C21,">*")+ROW(),COUNTIF($B:$B,"<="&$B$1:$B21),)))}
 
◆ほかの方の解答が楽しみです・・・ 　　　　　　　（maronさん）

第196回 文字の並べ替えⅢ

【問 題】文字の並べ替えⅢ(50音順Ⅱ)

１）B2:B21に表示された、２０名の名前を、（同名はありません）
２）D1:H1の各行の名前を、D2:H21に50音順に並べてください
３）D2の式を下と右にコピーする形です
４）「F9」を押すと、B2:B21の名前が変わります
５）D1:H1の各行の名前がない場合は、空欄とします
６）濁点の時は、「けんいち→げんき→けんたろう」の順にします

　　　　　　　　　　　　　　　　　　　　　　　　　　　　(maronさん)

解答用参考ファイル： Q196をダウンロード

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

尚、解答締め切りは０２／２３（日）の午後８時の予定です。

状況によっては 変更される可能性があります。

また、解答発表までは直接数式を書き込むこと・ポイントとなる関数名を

書き込むことはご遠慮ください。

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

第１９５回 文字の並べ替えⅡ(多い順) 解答例

◆出題時から同じです・・・

１１３{=INDEX(B:B,MOD(LARGE((MATCH(B$2:B$21,B:B,)=ROW($2:$21))*(COUNTIF(B:B,B$2:B$21)+ROW($2:$21)%),ROW()-1),1)/1%)&""}

　　　　　　　　　　　　　　　　　　　　　　　　　　　（maronさん）

第１９５回 文字の並べ替えⅡ(多い順)

【問 題】    
      
 １）B2:B21に表示された、２０名の名前を、     
 ２）多い順に並べ替えて、D2:D21に表示してください     
 ３）D2の式を下にコピーする形です     
 ４）「F9」を押すと、B2:B21の名前が変わります     
 ５）あらかじめE列に、D列の名前の個数の式を入力しています     
 ６）個数が同じであれば、順不同でいいです     
      　　　　　　　　　　　　　　　　　　　　　　　（maronさん)

解答用参考ファイル： Q195をダウンロード

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

尚、解答締め切りは０２／１６（日）の午後８時の予定です。

状況によっては 変更される可能性があります。

また、解答発表までは直接数式を書き込むこと・ポイントとなる関数名を

書き込むことはご遠慮ください。

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

 

第194回 女王Ⅲ 解答例

出題者解答例ですが、出題するための、

仮のものとして作りました。

 

ですが、その後、、、満足出来る別の解答が出来ませんでした。

 

１７９：　{=IF(MAX(LEN(D4:G7&D3:G6&D2:G5&D1:G4&D5:G8&D6:G9&D7:G10&C4:F7&B4:E7&A4:D7&E4:H7&F4:I7&G4:J7&E3:H6&F2:I5&G1:J4&C5:F8&B6:E9&A7:D10&C3:F6&B2:E5&A1:D4&E5:H8&F6:I9&G7:J10))=5,"◎","×")}

 

１７２：{=IF(MIN(LEN(B1:E4&C1:F4&C2:F5&A2:D5&A3:D6&B3:E6&A5:D8&B5:E8&A6:D9&C6:F9&B7:E10&C7:F10&E1:H4&F1:I4&E2:H5&G2:J5&F3:I6&G3:J6&F5:I8&G5:J8&G6:J9&E6:H9&E7:H10&F7:I10)),"×","◎")}

　　　　　　　　　　　　　　　　　　　　　　　　　　　　（ジョー３さん）

第194回 女王Ⅲ

お世話になってます。一応解きました。良い解ではない。

皆さんに、期待しております。　（ジョー３さん）

 

【問題】

●は宝石
16個のマス目のうちの一つに
女王（チェスのＱ）を置いたとき
全部（５個）の宝石が女王から見えるように
女王を配置したい。そんな女王の配置は可能か?
配置が可能なら　Ｋ３（緑のセル）に　◎
不可能なら　×を　表示して下さい
ただし、女王は宝石のあるマス目にでも配置できるものとする
注：女王の配置場所を求めるのではなく可能かどうかだけです

 

強引に答えを一応出したが、スマートでもエレガントでもない・・・
きっと、皆さんが・・・・へーーーという答えを思いつくでしょう。

 

： Q194をダウンロード

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

尚、解答締め切りは０２／０９（日）の午後８時の予定です。

状況によっては 変更される可能性があります。

また、解答発表までは直接数式を書き込むこと・ポイントとなる関数名を

書き込むことはご遠慮ください。

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

第193回 文字の並べ替え 解答例

◆７４から幾ら頑張っても減らないので、送付します

 

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

７４{=INDEX(B:B,MOD(LARGE(COUNTIF(B:B,">="&B$1:B21)+ROW($1:21)%,ROW()),1)/1%)}

 

◆７３の他、みなさんの解答が楽しみです

 

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

◆maronのパソコンがトラブルで、今日メーカーに修理に出しました

◆これは家内のパソコンから送付しています（少し、気兼ねして使っています・・・）

　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　（maronさん）

第193回 文字の並べ替え

【 問  題 】 ： 文字の並べ替え     
     
１）B2:B21に表示された、２０名の名前を、     
２）「あいうえお順」に並べ替えて、F2:F21に表示してください     
３）F2の式を下にコピーする形です     
４）なお、B列以外は参照しないで、F2の式を解答してください     
５）「F9」を押すと、B2:B21の名前が変わります     
"※【並べ替え例】は一例で、今表示の【並べ替え前】を並べ替
　 えたものではありません"     

　　　　　　　　　　　　　　　　　　　　　　　　　　（maronさん）
 

解答用参考ファイル： Q193をダウンロード

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

尚、解答締め切りは０２／０２（日）の午後８時の予定です。

状況によっては 変更される可能性があります。

また、解答発表までは直接数式を書き込むこと・ポイントとなる関数名を

書き込むことはご遠慮ください。

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

第192回 王将Ⅱ 解答例に代えて

出題時の、こころ

４個のうち、０個から４個・・・・簡単そうだよねーーーー

２＊２＊２＊２・・・・１６パターンしかないじゃん。

 

きっと簡単、、、

 

だが、、、

簡単でなかった。

いいのが、出来なかった。

 

作戦は、

１）４個組合せ作戦

２）三角形作戦

３）４角作戦

４）その他、、２，３

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

あーーーーーーーー

全部駄目だった。

つぎはぎだらけの式は作りたくないから、、、、

 

完敗でした。

 

あはは、、、答えがありませんーーーーー　（ジョー３さん）

第192回 王将Ⅱ

解答用参考ファイル： Q192をダウンロード

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

尚、解答締め切りは０１／１７（日）の午後８時の予定です。

状況によっては 変更される可能性があります。

また、解答発表までは直接数式を書き込むこと・ポイントとなる関数名を

書き込むことはご遠慮ください。

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

 

第191回 Q&A捻り質問 解答例

からくちさんの姿が見えないので、代打としてくまぷーが･･･

･･･と言っても、禁止関数の条件を完全に無視した

何でもありのアリアリモードなので・・・

その代わりと言ってはなんですが

いつもは、ただ式を掲示しているだけなんですが

それでは、常連さん以外は何だか全然わからないとおもうので

くまぷーの考え方を順を追って説明します。

 

 

１．まずA5に表示された数値をB５から、1文字ずつ表示する。

　　　=MID($A5,COLUMN(A1),1)

　　上式をB５に入力して右方向にコピペ。

 

２．A5の数値の小数点の位置を求めて、それがR５に来るように平行移動する。

　　平行移動するためにA5の数値の左側にスペースを加えて調整する。

　　A5の数値が-12345.6789であれば、この数値の左側にスペースを

　　１０個つけてやれば良い。

 

３．それでは補充するスペースの数をどうやって求めるか？

　　小数点の左側に何文字あるかを求めて、１６から引けばよい。

　　１６というのはB5からQ5までのセルの数だ。

　　すると必要なスペースを左側に補充した数字の式は

　　=REPT(" ",16-LEN(INT($A5)))&$A5　となる。

 

よって求める式は・・・

=MID(REPT(" ",16-LEN(INT($A5)))&$A5,COLUMN(A1),1)　（４９文字） 

･･･となる。

 

ここで上式のCOLUMN(A1)をCOLUMN()にして少々短縮すると

 

=MID(REPT(" ",17-LEN(INT($A5)))&$A5,COLUMN(),1)　（４７文字） 

･･･となる。

 

 

 

第191回 Q&A捻り質問

G&Aでは定期的に出る質問を少々変えた問題です

A5の数をB5：AH5に１セルづつに分けてください

ただし基準点をR5と致し、小数点以上をB5：Q5に

小数点以下をS5：AH5に表示してください

小数点が無い場合は、１の位をQ5に、２の位をP5にと

以下同様に１５の位はC5に表示

ただし、"－" が付いた場合は数の直ぐ左のセルに表示

＜条件＞

KUMAPOOHさん・JYO3さん・MUZIRUSHIさん

MINさん・MARONさん・Y SAKUDAさんとKARAKUTI

に使われています　ADHIJKMNOPRSTUYZ　

関数の頭文字がこの16文字のみ使用出来ます

これ以外の関数は使用禁止です　（からくちさん）

解答用参考ファイル： Q191をダウンロード

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

尚、解答締め切りは０１／１２（日）の午後８時の予定です。

状況によっては 変更される可能性があります。

また、解答発表までは直接数式を書き込むこと・ポイントとなる関数名を

書き込むことはご遠慮ください。

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

第190回 日と時 解答例

１）２９

=B3+366-(DAY(B3)=DAY(B3+365))

テスト的に解いて頂いた、3名ほど、、35文字だったので・・・安易に29で満足、、、して出題

 

２）１８

=(INT(B7*22)+1)/22

最初は22ぐらいだったが、短くできたことで、無駄チェックせずに出題、、、

余分括弧に気付かなかった。・・・トホホ、、

 

む印さんが２３とおっしゃったので、、、あせったが、、、・・・・

minさんが１６と、、、、うわーーー・・・・なんだ、この括弧はーーー状態。

 

　　　　　　　　　　　　　　　　　　　　　　　　　　　　（ジョー３さん）

第190回 日と時

　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　（ジョー３さん）

解答用参考ファイル： Q190をダウンロード

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

尚、解答締め切りは０１／０５（日）の午後８時の予定です。

状況によっては 変更される可能性があります。

また、解答発表までは直接数式を書き込むこと・ポイントとなる関数名を

書き込むことはご遠慮ください。

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

第189回 規則性を探せ 解答例

解答例

勝手な規則性 ・１０進数を８進数にする ・その値の平方根を得る ・その値が整数の時のみ１０進数を得る ・その値の小さい順

８進数ならDEC2OCT()を使えればいいのですが、、、

{=SMALL(IF(MOD((INT(ROW(A:A)/8)*10+MOD(ROW(A:A),8) +INT(ROW(A:A)/64)*20)^(1/2),1)=0,ROW(A:A)),ROW(A1))}

本当は、、、１０進数・８進数なので１０８文字にしたかったのですが

　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　（からくちさん）

第189回 規則性を探せ

超易しいのか、超難しいのか、、、

問題の性質上全く分からない問題を作ってしまいました

タイトル、、、規則性を探せ

製作者が勝手に作った規則性を探る問題なので

作った人はスタート時に分かっている

この問題なら何方でもPART２・３・・・と作れるのでは

　　　　　　　　　　　　　　　　　　　　　（からくちさん）

解答用参考ファイル： Q189をダウンロード

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

尚、解答締め切りは１２／２９（日）の午後８時の予定です。

状況によっては 変更される可能性があります。

また、解答発表までは直接数式を書き込むこと・ポイントとなる関数名を

書き込むことはご遠慮ください。

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

第188回 ユニークな品ぞろえの店は？ 解答例

Q188出題者解答

出題時に用意してあった、89から一歩もすすめませんでした。

{=IF(SUM(N(MMULT(ISNA(MATCH(IF(C:F>"",C:F),C5:F5,))-(C5:F5=""),{1;1;1;1})=0))=1,"○","×")}

手法的には大きく違うものはないような気がしているのですが、

む印さんやmaronさんのが字数は同じようなものでも 全く違う手法ならうれしいんですが^^

　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　（y sakudaさん）

第188回 ユニークな品ぞろえの店は？

この問題、質問に出たものをモディファイしたものです。

ここでは、商品は５種類、一つの店の品ぞろえは２～４種に限定して あります。

G5に式を入れて、下にコピーしてください。

もちろん、計算シート（非表示)の参照は禁止です。

例によって、F9でテーブルが更新されます。

【問題】

１０の商店があります。
もし、その商店にある品が他の商店に行っても全部入手できる場合は×
全部入手できる商店がない場合は○を出してください。
この例だと、商店１の4種を全部入手できる店はほかにないので○
商店２のガムおせんべ、チョコレート、アイスは商店７でもそろうので×となります。
なお、商品の並んでいる順番は店によって違います。

解答用参考ファイル： Q188をダウンロード　　（ｙ　sakudaさん）

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

尚、解答締め切りは１２／２２（日）の午後８時の予定です。

状況によっては 変更される可能性があります。

また、解答発表までは直接数式を書き込むこと・ポイントとなる関数名を

書き込むことはご遠慮ください。

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

 

第１８７回 水増し問題 解答例

つまらない問題ですみませんでした。

ほんの息抜きのつもりでした。

25 =TEXT(B2,REPT("0!0",8))+0

 

　　　　　　　　　　（minさん)

第187回 水増し問題

・・水増し・・
係長：社長、水増ししておきました。
社長：なに～、そりゃあ、やばいだろう。
係長：でも０を足しただけですよ。
社長：そうか、０ならいくら足しても増えないからいいかもな。
係長：そうでしょ。
　　　で、元金が１２３円だったのを１０２０３０円にしておきました。
社長：なに～、そりゃ増えすぎだろ。
係長：でも、確かに０を加えただけですけどねえ。
　　　　やっぱり、駄目ですかぁ。
社長：お前、クビ！！
.......................
シンプルな 問題です。
B2には、一桁から8桁の数値が入ります。
そのB2の数値各桁の間に０を足して答えをD2に出してください。
簡単すぎかな？
１週間も持つのだろうか。
.......................
水増し例
Ｂ２　　　　　　　Ｄ２
123　　　　→　102030
870893 　→　807000809030

　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　(minさん)

解答用参考ファイル： Q187をダウンロード

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

尚、解答締め切りは１２／１５（日）の午後８時の予定です。

状況によっては 変更される可能性があります。

また、解答発表までは直接数式を書き込むこと・ポイントとなる関数名を

書き込むことはご遠慮ください。

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

第186回 数字の和→和→和 解答例

◆maronの知っている基本形は、

=MOD(B3-1,9)+1

◆しかし、「0」と「14桁以上」だと駄目なので、

 

３５=(MOD(B3-FLOOR(B3,9)-1,9)+1)*(B3>0)

　　　　　　　　　　　　　　　　　　　（maronさん)

第186回 数字の和→和→和

　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　(maronさん)

 解答用参考ファイル： Q186をダウンロード

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

尚、解答締め切りは１２／０８（日）の午後８時の予定です。

状況によっては 変更される可能性があります。

また、解答発表までは直接数式を書き込むこと・ポイントとなる関数名を

書き込むことはご遠慮ください。

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

第185回 名前検索 初級卒業編 解答例

＜解答例＞

この問題、、、わたし的には超駄作 問題がつまらない、、、解答もつまらない 本当に、、、ごめんなさい

=LOOKUP(,-SEARCH(SUBSTITUTE(MID(E3&"・"&E3,MIN(3,FIND("苗",E2)),3),"・","*　*"),C1:C85),C:C)

　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　（からくちさん）

第185回 名前検索 初級卒業編

E3にひらがなが２文字表示されます   
E2はE3の文字が名前か苗字かを指定しています   
C4：C85は空白前が苗字で空白後が名前と致します   
エラー処理は必要ありません   
無い場合はエラーで結構です   
また、複数あった場合はどれでも結構です   
＜例＞   
E2　：　苗字・名前   
E3　：　 「な　・　ま」の場合   
G3　：　「わたなべ　まゆ」　等   
E2　：　名前・苗字   
E3　：　 「な　・　ま」の場合   
G3　：　「たかしま　ゆりな」　等   

　　　　　　　　　　　　　　　　　　　　　　　　　　　（からくちさん）

解答用参考ファイル： Q185をダウンロード

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

尚、解答締め切りは１２／０１（日）の午後８時の予定です。

状況によっては 変更される可能性があります。

また、解答発表までは直接数式を書き込むこと・ポイントとなる関数名を

書き込むことはご遠慮ください。

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

第１８４回 数字の並べ替え 解答例

◆最初から一向に変わりません、一直線の何の変哲もない式ですが・・・

 

９２：{=SUM(LARGE(ISNUMBER(FIND(ROW(1:9),B3))*ROW(1:9),ROW(1:9))*10^(ROW(1:9)-ISERR(FIND(0,B3))))}

 

　　　　　　　　　　　　　　　　　　　　　　　　　　　　(maronさん)

第１８４回 数字の並べ替え

                                                                                                                     (maronさん)

解答用参考ファイル： Q184をダウンロード

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

尚、解答締め切りは１１／２５（日）の午後８時の予定です。

状況によっては 変更される可能性があります。

また、解答発表までは直接数式を書き込むこと・ポイントとなる関数名を

書き込むことはご遠慮ください。

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

第１８３回 ランダム関数 その２ 解答例

２問目は出題での、、作戦がありました。

 

１問目で、１５桁、１０行を、、見て頂いて・・・

あちこちに、、解答となり得る・・・３桁が、満載・・・・

そそ、、、どこかを拾わせようとしたのだ。

 

で、解答例　２）は・・・・RANK　　を使う。

 

３７

{=SUM(RANK(B2:B4,B2:B10)*{1;10;100})}

 

だが、、すぐ、、３５，３３　が出てきたね、、・・・・げげーーーー

 

３）も、同じ路線で、、ほぼ工夫も、細工も無し・・・・・

５１

{=SUM(MID(E15,{1;2;3},1)*10^(RANK(B5:B7,B5:B7)-1))}

 

だが、みなさん、、

いろいろ、弄って頂き感謝です。

ランダム系・・・・っまだまだ、続くつもりが・・・・・

もう、、、出せないかも、、、、　　　　　　（ジョー3さん）

第１８３回 ランダム関数 その２

３桁の数字をF9を押下することにより

ランダムに表示したい。ただし下の二つの条件を

満たさなければならない。

１．数字に重複はない。（１１９とかはだめ）

２．０は使わない。

つまり１２３から９８７の間の数になる・・・

　　　　　　　　　　　　　　（ジョー３さん）

解答用参考ファイル；Q183をダウンロード

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

尚、解答締め切りは１１／１７（日）の午後８時の予定です。

状況によっては 変更される可能性があります。

また、解答発表までは直接数式を書き込むこと・ポイントとなる関数名を

書き込むことはご遠慮ください。

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

第１８２回 ランダム関数 その１ 解答例

出題者のね、、、解答例ですが、、、

これがまた、、、問題児なのだ。

まあ、、、いちおう、、、、素顔を晒すとね、，，，，

２７ {=SUM(16-LEN(B2:B11+pi()))}

でも、、、 ２７未満と言われたら、、、

出したくないけど、、、

出さないわけには行かない・・・か、、、

２４ {=SUM(16-LEN(B:B+pi()))}

て、ことで、、、、

だが、、、１００年エラー無しが・・・・続きますように・・・・

　　　　　　　　　　　　　　　　　(ジョー３さん）

第１８２回 ランダム関数 その１

ランダム関数って面白い

=rand()

これ、最初は０と１の間の決まった単位間隔と思ったり

しかし、違った =rand()*10^15だと、0から10^15の間の整数が・・・・

必ずしも出るわけでない ・・・・・・・

整数にしたい・・・Ｂ２からＢ１１・・・

それで、=int(rand()*10^15 それで、

問題・・・いくらでも出来そうだが、、、

まずは、、、、

【問題】 セルB2からB11に数値が表示されている数値は F9キーを押下するとランダムに変化します。

そのうち、１５桁のものはいくつあるでしょうか？ それを求める数式を考え出して下さい。

　　　　　　　　　　　　　　　　　　　　　（ジョー３さん出題）

※この問題はジョー３さんから、３問セットの問題として 頂いた物のなかの一つです。

ジョー３さんが「かんたんすぎかなーーー」と 仰っている通り、

答を出すだけならそうだと思うのですが 難しければ良いというものでもないので･･･

新しい人がコメントをくれたりしても嬉しいし･･･　

そういう訳で単独で公開しました。　

もしも第２問を、という声が多ければ追加で公開します。

　　　　　　　　　　　　　　　（くまぷー）

解答用参考ファイル：Q182をダウンロード

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

尚、解答締め切りは１１／１０（日）の午後９時の予定です。状況によっては

変更される可能性があります。

また、解答発表までは直接数式を書き込むこと・ポイントとなる関数名を

書き込むことはご遠慮ください。

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

第１８１回 名前検索 超初級編 解答例

＜出題者解答例＞

今回もわたしの解答例など要らないと思うのですが、、、

これさえ無ければ出題にもっと気が向くような・・・

どんな問題でも殆ど考えもせずに式を書く事が癖になってしまい

より短くと言った様に色々考えて式を書く事が苦手になってきた

この問題、、、面白く無く、、、すみません この後の２問も殆ど同じ問題故、、、

２問同時出題　ＯＲ　１つ却下して即卒業編 が、いいと思うのですが、、、

もう１問送ってはありますが、、、これも面白く無さそう

、、、無意識で

作成時に解答例も自然と作っているので 面白さを忘れ、少しでも短く、、、

そんな問題作りになっているのかな あ～～あ、、、

しょうが無い。。。

{=INDEX(C:C,MATCH(1,0/(LEN(C4:C85) 　

-LEN(SUBSTITUTE(SUBSTITUTE(C4:C85,LEFT(E3),,1),RIGHT(E3),,1))=2))+3)}

　　　　　　　　　　　　　　　　　　　　　　　　　　　（からくちさん）

第１８１回 名前検索 超初級編

E3にひらがなが２文字表示されます 
順番に関係なく両方共使われている名前を 
C4：C85から選び　G3に表示してください 
エラー処理は必要ありません 
無い場合はエラーで結構です 
また、複数あった場合はどれでも結構です 
＜例＞ 
E3　：　 「な　・　や」の場合 
G3　：　「こばやし　かな」 
　　　　 「ながお　まりや」　等 

　　　　　　　　　　　　　　　　　　　　　　　　　（からくちさん）

解答用参考ファイル： Q181をダウンロード

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

尚、解答締め切りは１１／０３（日）の午後８時の予定です。状況によっては

変更される可能性があります。

また、解答発表までは直接数式を書き込むこと・ポイントとなる関数名を

書き込むことはご遠慮ください。

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

第１８０回 セル内の品名合計 解答例

◆いくら考えても、これ以上の解答ができそうにないので、お送りします

９０：{=SUM(LEFT(SUBSTITUTE(0&MID(B:B,FIND(" "&C2&" ",C2&B:B&" "&C2&" ")+2,9),"円",10^-9),9)/10)}

◆ただし、EXCEL2013で確認していますので、B:Bタイプができなければ、

９４：{=SUM(LEFT(SUBSTITUTE(0&MID(B3:B7,FIND(" "&C2&" ",C2&B3:B7&" "&C2&" ")+2,9),"円",10^-9),9)/10)}

◆この解答は、1000万未満まで計算可能です。

　　　　　　　　　　　　　　　　　　　　　　　　　　　（maronさん)

第１８０回 セル内の品名合計

問題】

　◆Ａ３：Ａ７のうちＤ２の品名の合計をＥ２に！

 

【条件】

　◆同じセル内に、同じ品名はありません

　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　（maronさん）

解答用参考ファイル： Q180をダウンロード

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

尚、解答締め切りは１０／２７（日）の午後８時の予定です。状況によっては

変更される可能性があります。

また、解答発表までは直接数式を書き込むこと・ポイントとなる関数名を

書き込むことはご遠慮ください。

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

第１７９回 人口は、、、 解答例（代理）

からくちさんのPCがトラブっていて出題者解答例を

送れないみたいなので僭越ながら・・・・

 

手順1：検索すべきデータを何とか規則的に並べる。

　　　　　国名、数字、という形に統一したい。ところが行末の

　　　　　数字には「、」がないので、それを補う。

　　　　　B7&"、"&B9&"、"&B11&"、"&B13&"、"&B15&"、"&B17&"、"&B19&"、"　　　　・・・（1）

 

手順2：Find関数で（1）から国名（B5）を検索する。

　　　　　=FIND(B5,B7&"、"&B9&"、"&B11&"、"&B13&"、"&B15&"、"&B17&"、"&B19&"、")　・・・(2)

 

手順3：人口を表す数字は(2)で求めた数値に国名の文字数プラス1（句点）から始まるので・・・

　　　　=FIND(B5,B7&"、"&B9&"、"&B11&"、"&B13&"、"&B15&"、"&B17&"、"&B19&"、")+LEN(B5)+1　・・・(3)

　　　　これで人口を示す数字の開始位置がわかった。

 

手順4：手順3で人口を示す数字の開始位置が分かったので終了位置を求めたい。

　　　　Find関数で検索開始位置を「人口を示す数字の開始位置」以降にして「、」の位置を求めると・・・

　　　　=FIND("、",B7&"、"&B9&"、"&B11&"、"&B13&"、"&B15&"、"&B17&"、"&B19&"、",(3)の式)　　・・・(4)

手順5：Mid関数で必要な部分を切り出す。

　　　　=MID(B7&"、"&B9&"、"&B11&"、"&B13&"、"&B15&"、"&B17&"、"&B19&"、",(3)の式,(4)の式-(3)の式)

 

いやあ、その結果・・・210文字　＼(><)/ギョッ

 

=MID(B7&"、"&B9&"、"&B11&"、"&B13&"、"&B15&"、"&B17&"、"&B19&"、",FIND(B5,B7&"、"&B9&"、"&B11&"、"&B13&"、"&B15&"、"&B17&"、"&B19&"、")+LEN(B5)+1,F5-(FIND(B5,B7&"、"&B9&"、"&B11&"、"&B13&"、"&B15&"、"&B17&"、"&B19&"、")+LEN(B5)+1))

（くまぷー）

 

 

 

第１７９回 人口は、、、

※ 何故かＱ＆Ａの質問者さんは後で面倒な表を作りたがります。そこでそれを問題にしてみました。
※ B7：B19は「国名、人口、国名、人口、、、」です。（ただトリニダード、トバゴの様な国名もあり）
※ B5の国名の人口をD5に求めてください。
　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　（からくちさん）

解答用参考ファイル： Q179をダウンロード

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

尚、解答締め切りは１０／０６（日）１０／１３（日）の午後８時の予定です。状況によっては

変更される可能性があります。

また、解答発表までは直接数式を書き込むこと・ポイントとなる関数名を

書き込むことはご遠慮ください。

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

第178回 最後に勝ち残るのは？ 解答例

最初の案です。

 ４７

無駄だらけですが、、、

=IF(C$2＜A6,"",MID(REPT(B5,11),C$3+1,LEN(B5)-1))

　　　　　　　　　　　　　　　　　　　　　　　　　（ジョー３さん）

第178回 最後に勝ち残るのは？

　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　(ジョー３さん）

解答用参考ファイル： Q178をダウンロード

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

尚、解答締め切りは０９／２９（日）の午後８時の予定です。状況によっては

変更される可能性があります。

また、解答発表までは直接数式を書き込むこと・ポイントとなる関数名を

書き込むことはご遠慮ください。

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

第177回 羊と山羊 解答例

出題時は71文字でした

{=MIN(IF(ROUND(COLUMN(A:CU)/ROW(1:99),2)=C5,CEILING(20,ROW(1:99)),99))}

１～100　　を　　１～100　で　　割って　　C5　と比べて

同じので、　　20以上で小さいの・・・と、、、全くの素直・・・

 

だが、、、CEILING　　の風景が気に入って、、これが無駄に気付くのがだいぶ遅かった。

 

（ジョー３さん）

第177回 羊と山羊

羊と山羊が草を食っている。百匹以上
範囲を決めて数えてみた
そして、羊の割合を計算した
=round(羊の数／全体数,2)
だが、結果を見て気になった
同じ結果の％となる組み合わせが・・・
外にもあるはず・・・・とね、、

同じ％値となり
全体数は２０以上で最小の
羊の数　と　全体数　を見つけて下さい
勿論、テスト値しかないなら同じでいい。　　（ジョー3さん)

解答用参考ファイル：Q177をダウンロード

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

尚、解答締め切りは０９／２２（日）の午後８時の予定です。状況によっては

変更される可能性があります。

また、解答発表までは直接数式を書き込むこと・ポイントとなる関数名を

書き込むことはご遠慮ください。

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

三四郎マクロでゲーム作成・・・１５パズル

三四郎そのものが消えていくようです。

当然、三四郎マクロも消えていきます。

一太郎2013玄の初期設定では「マクロ」はメニューにありません・・・

 そう言えば、昔、一太郎マクロで１５パズル、作ったよな～

消えゆくSuper Play Lite（Justsystemのマクロ）が不憫でなりません。

 

 

あ、Excelだって「開発」タブは初期状態では隠れているってか！！

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

 

遊び方：「開始」をクリックする。
 　　　　　ESCを押すとゲーム中止。  
   
白いパネルの隣の数字をパネルをクリックすると   
２つのパネルが入れ替わります。   

上のようになるように数字パネルを並べて下さい。

15PUZZLE(Slide)をダウンロード

 

 

 

 

第１７６回 15ヶ月続きますように・・・・‏ 解答例

ありがとうございます。

 

A1　に　１月　と入力　　表示形式で　A　を加える

B1　に　＝A1＆"B"

C1　に　＝A1＆"C"

A1からC1を選んで、まとめて右にオートフィル・・・・・

 

見た感じだけですが、、、許して下さい。

 

 

関数だけの答えは、おまかせ、、、

 

　　　　　　　　　　　　　　　　　　　（解答例　なんでもあり版　ジョー３さん）

第１７６回 15ヶ月続きますように・・・・‏

セルA1に1月と入力・・・・
 
右にオートフィル・・・・・1月2月3月・・・・12月、、

その後又1月2月・・・・100年でも続く・・・・・
 
ですよねーーーーー
 
 で、、表を作って月を3っつに分けたくなった。
  
1月A、1月B、1月C、2月A、2月B、2月C・・・・・・・・12月C、1月A・・・・・・・としたいのだ。
  
 
安易にしたら
 
だが、、、12ヶ月しか続かないのだ、、、12月C、13月A・・・・・
 
と、、、なってね、、、
 
 
 
では、、、
 
1月A、1月B、1月C、2月A、2月B、2月C・・・・・・・・12月C、1月A・・・・・・・となる、、

簡単な方法は、いかに、、、
 

 
方法は、なんでもあり、、、簡単であれば、、、それが良い、、、、
 
セルA1に式を書いて、作業列なしで・・・・なんて、、言いません。。。
 
ぼそっ（それが理想かも知れないけどね）・・・・←（本心）
 
 
 
式で5時間より、、、テクニックで30分が良いかもしれないからねーーーー

　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　（ジョ-３さん）

解答用参考ファイル：なし

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

尚、解答締め切りは０８／２４（土）０８／２５（日）の午後８時の予定です。状況によっては

変更される可能性があります。

また、解答発表までは直接数式を書き込むこと・ポイントとなる関数名を

書き込むことはご遠慮ください。

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

再開？関数でできますか～？

ジョー３さんから久々にお題を頂きました。

当初は「１００年続きますように」というタイトルであるらしかった。

ジョー３さんは一青窈のファンなのか？

酔っ払って「ハナミズキ」を歌いながら鼻水を垂らしているに違いない。

 

そうそう、「関数でできますか～？」が中断してから

久しいので再開しても気づかない人が多いと思う･･･

告知期間を置くのでよろしくです。

公開は来週の火曜辺りでどうでしょうか？

Noughts and Crosses

Tic Tac Toe とも言います。単なる３目並べです。

本当は学期末で忙しいのですが、やるべきことをやらずに

戯れに作りました。一太郎マクロで作ったと言うだけがウリです。

特に芸はありません。(^^ゞ

Noughts_and_Crossesをダウンロード

あ、一太郎のバージョンは２０１３　玄　です。　(^^ゞ

第１７５回 リーグ戦 その４ 解答例

完璧な、満足できる・・・ような、、案ではありません。
 
あり得ない、データが出てくるかも知れないし、、
 
約280文字
 
 
 
=IF(A2=1,INT(RAND()*5)+5,IF(A2=9,23-INT(SUM(C$1:C1,1)/2),IF(A2=10,45-SUM(C$1:C1),
 
INT(RAND()*(10-COUNTIF(C$1:C1,0)*2-COUNTIF(C$1:C1,1)-COUNTIF(C$1:C1,"＜5")
 
-COUNTIF(C$1:C1,9)*2-COUNTIF(C$1:C1,8)-COUNTIF(C$1:C1,"＞4")))
 
+COUNTIF(C$1:C1,0)*2+COUNTIF(C$1:C1,1)+COUNTIF(C$1:C1,"＜5"))))

　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　（ジョー３さん）

第１７５回 リーグ戦 その４

リーグ戦の勝ち数を記録します
セルＣ２に式を書いて下さい
セルＣ３：Ｃ１１にコピー致します
色々のパターンがランダムで出るような式
あり得ない勝ち数は駄目です
（９，９・・・＝全勝が二人とかは駄目）

　　　　　　　　　　　　　　　　　　　　　　　　　　　　（ジョー３さん）

解答用参考ファイル： Q175をダウンロード

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

尚、解答締め切りは０６／１５（土）の午後８時の予定です。状況によっては

変更される可能性があります。

また、解答発表までは直接数式を書き込むこと・ポイントとなる関数名を

書き込むことはご遠慮ください。

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

 

 

 

 

しかし・・・・いったいどうなっているんだ？

sakudaさんは自然に治ったりしていたみたいだが・・・

(ToT)　くまぷーです。

第１７４回 リーグ戦 その３ 解答例

出題の、構想としては現実的な・・・・に、近いものだったので、
 
少し満足しています。ですが、皆さんが、簡単に解いちゃった上
 
色々な方法があるみたいなので、皆さんの解答が、楽しみです。
 
 
 
最初の出題時の92文字案です。　　　　　（ジョー３さん）
 
=IF(ROW()=COLUMN(),"＼",IF(ROW()>COLUMN(),INT(RAND()*2),1-INDIRECT(ADDRESS(COLUMN(),ROW()))))

第１７４回 リーグ戦 その３

リーグ戦の結果一覧表を作りたい       
色々なケースが出るようにしたい       
       
B2セルに式を書いてください       
他のセル（７×７）にその式をコピーして       
リーグ戦の結果例すべてがランダムに作成       
出来るようにしたいのだ。       
       
日本語、、、難しいなーーー       （ジョ-３さん）

解答用参考ファイル： Q174をダウンロード

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

尚、解答締め切りは０６／０８（土）の午後８時の予定です。状況によっては

変更される可能性があります。

また、解答発表までは直接数式を書き込むこと・ポイントとなる関数名を

書き込むことはご遠慮ください。

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

 

 

 

 

いやー、どうして書き込めないんだ？！

まるでスパム投稿者に指定されてしまったかのようだ・・・(ToT)　　（くまぷー）