Bonsoir,
je souhaite dans un textbox, saisir directement dans celui-ci au format
avec séparateur de millier
dans le Change : textbox1 =textbox1(format...)
Merci
Hervé
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Gaenonius
Par exemple :
TextBox1.Value=Format(TextBox1.Value,"# ##0")
-- Gaenonius
Bonsoir, je souhaite dans un textbox, saisir directement dans celui-ci au format avec séparateur de millier dans le Change : textbox1 =textbox1(format...) Merci Hervé
Par exemple :
TextBox1.Value=Format(TextBox1.Value,"# ##0")
--
Gaenonius
Bonsoir,
je souhaite dans un textbox, saisir directement dans celui-ci au format
avec séparateur de millier
dans le Change : textbox1 =textbox1(format...)
Merci
Hervé
Bonsoir, je souhaite dans un textbox, saisir directement dans celui-ci au format avec séparateur de millier dans le Change : textbox1 =textbox1(format...) Merci Hervé
papou
Bonjour Si tu utilises l'évènement Change ce sera difficile à moins de pouvoir contrôler le nombre de chiffres saisis. A mon avis il vaudrait mieux regarder du côté de l'évènement AfterUpdate :
Private Sub TextBox1_AfterUpdate() TextBox1 = Format(TextBox1, "# ##0.00") End Sub
Cordialement Pascal
"Hervé" a écrit dans le message de news: OH0NgfC%
Bonsoir, je souhaite dans un textbox, saisir directement dans celui-ci au format avec séparateur de millier dans le Change : textbox1 =textbox1(format...) Merci Hervé
Bonjour
Si tu utilises l'évènement Change ce sera difficile à moins de pouvoir
contrôler le nombre de chiffres saisis.
A mon avis il vaudrait mieux regarder du côté de l'évènement AfterUpdate :
Private Sub TextBox1_AfterUpdate()
TextBox1 = Format(TextBox1, "# ##0.00")
End Sub
Cordialement
Pascal
"Hervé" <h.lebeau@club-internet.fr> a écrit dans le message de news:
OH0NgfC%23EHA.1604@TK2MSFTNGP12.phx.gbl...
Bonsoir,
je souhaite dans un textbox, saisir directement dans celui-ci au format
avec séparateur de millier
dans le Change : textbox1 =textbox1(format...)
Merci
Hervé
Bonjour Si tu utilises l'évènement Change ce sera difficile à moins de pouvoir contrôler le nombre de chiffres saisis. A mon avis il vaudrait mieux regarder du côté de l'évènement AfterUpdate :
Private Sub TextBox1_AfterUpdate() TextBox1 = Format(TextBox1, "# ##0.00") End Sub
Cordialement Pascal
"Hervé" a écrit dans le message de news: OH0NgfC%
Bonsoir, je souhaite dans un textbox, saisir directement dans celui-ci au format avec séparateur de millier dans le Change : textbox1 =textbox1(format...) Merci Hervé
Hervé
Merci beaucoup à tous les 2 Hervé
"papou" <cestpasbon@çanonplus44.fr> a écrit dans le message de news: e0KCSqH%
Bonjour Si tu utilises l'évènement Change ce sera difficile à moins de pouvoir contrôler le nombre de chiffres saisis. A mon avis il vaudrait mieux regarder du côté de l'évènement AfterUpdate :
Private Sub TextBox1_AfterUpdate() TextBox1 = Format(TextBox1, "# ##0.00") End Sub
Cordialement Pascal
"Hervé" a écrit dans le message de news: OH0NgfC%
Bonsoir, je souhaite dans un textbox, saisir directement dans celui-ci au format avec séparateur de millier dans le Change : textbox1 =textbox1(format...) Merci Hervé
Merci beaucoup à tous les 2
Hervé
"papou" <cestpasbon@çanonplus44.fr> a écrit dans le message de news:
e0KCSqH%23EHA.1392@tk2msftngp13.phx.gbl...
Bonjour
Si tu utilises l'évènement Change ce sera difficile à moins de pouvoir
contrôler le nombre de chiffres saisis.
A mon avis il vaudrait mieux regarder du côté de l'évènement AfterUpdate :
Private Sub TextBox1_AfterUpdate()
TextBox1 = Format(TextBox1, "# ##0.00")
End Sub
Cordialement
Pascal
"Hervé" <h.lebeau@club-internet.fr> a écrit dans le message de news:
OH0NgfC%23EHA.1604@TK2MSFTNGP12.phx.gbl...
Bonsoir,
je souhaite dans un textbox, saisir directement dans celui-ci au format
avec séparateur de millier
dans le Change : textbox1 =textbox1(format...)
Merci
Hervé
"papou" <cestpasbon@çanonplus44.fr> a écrit dans le message de news: e0KCSqH%
Bonjour Si tu utilises l'évènement Change ce sera difficile à moins de pouvoir contrôler le nombre de chiffres saisis. A mon avis il vaudrait mieux regarder du côté de l'évènement AfterUpdate :
Private Sub TextBox1_AfterUpdate() TextBox1 = Format(TextBox1, "# ##0.00") End Sub
Cordialement Pascal
"Hervé" a écrit dans le message de news: OH0NgfC%
Bonsoir, je souhaite dans un textbox, saisir directement dans celui-ci au format avec séparateur de millier dans le Change : textbox1 =textbox1(format...) Merci Hervé
