Bonjour à tous du forum,
j'essaie d'avencer avec mon userform,
mais il y a encore des bug avec le format des textbox,
le format du textbox7 = # ###,00 ou # ###.00
si on met 20 donne 20,00
si on met 240,10 donne 240,10
si on met 1240.05 donne 1 240.05
si on met 10460,15 donne 10 460,14
si on met autres caractères ou du texte >> est affiché Msgbox("texte non valable, veuillez mettre que des montants"),
j'utilise la fonction suivante:
Private Sub TextBox7_Exit(ByVal Cancel As MSForms.ReturnBoolean)
On Error Resume Next
Me.TextBox7 = Format(Me.TextBox7, "# ##0.00")
End Sub
Comment y ajouter les autres conditions,
merci d'avance d'astuces,
news
j'essaie d'avencer avec mon userform,
mais il y a encore des bug avec le format des textbox,
le format du textbox7 = # ###,00 ou # ###.00
si on met 20 donne 20,00
si on met 240,10 donne 240,10
si on met 1240.05 donne 1 240.05
si on met 10460,15 donne 10 460,14
si on met autres caractères ou du texte >> est affiché Msgbox("texte non valable, veuillez mettre que des montants"),
j'utilise la fonction suivante:
Private Sub TextBox7_Exit(ByVal Cancel As MSForms.ReturnBoolean)
On Error Resume Next
Me.TextBox7 = Format(Me.TextBox7, "# ##0.00")
End Sub
Comment y ajouter les autres conditions,
merci d'avance d'astuces,
news