概要
Excelでは、「45」を「00045」にしたり、「45」を「45000」にしたりと、数値にゼロを付け足して一定の桁数に揃える処理が必要になる場面があります。これは伝票番号、ID、コード生成、文字列整形などさまざまな業務で活用されます。
本記事では、VBAを使って数値にゼロを追加する方法を「左側にゼロ追加(ゼロ埋め)」「右側にゼロ追加(桁揃え)」の2パターンに分けてご紹介いたします。
サンプルコード
Sub PadNumbersWithZeros()
Dim padTemplate As String
Dim totalLength As Long
Dim cell As Range
' 5桁のゼロ文字列を作成(パディング用)
padTemplate = String(5, "0")
totalLength = Len(padTemplate)
' A列:左側にゼロを追加して5桁に揃える(例:48 → 00048)
For Each cell In Range("C3:C6")
cell.Value = Right(padTemplate & cell.Value, totalLength)
Next cell
' B列:右側にゼロを追加して5桁に揃える(例:48 → 48000)
For Each cell In Range("D3:D6")
cell.Value = Left(cell.Value & padTemplate, totalLength)
Next cell
End Sub
コード解説
String(5, "0")
- 5個の「0」を連結した文字列(”00000″)を作成します。
String(桁数, 文字)という構文は、任意の文字を指定回数繰り返すために使います。
Right(padTemplate & 値, 長さ)
- 左側にゼロを付加した上で、指定した桁数だけ右側を切り出すことで、左詰めのゼロ埋めになります。
- 例:
"00000" & 48→"0000048"→Right(..., 5)→"00048"
Left(値 & padTemplate, 長さ)
- 右側にゼロを付加した上で、指定した桁数だけ左側を切り出すことで、右詰めのゼロ埋めになります。
- 例:
48 & "00000"→"4800000"→Left(..., 5)→"48000"
応用例
| 処理内容 | 使用例 |
|---|---|
| 左側にゼロを追加 | 「45」→「00045」(伝票番号、IDなど) |
| 右側にゼロを追加 | 「12」→「12000」(数値→桁合わせ文字列) |
注意点
- この方法では結果は文字列としてセルに代入されます。後続の数値演算には使用できません。
- 元のセルに数式が含まれている場合、上書きされるため注意が必要です。
- 桁数を変えたい場合は
String(5, "0")の5の部分を任意の数字に変更してください。
まとめ
本記事では、Excel VBAを使って数値をゼロ埋めして文字列に変換する方法を、以下の2パターンに分けて解説いたしました。
| 変換内容 | 使用関数 | 結果例 |
|---|---|---|
| 左側にゼロ追加 | Right("00000" & 値, 5) | 37 → 00037 |
| 右側にゼロ追加 | Left(値 & "00000", 5) | 37 → 37000 |
ゼロ埋め処理は、帳票整理や管理番号の整形など、実務で広く活用されています。ぜひ日々の業務にご活用ください。
副業から独立まで「稼げる」Webスキルを習得する(PR)
ここまで読んでいただきありがとうございます。 最後に宣伝をさせてください。
「副業を始めたいが、何から手をつければいいかわからない」「独学でスキルはついたが、収益化できていない」という悩みを持つ方には、マンツーマン指導のWebスクール**「メイカラ」**が適しています。
このスクールは、単に技術を教えるだけでなく、**「副業として具体的にどう稼ぐか」**という実務直結のノウハウ提供に特化している点が特徴です。
講師陣は、実際に「副業Webライターから1年で独立して月収100万円」を達成したプロや、現役で利益を出し続けているブロガーなど、確かな実績を持つプレイヤーのみで構成されています。そのため、机上の空論ではない、現場で通用する戦術を学ぶことができます。
副業に特化した強み
- 最短ルートの提示: 未経験からでも実績を出せるよう、マンツーマンで指導。
- AI活用の習得: 副業の時間対効果を最大化するための、正しいAI活用スキルも網羅。
- 案件獲得のチャンス: 運営がWebマーケティング会社であるため、実力次第で社内案件の紹介など、仕事に直結する可能性があります。
受講者の多くは、「在宅でできる仕事を探している」「副業を頑張りたい」という20代・30代・40代が中心です。
受講前には、講師による無料説明が行われます。無理な勧誘はなく、自分に合った副業スタイルやプランを相談できるため、まずは話を聞いてみることから始めてみてはいかがでしょうか。
