Salut Elise,
Il faut déjà que tu convertisses ton texte en nombre, puisqu'un textBox renvoi, comme son nom l'indique, du texte.
Donc je te propose cela:
Private Sub CommandButton1_Click()
UserForm5.Hide
base_vf_196 = Cdec(TextBox1.Value)
base_vf_55 = Cdec(TextBox2.Value)
vat_vf_55 = Cdec(TextBox3.Value)
vat_vf_196 = Cdec(TextBox4.Value)
End Sub
Si ce n'est pas du texte tranformable en nombre, il y aura un message du type "Type impatible". Tu peux si tu le veux le gérer avec la fonction
On Error .... Pour faire afficher un message invitant à recommencer la saise.
bon String, euh Non où ai je la tête, Bonne journée
Pascal