エクセルで数字を1文字ずつセルに入れたい

質問

エクセルでの質問です
1つのセルに例えば”1530”という数字を入力します
そうすると　その数字を分解して　ｆ１のセルに”０”　e1のセルには”３” d1のセルに”5”　ｃ１のセルに”１”　ｂ１のセルに”￥”が自動的に入るようにしたいのですが　どうすれば良いでしょう
数字は4ケタ～7ケタまで変わります
よろしくお願いいたします。

回答No.2

tom04 · ベストアンサー

こんにちは！
外していたらごめんなさい。

データはA列の1行目からあるとします。
B1セルに
=IF($A1="","",IF(LEN($A1)+1<COLUMN(A1),"",MID("\"&$A1,COLUMN(A1),1)))
として列方向と行方向にオートフィルではどうでしょうか？m(__)m

お礼

ありがとうございました。
御蔭さまで出来ました。

回答No.1

Turbo415

MID関数が一番簡単でしょう。
A1セルに数値を入れるとして最初のセルC1に=mid(＄A＄1,1,1)とします。それを横に７つコピーします。
その後、カンマで区切られた真ん中の数値１を、１つ隣なら２、２つ隣なら３にすれば良いです。
意味としたら、A1セルにある数値の、１桁目の１文字を表示という関数です。
\マークはB1セルに=if(isblank(A1),"","\")とすると、A1に数値が入ると￥を表示します。

お礼

ありがとうございます。
いろいろ試してみます。