1 pièce(s) jointe(s)
Format numérique dans un formulaire vba
Bonsoir à tous,
Bien tôt ce matin, mais j'ai pris goût à la création d'un nouveau fichier de gestion des ventes :-)
J'ai créé un formulaire simple avec des Textbox et ComboBox. J'ai besoin de formaté certaines cellules car une fois que le formulaire est complété et les données intégrées dans la base de données, il y a quelques bugs (les dates et prix sont considérés comme du texte).
J'ai donc utilisé Private Sub UserForm_Initialize() pour initialiser les données mais sans succès.
Voici le code
Code:
1 2 3 4 5 6 7 8 9 10 11 12 13
| Private Sub UserForm_Initialize()
'Affiche le prix en format personnalisé avec séparateur de milliers, décimales et
txtNombre.Value = Format(txtPrix, "# ##0,00 ")
'Affiche uniquement la date
txtDate.Value = Format(txtDateCommande, "DD/MM/YY")
txtDate.Value = Format(txtDateFacture, "DD/MM/YY")
'Affiche le %
txtPourcentage.Value = Format(txtRemise, "0,00 %")
End Sub |
Voici le code erreur
Pièce jointe 607675
Une idée de ce qui cloque ? Merci pour votre aide
Je vais aller me coucher (il est 2h48 ce matin) et j'espère à mon réveil trouver la solution
Bonne journée à tous