Se positionner sur une ligne précise d'un fichier texte

[nougitch]

Bonjour,

J'aimerais savoir comment récupérer la valeur d'une ligne précise d'un fichier TXT.

Si j'ai par exemple un fichier texte contenant les données suivantes :

BackgroundColor=2
FontColor=1
Font=Arial
FontSize=8
ColumnWidth=12

Comment faire pour récupérer la valeur de la tatille de la police ? (en l'occurrence 8)

De même, comment faire pour écrire dans le fichier texte à cet endroit précis, en supposant que j'ai dans mon fichier Excel en colonne A les données suivantes :

BackgroundColor
FontColor
Font
FontSize
ColumnWidth

Et en colonne B, les valeurs

2
1
Arial
8
12

Merci par avance pour votre aide

 

[smotty]

Re : Se positionner sur une ligne précise d'un fichier texte

Bonsoir,

voici un exemple inspiré de l'aide sur input # dans Excel

Dim TextLine
Open "FICHTEST" For Input As #1 ' Ouvre le fichier.
Do While Not EOF(1) ' Effectue la boucle jusqu'à la fin du fichier.
Line Input #1, TextLine ' Lit la ligne dans la variable.
TabT=split(TextLine,"=")
Titre=TabT(0)
Valeur=TabT(1)

Loop
Close #1 ' Ferme le fichier.

Ensuite tu peux mettre les valeurs récupérées dans ton fichier Excel

A+

 

[nougitch]

Re : Se positionner sur une ligne précise d'un fichier texte

Ok, merci Smotty!
Bon we!