Excelでの入力方法について

質問

以前も今回、回答を求めている方法をやったのですが
昔のことすぎて、やり方や名称的なことを何も覚えていないため、質問させていただきます。

１つのセルに半角で数字を10ケタ打って
その10ケタがそのセルより右のセルに順繰りに1ケタずつ自動的に入力されるという方法をやりたいです。

ただ、やり方をまったく思い出せないので教えていただきたいです。
現在はExcel2010を使っています。（2003の時はできたので、2010でもできると勝手に思っております）

例としてA1に「1758375625」と打つと
A2には「1」、A3には「7」、A4には「5」……が自動に入力されるという形です。
（うろ覚えですが、1桁目には関係のない数字を入れないといけなかったような気もします。（実質隣のセルに反映されるのは2桁目からという記憶が残っていますが、正直昔のことなので全然違うかもしれません）

現状抱えている案件の入力に際して
これより、より最適な入力方法があるかもしれませんが
マクロや関数はほんの少ししか知識がないため
以前やったことのある上記方法でやりたいです。

あと、一応書いておきますが
こういう入力をした状態で納品するわけではないので、
仕事でこういう入力方法はするべきではない等の回答は遠慮させていただきます。

回答No.5

chonami · ベストアンサー

B1=MID(TEXT($A$1,"??????????"),COLUMN(A1),1)

K1までフィルコピー

10桁までなら何桁でも右詰めで表示されます。

回答No.4

gyouda1114

一例です
画像参照
最高が9桁なら
A1に数値
B1に
=IF(LEN($A1)>=10-COLUMN(A1),LEFT(RIGHT($A1,10-COLUMN(A1)),1),"")
B1を右方下方にオートフィル

最高桁数に応じて10(桁数+1)を変えてください

回答No.3

MarcoRossiItaly

No.2 です。度々すみません。No.2 の数式は、次式に差し替えていただいたほうがベターかと思います。文字列だと他の計算にそのまま使えないといったことが起こり得るので、始めから数値に変換するため、足し算を追加しました。

B1　=0+mid($A1,columns($B1:b1),1)

回答No.2

MarcoRossiItaly

A1　1758375625
B1　=mid($A1,columns($B1:b1),1)

B1 セルを右方向に、適当に P 列あたりまでドラッグ。

＞１つのセルに半角で数字を10ケタ打って……

基本的に、全角で入力しても半角に自動変換されます。また上式において A1 の桁数は、（Excel の仕様により）15 桁以内であれば、何桁でも問題ありません。

＞うろ覚えですが、1桁目には関係のない数字を入れないといけなかったような気もします。

上式には、そういった仕様は含めていません。1 桁目からいきなり隣のセルに表示されます。

＞マクロや関数はほんの少ししか知識がないため以前やったことのある上記方法でやりたいです。

どちらも使わないというのは厳しいので、ご説明を読んだ感じでは、関数を含む数式をセルに記入されていたのでしょう。

＞……仕事でこういう入力方法は……

データの内容も何も不明ですから、回答者としては、コメントのしようがありません。またご質問の内容は、基本的な易しい計算なので、あえて良し悪しを考えるには及びません。

＞……等の回答は遠慮させていただきます。

回答者としても、その手のコメントは固く遠慮します。こちらの QA サイトがどういう雰囲気の場所なのか、的外れな発言でないかを、今後は前もって確認してから質問を寄せるようにしてください。

お礼

回答ありがとうございました。

皆さんがMacro...さんのような回答者だったら
余計な文章は挟みませんでした。

補足

Excelに関して詳しくないため
適当に10ケタと書いてしまいましたが、Excel的に15ケタ以上はできないんですね。
実際は21ケタですので、こういうやり方はあきらめたいと思います。
（近々タッチパネルのパソコンが修理から戻ってくるため、そうすれば作業も効率化されるため、我慢します）

回答No.1

noname#204879

A2: =MID(RIGHT(REPT(" ",10)&A$1,10),ROW(A1),1)