Bonjour, Celeda, Xavier
il y a l'instruction Format
TextBox17.Value = format(........,"0,00 %")
Utilise plutôt un with ce qui évite des saisies et peu aussi supprimer des sélections de feuille.
Private Sub UserForm_Activate()
With Worksheets("capacité")
TextBox17.Value = (.Range("F19").Value - .Range("E19")) / .Range("E19")
end with
end sub
@+Jean-Marie