Sub Macro1()
'1) test avec l'enregistreur de macros
Range("A1") = 10.5
Range("A1").NumberFormat = "#,##0.00"" ml"""
'2) ci qui nous permet de déduire:
Dim Chaine$
Chaine = 10.5
MsgBox Chaine, vbInformation, "1"
MsgBox Format(Chaine, "#,##0.00"" ml"""), vbExclamation, "2"
'3) Je te laisse utiliser la syntaxe de Format pour tes TextBoxs
End Sub