エクセルの入力について

質問

教えてください。エクセルで一つのセルに数字を入力したものが、次の右となりのセルに一文字ずつ表示される方法。例えば、注文書ような用紙に１２３００００と一つのセルに入力すると１次のセルに２次のセルに３のようになりますか。

回答No.5

Nobu-W

横やりですみません＞＜
No1さんの回答に付け加えるとぉ～
Ｂ２：＝ｍｉｄ（Ａ２，１，１）＊１
すべて最後に＊１を付け加えてやると、数値扱いにできますよ

回答No.4

msMike

添付図参照
１．セル B1 に次の[条件付き書式]を設定
￣￣数式 =COLUMN(A1)<=(MAX($J$1:$J$7)-$J1)
￣￣書式 フォント色を白
２．式 =LEN(A1) を入力したセル J1 を下方にオートフィル
３．次式を入力したセル B1 を右方に(H列まで)オートフィル
￣￣ =IFERROR(MID(RIGHT($A1+10^MAX($J$1:$J$7),MAX($J$1:$J$7)),COLUMN(A1),1)*1,"")
４．範囲 B1:H1 を下方にオートフィル

回答No.3

bunjii

>エクセルで一つのセルに数字を入力したものが、次の右となりのセルに一文字ずつ表示される方法。
>金額なので、右セルが１円単位なので、右に寄せたいです。（回答No.1への補足）
矛盾します。
A2セルへ1230000と入力したとき、B2セルへ1、C2セルへ2、D2セルへ3、E2～H2セルまで0が代入される数式は回答No.1で良いと思います。
しかし、補足では「金額なので、・・・・・右に寄せたい」と言っています。
A2の数値は最大何ケタかの指定をせずに右に寄せたいと言っても処理のしようがありません。
仮に、最大桁数を10桁としたとき、B2セルへ入力する数式は次のようになります。
=IF(COLUMNS(B2:$K2)>LEN($A2),"",MID($A2,LEN($A2)-COLUMNS(B2:$K2)+1,1))
B2セルを右へK2セルまでコピーすればあなたの求める結果になるでしょう。

回答No.2

m3_maki

横から失礼します。

> 金額なので、右セルが１円単位なので、右に寄せたいです。

右寄せなら、何枡か分からないと無理でしょ。
桁数がオーバーした場合どうするかも考慮しなきゃ。

回答No.1

panacon

mid関数を連続すればできます。
mid関数は、対象セルの●番目から□文字を表示します。だから1文字だけ表示すれば希望のようになります。
入力欄をA2として、B2からH2まで関数を入れるとすると
B2：=mid(A2,1,1)
C2：=mid(A2,2,1)
D2：=mid(A2,3,1)
E2：=mid(A2,4,1)
F2：=mid(A2,5,1)
G2：=mid(A2,6,1)
H2：=mid(A2,7,1)

お礼

さっそくの回答、ありがとうございました。
非常に助かりました。

補足

金額なので、右セルが１円単位なので、右に寄せたいです。