第１１１回 「カネゴン」を逆さまに・・・ 解答例

=IF(A1="","",MID(A1,LEN(B1)+1,1) & B1)

３８文字です。上式をB１に入力して下さい。循環参照になるので

反復計算をオンにしてください。F9を押すとA1の文字列が逆順になって表示されます。

A1をクリアーするとリセットされます。これはもともとはきっちーさんが何年か前に

当ブログでやっていた「三四郎秘伝・奥義の書」に投稿して頂いたものを元にしています。

ちなみに６番の「ごじらを逆さまに」が元ネタです。

 

 

minさんの仰っていた・・・

＞循環参照では、
＞ず、元の文字が入っていない状態で式を入れる。
＞その後に元の文字を入れる。
＞その後元の文字は変更しない。
＞で良ければ35でした。

 

=MID(A1,LEN(B1)+1,1) &T( B1)

２８文字でした。

Karakuchi_San_Q111をダウンロード（からくちさん）

くまぷーファイル（F9を押さなくても一発変換！！）

Kuma_Pooh_Q111をダウンロード

Comments

[投稿情報:]

今日は家に帰らないので持ってきたものを張り付けます。

元の文字が最初に入っていない状態で式を入れる。その後に元の文字を入れる。その文字は変更しない場合。
35=IF(A5=0,"",MID(A5,LEN(B5)+1,1)&B5)

[投稿情報: からくち]

＞循環参照になるので反復計算をオンにしてください。
これを関数以外、すなわち機能を使用しても良い
と、拡大解釈していいのでしたら、、、
みなさんご存知、、、と思いますが、、、

=A1（文字数３）

で、いいのでは

[投稿情報: くまぷー]

>=A1（文字数３）

えっ？何ですか～？
わからないよ～

[投稿情報: min]

でもいいかもしれませんが・・・

[投稿情報: jyo-3]

>ｶﾈｺﾞﾝ　　　　とか、、、
>・・・・・・・・・・・・・・
>恐ろしい問題かも、、、、
・・・・・
と、書いたとき、、、、、
反応が無かったので、、、、
半角にも対応と思いました、、、、、

半角カタカナ等は、、、対応無しですね??

[投稿情報: からくち]

＞えっ？何ですか～？
＞わからないよ～
ホント～～～ですか
それでしたらメールで送ります

[投稿情報: jyo-3]

＞>=A1（文字数３）

＞えっ？何ですか～？
＞わからないよ～　×２

へーーーーー
想像もつかない、、、すごいことです、、、、

[投稿情報: min]

出すのもないから
もうひとつ家から持ってきたものを張り付けます。

元の文字が最初に入っいてその後に式を入れる。その文字は変更しない場合。
=MID(A5,LEN(N(B5))+1,1)&N(B5)

[投稿情報: min]

nとtを間違えましたm(__)m

[投稿情報: くまぷー]

>半角カタカナ等は、、、対応無しですね??

すみません。そうです。m(__)m

[投稿情報: くまぷー]

＞それでしたらメールで送ります

ぜひぜひ～

[投稿情報: くまぷー]

からくちさん、なるほど～
流石です。はじめどうやっているのかわかりませんでした。
そういう手があったとは！！

[投稿情報: くまぷー]

流石minさんですね～
基本的なエンジンの部分はバレてましたね～

[投稿情報: くまぷー]

からくちさん、ファイルをアップしてもいいですか？

[投稿情報: jyo-3]

からくちさん
・・・・・・
もしかしたら、、、
・・・
あの手は、、わたしも、、、、・・・・
・・・・・・・
遊んではいた、、、
・・・・・
が、、、途中でやめた、、、
でも、、、

・・・・・・・
とっても、、いいとおもいます、、、
・・・・・・
・・・・

[投稿情報: くまぷー]

あ、からくちさんの答を聞く前にアップしてしまいました。
きっと許してくれるだろう(^^ゞ

[投稿情報: くまぷー]

＞あの手は、、わたしも、、、、・・・・

ジョー３さんはやりそうですね～

[投稿情報: jyo-3]

＞からくちさん、ファイルをアップしてもいいですか？
＞とっても、、いいとおもいます、、、
・・・・・・
同じなら、、ちょっと残念ながら、、、半角に・・・惜しい、、

[投稿情報: jyo-3]

＞あ、からくちさんの答を聞く前にアップしてしまいました。
・・・・・わたしは、、、、そのファイル開きません・・・・・
・・・夢は、・・・・
・・・・・夢のまま、、、・・・・・

[投稿情報: y sakuda]

28のうまく動かないな・・・・
何か間違えたんかな？
からくちさんの未だ良く分からず・・・・

[投稿情報: くまぷー]

>28のうまく動かないな・・・・

動きませんか～？

１．反復計算オン
２．B1に=MID(A1,LEN(B1)+1,1) &T( B1)
３．A1にカネゴン
４．F９を押す

[投稿情報: y sakuda]

一度B1を初期化しないとダメか・・・・
私も反復で何とかと思い、初めて投げちゃったんですが、文字列の場合なぜか一挙に行かず、F9何度も押さないと動かない。
この理由も分からない・・・・

からくちさんの降参です。だれか種明かししてください^^;

[投稿情報: y sakuda]

からくちさんのやっと分かった・・・・
鈍いことおびただしいな^^;

[投稿情報: くまぷー]

＞この理由も分からない・・・・

ぜんぜん気にしていませんでした・・・

[投稿情報: くまぷー]

=IF(A4="","",IF(LEN(B4)>LEN(A4),B4,MID(A4,LEN(B4)+1,1)&T(B4)))

これならばF９を押さずに一発だと思いますが・・・

１．反復計算オン
２．B4に数式入力
３．A4に文字列

[投稿情報: くまぷー]

あ、ダメだ・・・

[投稿情報: くまぷー]

F9を押さなくても一発変換のファイルをアップしました。

ふふふふ・・・ずるですか・・・

[投稿情報: y sakuda]

どうもよく分かりませんが、文字列対象の循環は結構癖があるみたいですね。

[投稿情報: min]

>ずるですか・・・
良いですねえ。

さすが、循環参照の使い手。。

[投稿情報: min]

あっちの式は、
=1-A1
でもいいような気もしますが。
要は計算後の数値が収束しなければよい？

[投稿情報: くまぷー]

minさんにはバレバレのようですね。

＞要は計算後の数値が収束しなければよい？
「収束」という意味がわからないのですが

＞=1-A1
試してはいませんがいいと思いますけど・・・

[投稿情報: min]

長いけどa1の文字の変更に初期化が必要ない奴やってみました。
ただし、とりあえず文字数は100文字まで
{=IF(AND(LEN(A1)=LEN(B1),RIGHT(LEFT(A1,ROW(1:100)))=LEFT(RIGHT(B1,ROW(1:100)))),B1,IF(LEN(A1)＜LEN(B1),"",RIGHT(LEFT(A1,LEN(B1)+1))&B1))}
たとえばA1に
enukisoroyomneniar atisamiraninaweso ahisotok
といれて
F9連打
そのあとa1を初期化せずすぐに
usamisiagenoukisoroy osokaritok
などといれてもOK

あ、最初に文字が入力されていて、そのあとに式を入力してもOKです。

＞「収束」という意味
言葉の使い方間違えたかな。
反復計算しても数値に変化がない又は変化が極少というニュアンスです。

[投稿情報: くまぷー]

>反復計算しても数値に変化がない又は変化が極少というニュアンスです。

それなら動くと思います。
反復計算のあとに
A1に･･･

＞=1-A1

･･･が入力されていて
十分なだけ計算が繰り返されればよいはず。

[投稿情報: min]

問題から離れてしまいますが、上の長い奴のストッパーを外した方が面白いような気がして・・・ちょっと改悪しました。。
B１=IF(LEN(A1)＜=LEN(B1),"",T(B1)&LEFT(RIGHT(A1,LEN(T(B1))+1)))
として
B１はセルの書式設定を
縦位置＝上詰め
折り返して全体を表示する
B列の列幅50位
1行の行幅150位
にして

A1に
---ここからコピー---
。すまいてしに元をのもたい頂てし稿投に」書の義奥・伝秘郎四三「たいてっやでグロブ当
に前か年何がんさーちっきはともともはれこ。すまれさトッセリとるすーアリクを1A
。すまれさ示表てっなに順逆が列字文の1Aとす押を9F。いさだくてしにンオを算計復反
でのるなに照参環循。いさ下てし力入に１Bを式上。すで字文８３
)1B & )1,1+)1B(NEL,1A(DIM,"",""=1A(FI=
例答解 ・・・にまさ逆を」ンゴネカ「　回１１１第
)土( 日42月 21年1102
---ここまで---
を貼り付けて
F9をいっぱい押す。。

う～ん。自己満足でした。

ところで、ブログの調子はよくなったのかな？

[投稿情報: くまぷー]

>ところで、ブログの調子はよくなったのかな？

IE9にアップデートしたのがいけなかったようです。
古いPCを使ったらなんともありませんでした。

[投稿情報: min]

あれ、今週はお休みかな？
しかし良く続きますねぇ。
年末年始にかけてのコンテストが懐かしい。

[投稿情報: くまぷー]

すみません。これからアップします。

＞年末年始にかけてのコンテストが懐かしい。

こんどのはエクセルコンテスト風味です(^^ゞ