OVH Cloud OVH Cloud

conversion de type

2 réponses
Avatar
eric
salut !

je recupere une dimension d'un objet visio en VB et cette dimension est
donnée en millimetre dans un String
"10.00215 mm" par exemple

//la fonction ressemble à ça:
H_s =
Doc.Pages(1).Shapes.ItemFromID(nb_elements_colles).CellsSRC(visSectionObject
, visRowXFormOut, visXFormHeight).FormulaU

j'aimerai convertir ce resultat en Double, mais je vois pas trop comment
faire "simplement"

j'attends vos idées

merci

Eric

2 réponses

Avatar
Marc
Je n'ai peut être pas bien compris la question mais il me semble qu'en
utilisant les fonctions val et cdbl on devrait pouvoir y arriver.
attention cdbl tient compte des préférences régionales (virgule et point)
tandis que val ne connait que le point comme séparateur décimal
donc cdbl ("10.00215") donne 1000215 !!!
val ("10.00215 mm") donne 10.00215 en dbl
mais tu peux aussi écrire (pour être sur) cdbl(val("10.00215 mm")
a+,
marc


"eric" a écrit dans le message de
news:409ac250$0$31941$
salut !

je recupere une dimension d'un objet visio en VB et cette dimension est
donnée en millimetre dans un String
"10.00215 mm" par exemple

//la fonction ressemble à ça:
H_s >


Doc.Pages(1).Shapes.ItemFromID(nb_elements_colles).CellsSRC(visSectionObject
, visRowXFormOut, visXFormHeight).FormulaU

j'aimerai convertir ce resultat en Double, mais je vois pas trop comment
faire "simplement"

j'attends vos idées

merci

Eric




Avatar
eric
ok c'est exactement ça qu'il me fallait !
j'utilise val("10.00215 mm") et j'ai pas besoin de plus !
tant de fonctions utiles à connaitre :-)

merci bcp

eric


"Marc" a écrit dans le message de
news:409b4309$0$22975$
Je n'ai peut être pas bien compris la question mais il me semble qu'en
utilisant les fonctions val et cdbl on devrait pouvoir y arriver.
attention cdbl tient compte des préférences régionales (virgule et point)
tandis que val ne connait que le point comme séparateur décimal
donc cdbl ("10.00215") donne 1000215 !!!
val ("10.00215 mm") donne 10.00215 en dbl
mais tu peux aussi écrire (pour être sur) cdbl(val("10.00215 mm")
a+,
marc


"eric" a écrit dans le message de
news:409ac250$0$31941$
> salut !
>
> je recupere une dimension d'un objet visio en VB et cette dimension est
> donnée en millimetre dans un String
> "10.00215 mm" par exemple
>
> //la fonction ressemble à ça:
> H_s > >



Doc.Pages(1).Shapes.ItemFromID(nb_elements_colles).CellsSRC(visSectionObject
> , visRowXFormOut, visXFormHeight).FormulaU
>
> j'aimerai convertir ce resultat en Double, mais je vois pas trop comment
> faire "simplement"
>
> j'attends vos idées
>
> merci
>
> Eric
>
>