OVH Cloud OVH Cloud

Format numérique...

7 réponses
Avatar
Yvan
Bonjour,

Le résultat ci-dessous est considéré comme du numérique par Excel 2003 mais
pas pas Excel 2000.

TextBox6.Value = Format(TextBox6.Value, "###.00 €")

Comment faire pour indiquer à Excel que c'est bien du numérique et non pas
une chaine de caractère ???

--
Merci pour vos réponses.

7 réponses

Avatar
isabelle
bonjour Yvan,

TextBox6.Value = Format(TextBox6.Value, "###.00 €")
If IsNumeric(TextBox6.Value * 1) Then MsgBox "c'est du numerique"

isabelle

Bonjour,

Le résultat ci-dessous est considéré comme du numérique par Excel 2003 mais
pas pas Excel 2000.

TextBox6.Value = Format(TextBox6.Value, "###.00 €")

Comment faire pour indiquer à Excel que c'est bien du numérique et non pas
une chaine de caractère ???



Avatar
Yvan
Isabelle,

Merci pour ta réponse, mais ça ne marche pas plus.

Connais-tu l'équivalent de la fonction "CNUM" pour une macro ??? Ce sera
peut-être la solution pour convertir ce qu'Excel considère comme une chaine...

--
Merci pour vos réponses.



bonjour Yvan,

TextBox6.Value = Format(TextBox6.Value, "###.00 €")
If IsNumeric(TextBox6.Value * 1) Then MsgBox "c'est du numerique"

isabelle

Bonjour,

Le résultat ci-dessous est considéré comme du numérique par Excel 2003 mais
pas pas Excel 2000.

TextBox6.Value = Format(TextBox6.Value, "###.00 €")

Comment faire pour indiquer à Excel que c'est bien du numérique et non pas
une chaine de caractère ???






Avatar
Clément Marcotte
Bonjour,

Connais-tu l'équivalent de la fonction "CNUM" pour une macro ???


Ben lequel ? ;-)

Cint()
Clng()
Cdec()
Ccur()
Cdate()
Cdbl()
Csng()

val() sous certaines conditions...

Et peut-être d'autres que j'oublie...

Avatar
Clément Marcotte
Bonjour,

Pas beaucoup le temps de chercher, mais, à la base, la fonction Format()
dérive de Format$() et donne, en principe, le résultat en chaîne de
caractères. M'est avis qu'il convertir le résultat de Format au complet et
pas juste le résultat du textbox.

Si quelqu'un a envie de regarder cela... Sinon, je le ferai en soirée chez
moi.


"isabelle" a écrit dans le message de news:

bonjour Yvan,

TextBox6.Value = Format(TextBox6.Value, "###.00 ?")
If IsNumeric(TextBox6.Value * 1) Then MsgBox "c'est du numerique"

isabelle

Bonjour,

Le résultat ci-dessous est considéré comme du numérique par Excel 2003
mais pas pas Excel 2000.

TextBox6.Value = Format(TextBox6.Value, "###.00 ?")

Comment faire pour indiquer à Excel que c'est bien du numérique et non
pas une chaine de caractère ???





Avatar
Youky
MsgBox Format(CDbl(Val(TextBox1.Value)), "0.00")
à retester
Youky

"Yvan" a écrit dans le message de news:

Isabelle,

Merci pour ta réponse, mais ça ne marche pas plus.

Connais-tu l'équivalent de la fonction "CNUM" pour une macro ??? Ce sera
peut-être la solution pour convertir ce qu'Excel considère comme une
chaine...

--
Merci pour vos réponses.



bonjour Yvan,

TextBox6.Value = Format(TextBox6.Value, "###.00 ?")
If IsNumeric(TextBox6.Value * 1) Then MsgBox "c'est du numerique"

isabelle

Bonjour,

Le résultat ci-dessous est considéré comme du numérique par Excel 2003
mais
pas pas Excel 2000.

TextBox6.Value = Format(TextBox6.Value, "###.00 ?")

Comment faire pour indiquer à Excel que c'est bien du numérique et non
pas
une chaine de caractère ???








Avatar
FxM
Bonsoir,

Pas beaucoup le temps de chercher,
Rentre vite, le match commence :o)


@+
FxM


Bonjour,

Pas beaucoup le temps de chercher, mais, à la base, la fonction Format()
dérive de Format$() et donne, en principe, le résultat en chaîne de
caractères. M'est avis qu'il convertir le résultat de Format au complet et
pas juste le résultat du textbox.

Si quelqu'un a envie de regarder cela... Sinon, je le ferai en soirée chez
moi.


"isabelle" a écrit dans le message de news:

bonjour Yvan,

TextBox6.Value = Format(TextBox6.Value, "###.00 ?")
If IsNumeric(TextBox6.Value * 1) Then MsgBox "c'est du numerique"

isabelle

Bonjour,

Le résultat ci-dessous est considéré comme du numérique par Excel 2003
mais pas pas Excel 2000.

TextBox6.Value = Format(TextBox6.Value, "###.00 ?")

Comment faire pour indiquer à Excel que c'est bien du numérique et non
pas une chaine de caractère ???









Avatar
ABED HADDOU
Bonjour,
essaie ceci
Feuil1.TextBox1.Value = Format(Val(Feuil1.TextBox1.Value), "###.00 €")
If IsNumeric(Feuil1.TextBox1.Value) Then MsgBox "c'est du numerique"

Abed_H



bonjour Yvan,

TextBox6.Value = Format(TextBox6.Value, "###.00 €")
If IsNumeric(TextBox6.Value * 1) Then MsgBox "c'est du numerique"

isabelle

Bonjour,

Le résultat ci-dessous est considéré comme du numérique par Excel 2003 mais
pas pas Excel 2000.

TextBox6.Value = Format(TextBox6.Value, "###.00 €")

Comment faire pour indiquer à Excel que c'est bien du numérique et non pas
une chaine de caractère ???