ThousandsSeparator Property [Excel 2003 VBA Language Reference]

Sets or returns the character used for the thousands separator as a String. Read/write.

expression.ThousandsSeparator

expression Required. An expression that returns an Application object.

Example

This example places "1,234,567.89" in cell A1 then changes the system separators to dashes for the decimals and thousands separators.

Sub ChangeSystemSeparators()

    Range("A1").Formula = "1,234,567.89"
    MsgBox "The system separators will now change."

    ' Define separators and apply.
    Application.DecimalSeparator = "-"
    Application.ThousandsSeparator = "-"
    Application.UseSystemSeparators = False

End Sub

Applies to | Application Object