Sujet Précédent Sujet Suivant

Conserver les zero non significatifs

Fermé
divanath Messages postés 2 Date d'inscription mardi 21 février 2017 Statut Membre Dernière intervention 22 février 2017 - 21 févr. 2017 à 18:50
divanath Messages postés 2 Date d'inscription mardi 21 février 2017 Statut Membre Dernière intervention 22 février 2017 - 22 févr. 2017 à 09:22
Bonjour,

je cherche à conserver les zero non significatifs de chiffres pour les exporter dans un autre fichier. L'affichage est ok dans excel mais l'export ne reporte pas les zeros.

voici le code:

Range("B:B").NumberFormat = "0.000" 'on bien affiche 100.200
Open FichierCible For Output As #1
Print #1, Left(Range("B" & 12).Value, 7) ' on récupère 100.2
Close #1

Des idées ?

A voir également:

2 réponses

Réponse 1 / 2
Patrice33740 Messages postés 8556 Date d'inscription dimanche 13 juin 2010 Statut Membre Dernière intervention 2 mars 2023 1 776
21 févr. 2017 à 19:45
Bonjour,

C'est normal,
100.2 est bien la valeur contenue dans la cellule
et
100.200 est le texte formaté dans la cellule.

i.e. il faut écrire :
Print #1, Left(Range("B" & 12).Text, 7)
0
Réponse 2 / 2
divanath Messages postés 2 Date d'inscription mardi 21 février 2017 Statut Membre Dernière intervention 22 février 2017
22 févr. 2017 à 09:22
Bonjour Patrick,

merci !!!!! C'est exactement ce que je cherchais !

Bonne journée
Nathalie
0

Discussions similaires

[.com.zerog.registry.xlm]
Linda -
Pépinpome -

5 réponses
cherche film de combat du genre crow zero
christian000000000 -
farouzi -

8 réponses
remise a zero compteur epson
patcat17 -
Norberto -

14 réponses
écrire un zéro barré
jaja -
Aurélie19 -

8 réponses
copie de texte
jean -
jean -

5 réponses