In diesen Beispielen wird das Zahlenformat für Zelle A17, erste Zeile, sowie für Spalte C in Sheet1 festgelegt.
Worksheets("Sheet1").Range("A17").NumberFormat = "General" Worksheets("Sheet1").Rows(1).NumberFormat = "hh:mm:ss" Worksheets("Sheet1").Columns("C"). _ NumberFormat = "$#,##0.00_);[Red]($#,##0.00)"