VBAのThousandsSeparatorプロパティ

こちらでは、エクセルVBAのThousandsSeparatorプロパティの解説になります。

プロパティとはオブジェクトの属性を指します。属性とは、そのオブジェクトの情報そのものです。プロパティはその値を取得したり、設定することもできます。プロパティを利用するにはオブジェクト名とプロパティ名の間に「.(ピリオド)」で結んで記述します。

オブジェクト名.プロパティ名

また、プロパティを設定する場合は以下のように「=(イコール)」を記述し設定値を代入します。

オブジェクト名.プロパティ名 = 設定値

ThousandsSeparatorプロパティ

ThousandsSeparatorプロパティは、桁区切り記号として使用する文字を設定します。値の取得および設定が可能です。文字列型 (String) の値を使用します。

expression.ThousandsSeparator
expression 必ず指定します。対象となる Application オブジェクトを返すオブジェクト式を指定します。
次の使用例は、セル A1 に 1,234,567.89 を挿入し、小数点記号と桁区切り記号をダッシュに変更します。


Sub ChangeSystemSeparators()

    Range("A1").Formula = "1,234,567.89"
    MsgBox "小数点記号と桁区切り記号を変更します。"

    ' 区切り記号を定義して適用します。
    Application.DecimalSeparator = "-"
    Application.ThousandsSeparator = "-"
    Application.UseSystemSeparators = False

End Sub

※ドラッグ(スワイプ)すると全体を確認できます。