Rechercher
Se connecter avec
S'enregistrer | Connectez-vous

perte du zéro de fin dans le passge d'excel à un .txt

Dernière réponse : dans Programmation
Partagez
toni6912@guest

Bonjour, après avoir cherché dans les différents sujets je n'ai pas trouver de réponse à ma question.
Je passe d'un fichier excel à un fichier .txt mais je n'arrive pas à conserver les zéros de fin à l'écriture.
Ainsi une cellule où est écrite "1.300" s'écrit "1.3" dans le .txt alors que je voudrais conserver les zéros.
De même "0.0000" dans excel s'écrit "0" dans .txt.

Pour avoir le nombre de decimal désiré dans mes cellules j'utilise
  1. Cells(p, 3).NumberFormat = "0.000"
    

  2. Sheets("meo").Cells(p, 3).Value = ht_st

où ht_st est une variable contenant un nombre et p une variable incrémentée

pour écrire dans le fichier .txt j'utilise 
  1. Open reponse + ".meo" For Append As #1

puis dans un boucle incrémentant f
  1. Print #1, Cells(f, 1); Tab(10); Cells(f, 2); Tab(20); Cells(f, 3)


Au risque de me répéter, j'aimerais écrire dans le .txt ni plus ni moin ce qui s'affiche dans excel; et sans perdre mes zéros de fin.

Merci d'avance. Bonne journée.

Autres pages sur : perte zero fin passge excel txt

Lassé par la pub ? Créez un compte

Merci OmaR de ta contribution ...

En plus conctructif:
  1. Print #1, Cells(1, 1).Text; Tab(10); Cells(1, 2).Text; Tab(20); Cells(1, 3).Text
  • drul a édité ce message
Contenus similaires
Posez votre question

drul a dit :
Merci OmaR de ta contribution ...

En plus conctructif:
  1. Print #1, Cells(1, 1).Text; Tab(10); Cells(1, 2).Text; Tab(20); Cells(1, 3).Text


En quoi c'est pas contructif ? Il veut créer un fichier txt à partir d'un fichier Excel.
Plutôt que de se faire chier à faire du code vba pour transformer son fichier Excel en .txt, il suffit d'enregistrer en csv, et il aura le même résultat sans se faire chier...
  • OmaR a édité ce message

Ben de base je suppose qu'il est pas complétement idiot et qu'il a:
1°) soit besoin d'exporter uniquement une partie des données
2°) soit d'un format précis dans son fichier.txt.

Mais effectivement commencer par la solution la plus simple n'est pas faux. Excuse moi si je t'ai vexé. :spamafote: 

Il est pas forcément idiot, mais on ne pense pas forcément aux solutions les plus simples... donc je propose...
Ta réaction m'a un peu "choqué", c'est tout... Pas de quoi en faire un plat :) 

zeb a dit :
plop.
drul a dit :
Euh tu veux dire quoi par la ?

Alors, au choix :

Plop, interjection courante à sens non défini.
Plop, surnom attribué à un petit programme informatique ayant pour but de figer une machine à distance (cf. fork bomb).
Kabouter Plop, héros de dessin animé belge.
Plop, est également une petite distribution de Linux.
Plop, est aussi une manière de dire bonjour à une personne dans le monde virtuel.


:D 

Tiens pour moi Plop, c'était le bruit d'une goutte d'eau qui tompe. Raaaaaaaaaahhhh, je suis beaucoup encré dans la "vrai" vie, faut vraiment que je me virtualise un peu plus :pt1cable: 
Lassé par la pub ? Créez un compte
 
Posez votre question