Excel ＶＢＡ等での処理方法

質問

123　　　　　　　　　　　　
12345　　　　　　　
123456
1234567

↓

0000123
0012345
0123456
1234567

ＶＢＡもしくは関数の処理で、Ａ1に7と入れ場合、上記のように、Ａ2以降が123であれば0000123、1234であれば0001234、1234567なら、そのまま1234567になるように更に文字列にするにはどうすればいいでしょうか？処理行は不特定です。

よろしくお願いします。

回答No.2

ebis · ベストアンサー

A1に7以外も入るとして
例えばB2に
=REPT("0",A$1-LEN(A2))&A2
と入れて下の方にもコピーではどうでしょう。

字数の判定は入っていないので、
A1に入れた字数以上の数値の桁があった場合はエラーになります。

回答No.3

hallo-2007

色々方法があるので、一案です。
=RIGHT("0000000"&A2,7)
A2セルの頭に0を７つ付けて、その文字の右から7文字を取得
みたいな関数です。
シート関数でもVBA上での関数でも使えます。

回答No.1

hana-hana3

Ａ列に数字がある場合
Ｂ列に下記の式を入れて、下にフィルコピー。
=TEXT(A1,"0000000")

＞更に文字列にするにはどうすればいいでしょうか？

Ｂ列を選択して、コピー
右クリックから、「形式を選択して貼り付け」を選びます。
ダイアログボックスの「○　値」を選択して、「ＯＫ」で文字になります。