【VBA】セルの表示形式を「郵便番号」にする

VBAコード

ここでは例として、シート「sample」上の
　・セル「B2」の表示形式を「郵便番号」
にします。

Sub sample()
    With Worksheets("sample").Range("B2")
        '表示形式を「郵便番号」にする
        .NumberFormatLocal = "[<=999]000;[<=9999]000-00;000-0000"
    End With
End Sub

実行結果

セルの表示形式を「郵便番号」にできました。

セルの書式設定を確認すると、表示形式が「郵便番号」になっていることを確認できます。

参考①

表示形式を「文字列」にすることもできます。

詳細は以下の記事をご確認ください。

参考②

上記のVBAコードで使用した以下の詳細は、公式サイトをご確認ください。

●「Rangeオブジェクト」の「NumberFormatLocal」プロパティ