特定のセルの桁数を変更したい

質問

お世話になります。

ＶＢＡのマクロを作成していまして、
行毎に処理を行う過程で
特定の数値の入力されたセルだけ桁数を８桁にしたいのですが
そのような関数や方法などありませんでしょうか？
自分の探し方が悪いのでしょうか？

どうぞよろしくお願い致します。

回答No.1

pauNed · ベストアンサー

こんにちは。
表示だけの問題でしたら、セルの表示形式を
.NumberFormat = "00000000"

元の値を変更する場合は『文字列』として設定する事になると思います。
With Sheets("sheet1").Range("A1")
.NumberFormat = "@"
.Value = Format(.Value, "00000000")
End With
こんな感じでFormat関数が使えます。

お礼

ありがとうございます。
早速試してみました。

Format関数を使うんですね。
勉強になります。
ありがとうございます。