NumberFormatLocal Property Example
This example displays the number format for cell A1 on Sheet1, in the language of the user.
MsgBox "The number format for cell A1 is " & _ Worksheets("Sheet1").Range("A1").NumberFormatLocal