IncludeNumber Property
True if the style includes the NumberFormat property. Read/write Boolean
Example
This example sets the style attached to cell A1 on Sheet1 to include number format.
Worksheets("Sheet1").Range("A1").Style.IncludeNumber = True