Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

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

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

nougitch

XLDnaute Occasionnel
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 :
Code:
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 :
Code:
BackgroundColor
FontColor
Font
FontSize
ColumnWidth
Et en colonne B, les valeurs
Code:
2
1
Arial
8
12

Merci par avance pour votre aide
 
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+
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Réponses
3
Affichages
880
M
Réponses
13
Affichages
1 K
Réponses
9
Affichages
888
Réponses
2
Affichages
1 K
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…