Sub numFormat() dblNumber = 12345.678 Debug.Print dblNumber Debug.Print Format(dblNumber "###,##0.00") End Sub