数字の桁数を変更する

トップページ（目次）

320.数字の桁数を変更する

＜実行前後＞

→

Sub 数字の桁数を変更する()
    
    加工結果 = Format("33", "0000")
    
    MsgBox 加工結果
    
End Sub

基本的に、セルに加工後の値を入力しても左側の0は消えてしまうので、この処理は「aaa0033bbb」などのように連番を振っている場合などに活躍します。