C
Cédric
Guest
Bonjour le forum, j'ai un petit problème avec un fichier que je viens de céer, lorsque je fais 2 fois la mise à jour, le format ne fonctionne plus.
Voici le code et le fichier est en pièce jointe :
Range("E6") = Me.TextBox1.Value
TextBox1.Value = Format(TextBox1.Value, "# ###.00")
Pour vous tester : marquer une fois la somme dans la case prévu, appuyer sur le bouton mettre à jour, puis mettez une autre somme dans une autre case et refaites mise à jour, la 1ère somme ne fonctionne plus car le format n'est pas pris en compte.
Merci de votre aide à tous.
Voici le code et le fichier est en pièce jointe :
Range("E6") = Me.TextBox1.Value
TextBox1.Value = Format(TextBox1.Value, "# ###.00")
Pour vous tester : marquer une fois la somme dans la case prévu, appuyer sur le bouton mettre à jour, puis mettez une autre somme dans une autre case et refaites mise à jour, la 1ère somme ne fonctionne plus car le format n'est pas pris en compte.
Merci de votre aide à tous.