Définir le format d'un nombre lors de son écriture dans un fichier txt

Le 13/10/2022 à 10:25

Bonjour,

J'ai écrit un petit programme qui crée un fichier .txt à partir de cellules d'un tableau, dans ces cellules se trouvent des nombres à 7 ou 8 chiffres, le programme fonctionne bien mais je voudrais que lorsque le nombre ne comporte que 7 chiffres, un 0 s'écrive devant pour le ramener à 8 chiffres dans le fichier.txt.

Pouvez-vous m'aider svp car je ne trouve pas comment utiliser la fonction Format, voici la partie du programme concerné :

Open Fichier For Output As #f

For i=4 to nbligneTab1

If ws_feuille1.Cells(i,12)>1000 Then

Print #f, ws_feuille1.Range("A"&i)

Next

Next

Close #f

Le 13/10/2022 à 10:29

bonjour,

ceci devrait fonctionner

Print #f, format(ws_feuille1.Range("A"&i),"00000000")
Le 13/10/2022 à 10:35

h2so4, merci beaucoup, cela fonctionne. Bonne journée.

Rechercher des sujets similaires à "definir format nombre lors ecriture fichier txt"