[vba]

txttotfailurerate.Value = Format(totfailrate, "#,##0.0000")
[/vba]