Sub numFormat() dblNumber = 12345.678 Debug.Print dblNumber Debug.Print Format(dblNumber "000000.00")End Sub